1
0
mirror of https://github.com/hsoft/collapseos.git synced 2024-11-05 21:30:56 +11:00
collapseos/blk/731

13 lines
339 B
Plaintext

H@ ORG !
JMP8, L1 FWR8 ( start )
L2 BSET ( msg ) ," Hello, World!" 0 A,
L1 FSET ( start )
CLI, AH 0 MOVri, AL 2 MOVri, 0x10 INT,
SI L2 @ ( msg ) MOVrI, AH 0x0e MOVri,
L1 BSET ( loop ) LODSB, AL AL ORrr,
JZ, L2 FWR8 ( next ) 0x10 INT,
JMP8, L1 ( loop ) BWR
L2 FSET ( next ) AH 0 MOVri, 0x16 INT,
AH 0x0e MOVri, 0x16 INT, HLT,
PC ORG @ DUMP