uxn/projects/examples/devices/console.echo.tal

21 lines
213 B
Tal
Raw Normal View History

( dev/console )
2021-06-28 12:40:29 -04:00
%RTN { JMP2r }
|10 @Console [ &vector $2 &read $1 &pad $5 &write $1 ]
( init )
|0100 ( -> )
2021-06-28 12:40:29 -04:00
;on-stdin .Console/vector DEO2
2021-06-28 12:40:29 -04:00
BRK
@on-stdin ( -> )
2021-06-28 12:40:29 -04:00
.Console/read DEI .Console/write DEO
BRK