etc/uxn
0
0
Fork 0
mirror of https://git.sr.ht/~rabbits/uxn synced 2024-11-29 09:13:01 +00:00
Code Issues Projects Releases Wiki Activity

(sierpinski) Housekeeping

Browse source
This commit is contained in:
Devine Lu Linvega 2024-03-07 16:20:57 -08:00
parent c39f8f20dd
commit 901c7bb9a3
1 changed files with 4 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
projects/examples/exercises/sierpinski.tal
View file

@ -1,7 +1,6 @@
( uxncli sierpinski.rom ) ( uxncli sierpinski.rom )
|100 @on-reset ( -> ) @on-reset ( -> )
[ LIT &size 20 ] STHk #01 SUB [ LIT &size 20 ] STHk #01 SUB
&ver ( -- ) &ver ( -- )
DUP DUP
@ -17,8 +16,7 @@
INC ADDk STHkr LTH ?&fill INC ADDk STHkr LTH ?&fill
POP2 POP2
#0a18 DEO #0a18 DEO
#01 SUB DUP #ff NEQ ?&ver #01 SUB INCk ?&ver
POP POPr POP POPr
BRK
BRK