10 ; 20 ;PRTSMPLE 30 ; 40 TXTBUF = $504C 50 OPNSCR = $5003 60 PRNT = $5031 70 ; 80 EOL = $9B 90 ; 0100 *= $0650 0110 ; 0120 TEXT .BYTE "HELLO FROM ANTIC MAGAZINE",EOL 0130 ; 0140 RSPONS 0150 ; 0160 LDX #0 0170 LOOP 0180 LDA TEXT,X 0190 STA TXTBUF,X 0200 CMP #$9B 0210 BEQ FINI 0220 INX 0230 JMP LOOP 0240 FINI 0250 JSR OPNSCR 0260 JSR PRNT 0270 INFIN 0280 JMP INFIN
Back to previous page