collapseos/blk/821

7 lines
180 B
Plaintext
Raw Normal View History

CODE BYE BEGIN, JMPs, AGAIN, ;CODE
CODE EMIT
AX POPx, AH 0x0e MOVri, ( print char ) 0x10 INT,
;CODE CODE 0 AX AX XORxx, AX PUSHx, ;CODE
: BOOT 'Z' 1+ 'A' DO I EMIT LOOP BYE ;