34 lines
457 B
Tal
34 lines
457 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
|
|
#02 #04 SUB
|
|
( mem-test )
|
|
BRK
|
|
|
|
@mem-test ( a b c -- x)
|
|
!{
|
|
&a $1
|
|
&b $1
|
|
&c $1
|
|
}
|
|
,/a STR
|
|
,/b STR
|
|
,/c STR
|
|
|
|
,/a LDR
|
|
,/b LDR
|
|
ADD
|
|
,/c LDR
|
|
ADD ( 06 )
|
|
|
|
STH
|
|
#00 STH
|
|
SWP2r
|
|
JMP2r
|
|
|
|
|
|
|
|
( !{ &a $1 } )
|