thing.s


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18

ACIA_DATA	= $5000
ACIA_STATUS	= $5001
ACIA_CMD	= $5002
ACIA_CTRL	= $5003

_start:
  lda #$64
  jsr CHROUT
  BRK

CHROUT:
                pha
                sta     ACIA_DATA
                lda     #$FF
.txdelay:       dec
                bne    .txdelay
                pla
                rts