uxn11/demo/xclock.tal

26 lines
856 B
Tal
Raw Normal View History

2024-09-04 20:08:42 -04:00
( xclock.tal )
( )
( runs xclock. when the ROM exits xclock should exit too. )
@Console
|10 &vector $2 ( called when input is ready )
|12 &read $1 ( read an input byte, e.g. from stdin )
( 13 - 14 padding )
|15 &live $1 ( subprocess: 01 alive, ff dead, 00 not running )
|15 &exit $1 ( subprocess: exit code if dead )
|17 &type $1 ( input type: 01 stdin, 02 arg, 03 end of arg, 04 end of args )
|18 &write $1 ( byte to write to stdout )
|19 &error $1 ( byte to write to stderr )
( 1a - 1b padding )
|1c &addr $2 ( subprocess: addr of string to run with /bin/sh -c )
|1e &mode $1 ( mode bits: 01 write stdin, 02 read stdout, 04 read stderr, 08 kill only )
|1f &exec $1 ( subprocess: run command )
|0100
;cmd .Console/addr DEO2
#00 .Console/mode DEO
#01 .Console/exec DEO
BRK
@cmd "xclock 00