Sayfa 21

sta ($fb),y ;kaydırıp geri yazıyoruz

iny ;2. data için arttır.

lda ($fb),y ;2. datayı oku ve byte2 lsr ;bir kez sağa kaydır

sta ($fb),y ;Sonra geri yaz

iny ;3. data için arttır.

iny ;4. data için arttır.

iny ;5. data için arttır.

iny ;6. data için arttır.

lda ($fb),y ;6. datayı oku ve byte6 asl ;bir kez sola kaydır.

sta ($fb),y ;Sonra geri yaz.

iny ;7. dta için arttır.

lda ($fb),y ;7. datayı oku ve byte7 asl ;bir kez sola kaydır.

sta ($fb),y ;Sonra geri yaz.

iny

;8. data için arttır.

lda ($fb),y ;8. datayı oku ve byte8 asl ;bir kez sola kaydır.

sta ($fb),y ;Sonra geri yaz

iny ;Bir sonraki karakterin

bne nextchar ;ilk datası için arttır. ;"0" olmadıysa tekrar

inc $fc ;RAM HIGH adresi arttır.

dex ;Blok sayıcısını azalt.

bne nextchar ;"0" olmadıysa tekrar

rts ;Programı bitir. ;--------------------------------------------; ;NOT : Program listesindeki "asl" komutları ;"lsr" ve "lsr" komutları "asl" olarak ;değiştirilirse yeni karakter seti sola italik ;olur. ;--------------------------------------------;

.end

Derginin bir sonraki sayısında bütün karakter setini başaşağı çevireceğiz. İsteyen uğraşabilir ve çözümünü .txt dosyası olarak bana gönderebilir. Veya sadece program ile değişik bir karakter seti yaparsanız dergide yayınlayabilirim. Şimdiden iyi çalışmalar....

SET

1

2

ADRES D000-D1FF D200-D3FF D400-D5FF D600-D7FF D800-D9FF DA00-DBFF DC00-DDFF DE00-DFFF

VIC-II ROM GÖRÜNTÜSÜ

1000-11FF 1200-13FF 1400-15FF 1600-17FF 1800-19FF 1A00-1BFF 1C00-1DFF 1E00-1FFF

AÇIKLAMA Büyük harf karakterler

Grafik karakterleri Büyük harf karakterler (negatif)

Grafik karakterleri (negatif)

Küçük harf karakterler Büyük harf ve grafik karakterler

Küçük harf karakterler (negatif) Büyük harf ve grafik karakterler (negatif)

ONLU KARAKTER SETİ ADRESİ

$0000-$07FF $0800-$0FFF $1000-$17FF $1800-$1FFF $2000-$27FF $2800-$2FFF $3000-$37FF $3800-$3FFF

0 2048 4096 6144 8192 10240 12288 14336

$D018 DEĞERİ

$10 (16) $12 (18) $14 (20) $16 (22) $18 (24) $1A (26) $1C (28) $1E (30)

(Tablo-1)

(Tablo-2)