diff options
Diffstat (limited to 'uxntal/exit.tal')
-rw-r--r-- | uxntal/exit.tal | 27 |
1 files changed, 27 insertions, 0 deletions
diff --git a/uxntal/exit.tal b/uxntal/exit.tal new file mode 100644 index 0000000..4e26dd7 --- /dev/null +++ b/uxntal/exit.tal @@ -0,0 +1,27 @@ +( exit ) + +|10 @Console &vector $2 &read $1 &pad $5 &write $1 &error $1 + +|0100 ( -> ) + + ( set vector ) + ;on-console .Console/vector DEO2 + + ( print hello ) + ;hello-txt + + &while + LDAk .Console/write DEO + INC2 LDAk ,&while JCN + POP2 + + ( exit ) + #010f DEO + +BRK + +@on-console ( -> ) + +BRK + +@hello-txt "Hello 20 "Uxn! $1 |