's Avatar

capitalex

Зарегистрирован 2 years ago

capitalex's Avatar

capitalex / draw.nv

0 лайк(-ов)
0 форк(-ов)
3 файл(-ов)
Последняя активность 2 years 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's Avatar

capitalex / test.nv

0 лайк(-ов)
0 форк(-ов)
2 файл(-ов)
Последняя активность 2 years ago
1 |#| constant, a, 1000000
2
3 |move, a, a| move, move, b
4 |move|
5
6 || move, a:1000000
capitalex's Avatar

capitalex / fizzbuzz.poqs

0 лайк(-ов)
0 форк(-ов)
1 файл(-ов)
Последняя активность 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 лайк(-ов)
0 форк(-ов)
1 файл(-ов)
Последняя активность 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 лайк(-ов)
0 форк(-ов)
1 файл(-ов)
Последняя активность 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 лайк(-ов)
0 форк(-ов)
2 файл(-ов)
Последняя активность 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
capitalex's Avatar

capitalex / rewriting.modal

0 лайк(-ов)
0 форк(-ов)
2 файл(-ов)
Последняя активность 2 years ago
1 <> (tally ?value (Bag ?list)) ((Bag tallying| tallying> ?value ?list))
2
3 <> (tallying> ?value ())
4 (<tallying ((Entry ?value 1) ()))
5
6 <> (tallying> ?value ((Entry ?value ?count) ?rest))
7 (<tallying ((Entry ?value @add ?count 1) ?rest))
8
9 <> (tallying> ?value (?entry ?rest))
10 ((?entry tallying> ?value ?rest))
capitalex's Avatar

capitalex / bag.formal

0 лайк(-ов)
0 форк(-ов)
3 файл(-ов)
Последняя активность 2 years ago
1 <> (tally ?value (Bag ?list)) ((Bag tallying| tallying> ?value ?list))
2
3 <> (tallying> ?value ())
4 (<tallying ((Entry ?value 1) ()))
5
6 <> (tallying> ?value ((Entry ?value ?count) ?rest))
7 (<tallying ((Entry ?value @add ?count 1) ?rest))
8
9 <> (tallying> ?value (?entry ?rest))
10 ((?entry tallying> ?value ?rest))
capitalex's Avatar

capitalex / fib.formal

0 лайк(-ов)
0 форк(-ов)
2 файл(-ов)
Последняя активность 2 years ago
1 <> (defer ?x) (?x)
2
3 <> ((Num 0) + (Num ?n)) ((Num ?n))
4 <> ((Num ?n) + (Num 0)) ((Num ?n))
5 <> ((Num ?x) + (Num ?y)) ((Num @add ?x ?y))
6
7 <> (fib (Num 0)) ((Num 0))
8 <> (fib (Num 1)) ((Num 1))
9 <> (fib (Num ?n)) (defer fib (Num @sub ?n 1) + defer fib (Num @sub ?n 2))
capitalex's Avatar

capitalex / hello-world-bytes.nv

0 лайк(-ов)
0 форк(-ов)
1 файл(-ов)
Последняя активность 2 years ago
1 || load HELLO, load SP, load WORLD, load NL, print
2
3 |load HELLO|
4 , @b1[3], @b1[6]
5 , @b2[0], @b2[2], @b2[6]
6 , @b3[2], @b3[3], @b3[6]
7 , @b4[2], @b4[3], @b4[6]
8 , @b5[0], @b5[1], @b5[2], @b5[3], @b5[6]
9
10 |load SP|
Новее Позже

Работает на Opengist ⋅ Load: 222ms⋅

Русский