1
0
mirror of https://github.com/hsoft/collapseos.git synced 2024-11-06 01:00:55 +11:00
collapseos/blk/321

16 lines
240 B
Plaintext
Raw Normal View History

2020-04-23 11:19:12 +10:00
BEGIN, ( loop )
SCF,
C RL,
2020-04-23 11:19:12 +10:00
RLA,
HL ADCHLd,
DE SBCHLd,
2020-04-23 11:19:12 +10:00
IFC,
DE ADDHLd,
2020-04-23 11:19:12 +10:00
C DECr,
THEN,
DJNZ, AGAIN, ( loop )
B A LDrr,
HL PUSH,
BC PUSH,
2020-04-23 11:19:12 +10:00
;CODE