SÜPER COMMODORE POSTER

Turgay Ülker · 64'ler sayı 11, Şubat 1989 · sayfa 58, 59

LOAD ERROR

Kasetten yüklediğiniz herhangi bir program LOAD-ERROR veriyorsa, bu programın bozuk olduğunu göstermez. İlk olarak programın listesini (LIST) alın ve eğer program hafızada gözüküyorsa POKE 45, PEEK (831): POKE 46, PEEK (832): CLR komutlarını yazdıktan sonra programı başka bir yere kaydedin ve çalıştırın, belki program şimdi çalışıyordur.

PERIPHERIE

X- PEEK (56297) Paddle 1 kontrol, PEEK (54298) Paddle 2 kontrol - PEEK (186) Hangi aletin bağlı olduğunu gösterir (1- TEYP 2- DISK) Lightpen yatay konum

X- PEEK (53267)

PEEK (53268) Lightpen düşey konum, POKE 37148,252 Teyp motorunu kapama, POKE 192,1 Teyp motoru kontrol altında, POKE 192,0 Teyp motoru normal (1) Teyp düğmesi basılı

55- Basılı düğme yok, 89- Düğme basılı fakat program çalışmıyor.

DİSK KOMUTLARI

LOAD “8”, 8 Disketin içindeki program listesini verir LOAD “SA*”, 8 Diskette A harfi ile başlayan programları listeler LOAD “İSİM”, 8: (SHIFT RUN-STOP) ismi verilen program dolunca otomatikman çalışır. Disket formatlama İnitalize etme Program silme Validate etme Disketteki tüm programları siler SEÇ File silme PGM File silme REL File silme USR File silme

OPEN15,8,15,'N:İSİM,ID”
IPEN15,8,15,“1
OPEN15,8,15,*S:İSİM,..”
OPEN15,8,15,

ger”

OPEN15,8,15,*8:* <8”
OPEN15,8,15,“8:
OPEN15,8,15,“8:*

Program ismi değiştirme PRINT PEEK (152) Açık olan file sayısını verir sys 6551

Tüm fileleri kapatır deroisinin

PROGRAMLARI BİRBİRİNE BAĞLAMA Aşağıda yazılı program rutini sayesinde programlarınızı birleştirebilirsiniz. Unutmamanız gereken tek şey Basic programlarının başlangıcı hafızanın 43-44 adresleri ve bitişinin olduğudur. İlk programınızı doldurduktan sonra: PRINT PEEK(44) — komutlarını yazıp RETURN tuşuna basın, ekranda rakam belirecektir. Bu rakamları dikkatlice not ediniz ve POKE 43,(PEEK(45)-1) AND 255 : POKE 44,(PEEK(45)-1) / 256

Şimdi ikinci programınızı LOAD komutu ile yükleyiniz. Yükleme işlemi bittikten sonra

POKE 43, ilk not ettiğiniz rakam : POKE 44, ikinci not ettiğiniz rakam

Şimdi LIST

komutunu verdiğinizde her iki programın da art arda sıralandığını göreceksiniz. Yalnız birleştirmelerde, eklenecek ikinci programın satır numaraları daima ilk programınkinden büyük olmalıdır. WAIT KOMUTU: Normal olarak program içerisinde bir şey istendiğinde GET A$:IF A$="" THEN .... şeklinde programlanır. Aynı şeyi daha bilinçli yapmak istiyorsak: POKE 198,0: WAIT 198,1: POKE 198,0 şeklinde yazmalıyız. Aşağıda sizlere birtakım alternatifler

WAIT 653,1 SHIFT tuşunun basılmasını bekler WAIT SHIFT tuşunun basılıp bırakılmasını bekler JOYSTICK ateş buttonuna basılmayı bekler (PORT 1) WAIT 56564,16,16 JOYSTICK ateş buttonuna basılmayı bekler (PORT 2)

JOYSTICK PROGRAMLAMA:

WAIT 145,16,16

PRINT PEEK (56321) —PORT 1
PRINT PEEK (56820) —PORT 2
HAREKET PI1 P2 HAREKET P 1 PR
ATEŞ 239 1 250 122
254 126 R45 nz
258 125 g4 36 18
147 no 2 249 121
128 R55
hedivesidir.

