blob: 21a4969b3d0ca3143d6d0b0c5abfab7755fb5e99 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
.fopt compiler,"cc65 v 2.12.9"
.setcpu "6502"
.smart on
.autoimport on
.case on
.debuginfo off
.importzp sp, sreg, regsave, regbank, tmp1, ptr1, ptr2
.macpack longbranch
.export _fuji_putchar
.segment "CODE"
_fuji_putchar:
tax
;lda $E407 ; don't use ROM, might be running COL80
lda $0347 ; grab from IOCB 0 instead
pha
;lda $E406
lda $0346
pha
txa
rts
|