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

(console.write.tal) Added output example to /error port

This commit is contained in:
neauoire 2023-10-26 11:29:49 -07:00
parent 413f3a82f8
commit 187f92d31d
2 changed files with 13 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
projects/examples/devices/console.write.tal
View File

@ -5,12 +5,18 @@
|0100 |0100
@on-reset ( -> ) @on-reset ( -> )
;text ( | write )
&while ( -- ) { "Hello 20 "Write 0a 00 }
STH2r
&wa ( -- )
LDAk .Console/write DEO LDAk .Console/write DEO
INC2 LDAk ?&while INC2 LDAk ?&wa
POP2
( | error )
{ "Hello 20 "Error 0a 00 }
STH2r
&wb ( -- )
LDAk .Console/error DEO
INC2 LDAk ?&wb
POP2 BRK POP2 BRK
@text
"Hello $1

2
src/uxn.c
View File

@ -13,7 +13,7 @@ WITH REGARD TO THIS SOFTWARE.
/* Registers /* Registers
[ Z ][ Y ][ X ][ L ][ N ][ T ] < [ Z ][ Y ][ X ][ L ][ N ][ T ] <
[ . ][ . ][ . ][ H2 ][ T ] < [ . ][ . ][ . ][ H2 ][ . ] <
[ L2 ][ N2 ][ T2 ] < [ L2 ][ N2 ][ T2 ] <
*/ */