1
0
mirror of https://github.com/hsoft/collapseos.git synced 2024-11-06 01:30:55 +11:00
collapseos/blk/329
2020-04-22 21:19:12 -04:00

17 lines
232 B
Plaintext

CODE CMP
HL POPqq,
DE POPqq,
chkPS,
DE SUBHLss,
BC 0 LDddnn,
IFNZ, ( < or > )
BC INCss,
IFNC, ( < )
BC DECss,
BC DECss,
THEN,
THEN,
BC PUSHqq,
;CODE