Összes gist

capitalex's Avatar

capitalex / final-digits.txt

0 Kedvelések
0 forkok
1 fájlok
Utoljára aktív 1759548301
1 __| 1 2 3 4 5 6 7 8 9
2 1 | 1 2 3 4 5 6 7 8 9
3 2 | 2 4 6 8 0 2 4 6 8
4 3 | 3 6 9 2 5 8 1 4 7
5 4 | 4 8 2 6 0 4 8 2 6
6 5 | 5 0 5 0 5 0 5 0 5
7 6 | 6 2 8 4 0 6 2 8 4
8 7 | 7 4 1 8 5 2 9 6 3
9 8 | 8 6 4 2 0 8 6 4 2
10 9 | 9 8 7 6 5 4 3 2 1
capitalex's Avatar

capitalex / objects.lua

0 Kedvelések
0 forkok
1 fájlok
Utoljára aktív 1759344778
1 local player = Thing()
2 :has { t = 0, x = 0, y = 0, w = 32, h = 32 }
3 :is { "player", "solid" }
4 :when "dead"
5 :on_start(function(self)
6 self:broadcast "player died"
7 end)
8 :mimic "alive" "draw"
9 :when "alive"
10 :does "update" (function(self, dt)
june's Avatar

june / Propagators (Draft)

0 Kedvelések
0 forkok
1 fájlok
Utoljára aktív 1759333592
A quick demonstration of building propagators from scratch.
1 ||:@include: lib/rpn.nv
2
3 ||:: a = b + c
4 ||:: d = a + # 1
5 ||:: b = 1
6 ||:: c = 2
7
8 |:: $x = $y $op $z|
9 :: create some cells :names: ($x $y $z)
10 :: create an operator
capitalex's Avatar

capitalex / halfass.min

0 Kedvelések
0 forkok
1 fájlok
Utoljára aktív 1759287386
1 (symbol make-wiki (==>) (args rest first build-sitemap-for)) ::
2
3 (symbol build-sitemap-for
4 (str :dir ==>) (get-wiki-pages make-list-of-links write-wiki)
5 ) ::
6
7 (symbol get-wiki-pages
8 (==>) (
9 get-files get-filenames ("index.html" ==) reject '> sort
10 )
capitalex's Avatar

capitalex / update.min

0 Kedvelések
0 forkok
1 fájlok
Utoljára aktív 1759283371
1 (symbol update
2 (quot|dict :structure quot :path quot :operation ==> quot|dict :updated) (
3 path first :index
4 (
5 ((path size 1 == structure "quot" type? and) (
6 structure structure index get operation -> index set @updated
7 ))
8
9 ((path size 1 == structure "dict" type? and) (
10 structure structure index dict.get operation -> index dict.set @updated
june's Avatar

june / Variables and math expressions.

0 Kedvelések
0 forkok
1 fájlok
Utoljára aktív 1759255931
An example of adding basic variable bindings and binary math expressions to Nova.
1 ||:: foo = bar
2 :: bar = baz
3 :: baz = 2
4 :: quux = foo
5 :: baz = bar + foo
6 :: baz = baz + quux
7 :: baz = baz + baz
8
9
10 ||:@include: lib/rpn.nv
kapunta's Avatar

kapunta / Thue.Mod

0 Kedvelések
0 forkok
1 fájlok
Utoljára aktív 1758126370
Thue for Oberon
1 MODULE Thue;
2 IMPORT Texts, Oberon;
3
4 CONST MaxB = 10000;
5 MaxRules = 1000;
6
7 VAR W: Texts.Writer;
8 B: ARRAY MaxB OF CHAR;
9 S, NS, NR: INTEGER;
10 L, R: ARRAY MaxRules OF RECORD s, n: INTEGER END;
electricwah's Avatar

electricwah / latest-compiler-progress.nv

0 Kedvelések
0 forkok
1 fájlok
Utoljára aktív 1757402925
1 || '@include' (lib/platforms/browser_dom.nv lib/math.nv)
2
3 || :DOM: ( <query #code-actions <@after #out or textarea id = out value = [] )
4 | :: output :current dom element: $out? |
5 :@js: $out.value += (stacks['final out'].map(x=>x.join(' ')).toReversed().join('\n')+'\n'); delete stacks['final out'];
6
7 | :: breakpoint |
8 | :: breakpoint | :@js: me.gas = 0;
9
10 | :: get cause 1 |
electricwah's Avatar

electricwah / complete-generic-compiler.nv

0 Kedvelések
0 forkok
1 fájlok
Utoljára aktív 1757375455
1 | :: get cause 1 |
2 :stack: A
3 :pattern: . a
4 . b
5 . variable c
6 . d
7 . variable e
8 :index: ( 0 1 2 3 4 )
9 | :: get cause 2 |
10 :stack: A
electricwah's Avatar

electricwah / combined_compiler.nv

0 Kedvelések
0 forkok
1 fájlok
Utoljára aktív 1757361383
1 | :: get cause 1 |
2 :stack: A
3 :pattern: . a
4 . b
5 . variable c
6 . d
7 . variable e
8 :index: ( 0 1 2 3 4 )
9 | :: get cause 2 |
10 :stack: A
Újabb Régebbi

Ez az oldal Opengist alapú ⋅ Load: 205ms⋅

Magyar