All gists

capitalex's Avatar

capitalex / fizzbuzz.poqs

0 likes
0 forks
1 files
Last active 2 years 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's Avatar

capitalex / averages.poqs

0 likes
0 forks
1 files
Last active 2 years 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's Avatar

capitalex / simple_state.gd

0 likes
0 forks
1 files
Last active 2 years 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's Avatar

capitalex / move-a.nv

0 likes
0 forks
2 files
Last active 2 years 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's Avatar

sierra / curses.nv

0 likes
0 forks
1 files
Last active 2 years 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's Avatar

june / Drawing a triangle.

0 likes
0 forks
2 files
Last active 2 years 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's Avatar

sierra / rgb400_ungolfed

0 likes
0 forks
1 files
Last active 2 years 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
sierra's Avatar

sierra / rgb400.nv

0 likes
0 forks
1 files
Last active 2 years ago
1 |--| Are we at the end of a line?
2 |eol?,x|x,~eol|eol?|eol
3
4 |--| Are we at the end of the screen?
5 |eos?,y|y,~eos|eos?|eos
6
7 |--| Copy the pixel coordinates from `x/y` to `@pixel-x/@pixel-y`.
8 |px=x,x|*x,@pixel-x,px=x
9 |px=x|
10 |py=y,y|*y,@pixel-y,py=y
sierra's Avatar

sierra / rgb2.nv

0 likes
0 forks
1 files
Last active 2 years ago
1 |--| Are we at the end of a line?
2 |eol?,x|x,~eol|eol?|eol
3
4 |--| Are we at the end of the screen?
5 |eos?,y|y,~eos|eos?|eos
6
7 |--| Copy the pixel coordinates from `x/y` to `@pixel-x/@pixel-y`.
8 |px=x,x|*x,@pixel-x,px=x
9 |px=x|
10 |py=y,y|*y,@pixel-y,py=y
sierra's Avatar

sierra / rgb.nv

0 likes
0 forks
1 files
Last active 2 years ago • Forked from june/rgb.nv
1 |--| Constants.
2 |x:128|x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,
3 x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,
4 x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,
5 x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x
6 |y:128|y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,
7 y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,
8 y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,
9 y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y,y
10 |pr=x:128|pr=x,pr=x,pr=x,pr=x,pr=x,pr=x,pr=x,pr=x,pr=x,pr=x,pr=x,pr=x,pr=x,pr=x,pr=x,pr=x,
Newer Older

Powered by Opengist ⋅ Load: 273ms⋅

English