Все фрагменты

capitalex / draw.nv

0 лайк(-ов)

0 форк(-ов)

3 файл(-ов)

Последняя активность 1 year ago

1	\|#\| constant, @sleep, 60
2	\|#\| constant, @pixel r, 255
3	\|#\| constant, @pixel g, 255
4	\|#\| constant, @pixel b, 255
5	\|#\| constant, clear old mouse x, 1000000
6	\|#\| constant, clear old mouse y, 1000000
7	\|#\| constant, current mouse x -> old mouse x, 1000000
8	\|#\| constant, current mouse y -> old mouse y, 1000000
9	\|#\| constant, @mouse x -> current mouse x, 1000000
10	\|#\| constant, @mouse y -> current mouse y, 1000000

capitalex / test.nv

0 лайк(-ов)

0 форк(-ов)

2 файл(-ов)

Последняя активность 1 year ago

1	\|#\| constant, a, 1000000
2
3	\|move, a, a\| move, move, b
4	\|move\|
5
6	\|\| move, a:1000000

sierra / rgb-assembly.nv

0 лайк(-ов)

0 форк(-ов)

1 файл(-ов)

Последняя активность 1 year ago • Форки с june/rgb-assembly.nv

1	\|\|start
2	\|start\| 1
3
4	\|ld x 128, x\| ld x 128
5	\|ld x 128 \| x:128
6	\|ld y 128, y\| ld y 128
7	\|ld y 128 \| y:128
8
9	\|jz x eol, 4, x\| x, 4
10	\|jz x eol, 4 \| eol

capitalex / fizzbuzz.poqs

0 лайк(-ов)

0 форк(-ов)

1 файл(-ов)

Последняя активность 1 year ago

1	: {run fizzbuzz from $x to $y} >
2	{current number is $x} {run fizzbuzz to $y} :
3
4	: {run fizzbuzz to $n} {current number is $n} >
5	{fizz $n} {buzz $n} {number is $n} :
6
7	: {run fizzbuzz to $stop-value} {current number is $n} >
8	{run fizzbuzz to $stop-value}
9	{next number from $n} {fizz $n} {buzz $n} {number is $n} {wrote ""} :

capitalex / averages.poqs

0 лайк(-ов)

0 форк(-ов)

1 файл(-ов)

Последняя активность 1 year ago

1	We've collected the following data points --
2	- {data point of #4}
3	- {data point of #1}
4	- {data point of #7}
5	- {data point of #8}
6	- {data point of #1}
7
8	Let's find the average of these values. We've got a tally running, we
9	should continue accumulating values --

capitalex / simple_state.gd

0 лайк(-ов)

0 форк(-ов)

1 файл(-ов)

Последняя активность 1 year ago

1	extends Node
2	class_name _SimpleState
3
4	signal state_changed(name, state)
5
6	var state := { }
7
8
9	func register(state_name: String, inital_state: Dictionary = {}) -> void:
10	state[state_name] = inital_state

capitalex / move-a.nv

0 лайк(-ов)

0 форк(-ов)

2 файл(-ов)

Последняя активность 1 year ago

1	initial-state:
2	set #1 &move
3	set #1 &a:1000000
4
5	search:
6	rule-1:
7	jez &move %rule-2
8	jez &a %rule-2
9	jez &a %rule-2
10

sierra / curses.nv

0 лайк(-ов)

0 форк(-ов)

1 файл(-ов)

Последняя активность 1 year ago

1	\|#\| constant, @char-x, 5
2	\|#\| constant, @char-y, 5
3	\|#\| constant, @char, 64
4
5	\| run the program \|
6	start ncurses,
7	draw the player,
8	read a character,
9	clean up ncurses,

june / Drawing a triangle.

0 лайк(-ов)

0 форк(-ов)

2 файл(-ов)

Последняя активность 1 year ago

A demonstration of a line drawing port.

1	\|#\|start exhaustive
2	\|#\|constant, @resolution-x, 800
3	\|#\|constant, @resolution-y, 600
4	\|\|start
5	\|start\|
6	@resolution-x:800,
7	@resolution-y:600,
8	set the window resolution,
9	main loop
10	\|set the window resolution\| @set-resolution

sierra / rgb400_ungolfed

0 лайк(-ов)

0 форк(-ов)

1 файл(-ов)

Последняя активность 1 year ago

1	\|--\| Are we at the end of a line?
2	\|end of line?, x\| x, ~end of line
3	\|end of line?\| end of line
4
5	\|--\| Are we at the end of the screen?
6	\|end of screen?, y\| y, ~end of screen
7	\|end of screen?\| end of screen
8
9	\|--\| Copy the pixel coordinates from `x/y` to `@pixel-x/@pixel-y`.
10	\|pixel_x=x, x\|*x, @pixel-x, pixel_x=x

1	\|#\| constant, @sleep, 60
2	\|#\| constant, @pixel r, 255
3	\|#\| constant, @pixel g, 255
4	\|#\| constant, @pixel b, 255
5	\|#\| constant, clear old mouse x, 1000000
6	\|#\| constant, clear old mouse y, 1000000
7	\|#\| constant, current mouse x -> old mouse x, 1000000
8	\|#\| constant, current mouse y -> old mouse y, 1000000
9	\|#\| constant, @mouse x -> current mouse x, 1000000
10	\|#\| constant, @mouse y -> current mouse y, 1000000

1	\|#\| constant, a, 1000000
2
3	\|move, a, a\| move, move, b
4	\|move\|
5
6	\|\| move, a:1000000

1	\|\|start
2	\|start\| 1
3
4	\|ld x 128, x\| ld x 128
5	\|ld x 128 \| x:128
6	\|ld y 128, y\| ld y 128
7	\|ld y 128 \| y:128
8
9	\|jz x eol, 4, x\| x, 4
10	\|jz x eol, 4 \| eol

1	\|#\|start exhaustive
2	\|#\|constant, @resolution-x, 800
3	\|#\|constant, @resolution-y, 600
4	\|\|start
5	\|start\|
6	@resolution-x:800,
7	@resolution-y:600,
8	set the window resolution,
9	main loop
10	\|set the window resolution\| @set-resolution

1	\|--\| Are we at the end of a line?
2	\|end of line?, x\| x, ~end of line
3	\|end of line?\| end of line
4
5	\|--\| Are we at the end of the screen?
6	\|end of screen?, y\| y, ~end of screen
7	\|end of screen?\| end of screen
8
9	\|--\| Copy the pixel coordinates from `x/y` to `@pixel-x/@pixel-y`.
10	\|pixel_x=x, x\|*x, @pixel-x, pixel_x=x