text lookup table
ORG $4800
JMP START
LOOKLO DFB #$00,#$80,#$00,#$80
DFB #$00,#$80,#$00,#$80
DFB #$28,#$A8,#$28,#$A8
DFB #$28,#$A8,#$28,#$A8
DFB #$50,#$D0,#$50,#$D0
LOOKHI DFB #$04,#$04,#$05,#$05
DFB #$06,#$06,#$07,#$07
DFB #$04,#$04,#$05,#$05
DFB #$06,#$06,#$07,#$07
DFB #$04,#$04,#$05,#$05
XLOCATION DFB #00 ;HORIZONTAL COORDINATE
YLOCATION DFB #00 ;VERTICAL COORDINATE
CHARACTER DFB #00 ;VALUE OF CHARACTER TO DISPLAY
START LDY YLOCATION
LDX XLOCATION
LDA LOOKLO,Y ;GET TEXT SCREEN
STA STOR+1 ;VERTICAL LINE ADDRESS
LDA LOOKHI,Y ;AND MODIFY CODE BELOW
STA STOR+2
LDA CHARACTER ;LOAD A WITH CHARACTER TO DISPLAY
STOR STA $4000,X ;STORE IT TO SCREEN WITH HORIZ
RTS ;VALUE AS OFFSET