d6
/
uxn
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

(sierpinski) Housekeeping

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

6
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