mirror of https://github.com/hsoft/collapseos.git
17 lines
201 B
Plaintext
17 lines
201 B
Plaintext
|
CODE !
|
||
|
|
HL POPqq,
|
||
|
|
DE POPqq,
|
||
|
|
chkPS,
|
||
|
|
(HL) E LDrr,
|
||
|
|
HL INCss,
|
||
|
|
(HL) D LDrr,
|
||
|
|
;CODE
|
||
|
|
CODE @
|
||
|
|
HL POPqq,
|
||
|
|
chkPS,
|
||
|
|
E (HL) LDrr,
|
||
|
|
HL INCss,
|
||
|
|
D (HL) LDrr,
|
||
|
|
DE PUSHqq,
|
||
|
|
;CODE
|