f2f520cacc
There is now no more actual code in stable ABI, only references. This makes refactoring of this code much easier. For example, changing IY to BC as the IP register.
13 lines
555 B
Plaintext
13 lines
555 B
Plaintext
H@ ORG ! ( STABLE ABI )
|
|
0 JP, ( 00, main ) NOP, ( unused ) NOP, NOP, ( 04, BOOT )
|
|
NOP, NOP, ( 06, uflw ) NOP, NOP, ( 08, LATEST ) NOP, ( unused )
|
|
0 A, 0 JP, ( 0b, EXIT ) NOP, ( unused )
|
|
0 JP, ( RST 10 ) NOP, NOP, NOP, NOP, NOP, NOP, NOP, ( unused )
|
|
0 JP, ( 1a, next ) NOP, NOP, NOP, ( unused )
|
|
0 JP, ( RST 20 ) 0 A, 0 JP, ( 23, (n) ) NOP, ( unused )
|
|
0 JP, ( RST 28 ) 0 A, 0 JP, ( 2b, (s) ) NOP, ( unused )
|
|
0 JP, ( RST 30 ) 0 A, 0 JP, ( 33, 2>R ) NOP, ( unused )
|
|
0 JP, ( RST 38 )
|
|
0 A, 0 JP, ( 3b, (br) ) 0 A, 0 JP, ( 3f, (?br) )
|
|
0 A, 0 JP, ( 43, (loop) )
|