diff --git a/projects/examples/exercises/sierpinski.tal b/projects/examples/exercises/sierpinski.tal index 0ed3376..eb51695 100644 --- a/projects/examples/exercises/sierpinski.tal +++ b/projects/examples/exercises/sierpinski.tal @@ -1,7 +1,6 @@ -( uxncli sierpinski.rom ) - -|100 @on-reset ( -> ) +( uxncli sierpinski.rom ) +@on-reset ( -> ) [ LIT &size 20 ] STHk #01 SUB &ver ( -- ) DUP @@ -17,8 +16,7 @@ INC ADDk STHkr LTH ?&fill POP2 #0a18 DEO - #01 SUB DUP #ff NEQ ?&ver + #01 SUB INCk ?&ver POP POPr - -BRK + BRK