diff options
| author | elioat <elioat@tilde.institute> | 2022-10-11 22:58:44 -0400 |
|---|---|---|
| committer | elioat <elioat@tilde.institute> | 2022-10-11 22:58:44 -0400 |
| commit | 4658e2bc21fc28e030b9f43999a98cd345b795aa (patch) | |
| tree | 7bd874e1f2b425e2c0ad02b1806e39fce687c2db /uxntal | |
| parent | cb5d4906734d32d0bd6f0dd294300c2bb121a854 (diff) | |
| download | tour-4658e2bc21fc28e030b9f43999a98cd345b795aa.tar.gz | |
*
Diffstat (limited to 'uxntal')
| -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 |