1
0
mirror of https://github.com/hsoft/collapseos.git synced 2024-12-26 16:28:06 +11:00
collapseos/blk/288

11 lines
346 B
Plaintext
Raw Normal View History

PC ORG @ 0x22 + ! ( litWord, 0xf7, tight on the 0x100 limit )
2020-04-23 11:19:12 +10:00
( Like numberWord, but instead of being followed by a 2 bytes
number, it's followed by a null-terminated string. When
called, puts the string's address on PS )
IY PUSHqq, HL POPqq, ( <-- IP )
2020-05-25 10:50:26 +10:00
E (HL) LDrr, D 0 LDrn,
2020-05-26 10:28:30 +10:00
DE INCss,
2020-05-25 10:50:26 +10:00
DE ADDIYss,
2020-05-26 10:16:07 +10:00
HL PUSHqq,
2020-04-23 11:19:12 +10:00
JPNEXT,