FUTURİSTİK KARAKTER SETİ PROGRAMI

• Makine dili / Assembler
• Grafik ve çizim
• Program dökümü

KARAKTER SET NO: 5

(C64ASM V1.1 ile compile edilecek şekilde yazılmıştır.)

*=$0801 
.word nextline 
.word 2004  
; 2003 
.byte $9e 
; SYS 
.text "2061" 
; 2061 
.byte 0 
; komutu 
nextline 
.word 0 
sei 
lda 
#$33 
sta 
$01 
lda 
#$d0 
ldx 
#$30 
ldy 
#$00 
sty 
$fb 
sta 
$fc 
sty 
$fd 
stx 
$fe 
ldx 
#$10 
transfer 
lda 
($fb),y 
sta 
($fd),y 
iny 
bne 
transfer 
inc 
$fc 
inc 
$fe 
dex 
bne 
transfer 
lda 
#$37 
sta 
$01 
cli 
lda 
#$1c 
sta 
$d018 
new_fonts 
lda 
#$30 
ldy 
#$00 
sty 
$fb 
sta 
$fc

C64 TÜRKİYE  #7                                                                                                                                              15 
ldx 
#$10 
stx 
$fd 
loop1  
iny 
iny 
iny 
ldx 
#$04 
loop0  
lda 
($fb),y 
lsr 
ora 
($fb),y 
sta 
($fb),y 
iny 
dex 
bne 
loop0 
iny 
bne 
loop1 
inc 
$fc 
dec 
$fe 
bne 
loop1 
rts 
.end