1
0
mirror of https://github.com/hsoft/collapseos.git synced 2024-11-28 01:38:05 +11:00
collapseos/blk/311

17 lines
269 B
Plaintext
Raw Normal View History

2020-04-23 11:19:12 +10:00
( Low-level part of ROLL. Example:
"1 2 3 4 4 (roll)" --> "1 3 4 4". No sanity checks, never
call with 0. )
CODE (roll)
HL POPqq,
B H LDrr,
C L LDrr,
SP ADDHLss,
HL INCss,
D H LDrr,
E L LDrr,
HL DECss,
HL DECss,
LDDR,
;CODE