mirror of
https://github.com/hsoft/collapseos.git
synced 2024-11-05 15:00:55 +11:00
17 lines
211 B
Plaintext
17 lines
211 B
Plaintext
CODE >R
|
|
HL POPqq,
|
|
17 BCALL, ( 17 == pushRS )
|
|
;CODE
|
|
CODE R>
|
|
20 BCALL, ( 20 == popRS )
|
|
HL PUSHqq,
|
|
;CODE
|
|
CODE 2R>
|
|
20 BCALL, ( 20 == popRS ) EXDEHL, 20 BCALL,
|
|
HL PUSHqq, DE PUSHqq,
|
|
;CODE
|
|
|
|
|
|
|
|
|