uxn-notebook/playground.tal

43 lines
739 B
Tal

|00 @System &vector $2 &expansion $2 &wst $1 &rst $1 &metadata $2 &r $2 &g $2 &b $2 &debug $1 &state $1
|10 @Console &vector $2 &read $1 &pad $4 &type $1 &write $1 &error $1
|0100
@on-reset
#01
#00
#00
#00
#00
#00
#00
#01
build-byte
(
#0a ( b )
#10 SFT ( b )
#00 ( b 00 )
?{ #01 ORA }
)
BRK
@build-byte ( p p p p p p p p )
LITr 00 ( p p p p p p p p | 00 )
?{ LITr 01 ORAr }
LITr 10 SFTr
?{ LITr 01 ORAr }
LITr 10 SFTr
?{ LITr 01 ORAr }
LITr 10 SFTr
?{ LITr 01 ORAr }
LITr 10 SFTr
?{ LITr 01 ORAr }
LITr 10 SFTr
?{ LITr 01 ORAr }
LITr 10 SFTr
?{ LITr 01 ORAr }
LITr 10 SFTr
?{ LITr 01 ORAr }
STHr
JMP2r