home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Antic Magazine 1984 December
/
Antic_Magazine_1984_12_Antic.atr
/
prtsmple.asm
< prev
next >
Wrap
Assembly Source File
|
2023-02-26
|
421b
|
1 lines
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¢