Epple-II/rom/stdout.s65
Christopher A. Mosher e39092ede5 Merge in Epple-II-Rom
2015-07-14 23:43:52 -04:00

34 lines
432 B
Plaintext

YSAV1 = $35
STKBAS = $0100
LATCHC = $C080
COUT = $FDF0
MONRTS = $FF58
STDOUT STY YSAV1
PHA
TXA
PHA
JSR MONRTS
TSX
LDA STKBAS,X
ASL
ASL
ASL
ASL
TAX
PLA
TAY
PLA
STA LATCHC,X
PHA
TYA
TAX
PLA
LDY YSAV1
JMP COUT