DORE POSTER

NO LIST

10 REM” * REVERS ON SHİFT*M
SHIFT + S

Tırnak işaretlerinden sonra çerçeve içerisindeki tuşlara basınız. Bu ufak Trick sayesinde programınızın listesi alınmak istendiğinde ekran kendini tamamıyla silecektir.

TIPS & TRICKS

Basic başlangıcının adresi:
PRINT PEEK (48) *2564*PEEK (44)
ic sonunun adresi
PRİNT PEEK (46)
Bir programın kaydedilmesini önlemek için:
POKE 801,0: POKE 802,0: POKE 818.165
Kursor Ayarı:
POKE 814, Satır: POKE 211, Sutun: SYS 58460
Modul proğramlarını kaydetmek için:
POKE 43,0:POKE 44,128: POKE 25,0: POKE 46,192:
SAVE “İSİM”, 8 Yüklerken LOAD “İSİM”, 8.1
Programla — bir satırı silebilme:
POKE 781, Satır No: SYS 59908
RE-NEW (Her proğram için geçerli olmayabilir!):
POKE 2049,1: POKE 2050,1:8YS 42291
Basic işlemdeki satırı bulabilmek
için:
PRINT PEEK (574256'PEEK (58)
SCROLLING ESNASINDA KALICI BAŞLIK
"OR TI 49151: POKE 1, PEEKÇ
2Ü FOR TO 65535: POKE 1,
50 POKE 59689, 10: POKE 1,58

Satır 80'de POKE 59639 kalıcı başlık satırını belirler -1 (9 kalıcı satır için POKE 59639,10). POKE 1,55 normal durum

SYS PEEK & POKE

POKE 19,64 Soru işaretsiz INPUT
POKE 19,0 — INPUT normal
POKE 646,X — Karaker rengi
POKE 120,2 — CBM Bloke etme
POKE — 58265,27 Ekran açık
POKE 58265,11 Ekran kapalı
POKE — 53265,59 Hires modu
POKE — 58265,16 Multicolor modu
POKE 768,185 Hata mesajını kapama
POKE 768,139 Hata mesajını açma
POKE — 36864,XX Ekran ayarı
POKE — 36865,XX Ekran ayarı

(yatay-düşey olarak)

POKE
POKE
POKE
POKE
POKE
POKE
POKE
POKE
POKE
POKE
POKE
POKE
POKE
POKE
sys
sys
SYS
sys
PRİNT
PRINT
PRINT
PRINT
CHR$
1024
55296
59152
2048
2276
56325,5
808,225
7751
199,1
199,0
649,0
649,10
788,52
650,128
650,0
204,0
154
2,58
65499
65511
64738
65126
PEEK (197)
PEEK (646)
PEEK (678)
PEEK (144)

(58) — 2028 — 56295 — 5847 — 40360 — 40560

EYL OYUN AÇIKLAMALARI DER Kursor hızı RUN STOP - RESTORE fonksiyon dışı Listelemeyi engeller İnvers ekran Normal ekran Klavyeyi bloke etme Klavye normal STOP fonksiyon dışı Listelemeyi engeller Tüm tuşlar AUTO fonksiyonu kazanır Tüm tuşlar normal GET komutundan evvel kursor açık BASIC devre dışı SYSTEM devre dışı File kapama Soğuk reset (açma kapama) Sıcak reset (RUN STOP - RESTORE) En son basılan tuşu verir Kullanılan karakter rengini belirtir İmal edildiği yeri gösterir 1- Avrupa 2- USA Kaset için hata mesajı

16 okuma, kaydetme hatası 82 — kontrol hatası

64 — file bitimi 124 — Band bitimi İki nokta üst üste Ekran hafızası Renk hafızası Hafıza $C000 - $CFFF Basic alanı Modül alanı $8000'den itibaren

Rastgele sayıları programlama:

N=INT(RND(1)*Y)+X

X- Altsınır Y-

Bu poster

Copyright: 64'ler için Turgay Ülker tarafından hazırlanmıştır. Her hakkı 64'ler dergisine aittir. Kısmen dahi iktibas edilemez.