Bu sayfadaki yazılar
Sayfanın metni
Sayfa 16
* Izi T 38:PRİNT "<RYSOF "|; PRİNT " <CTRL-4><RVSON2>";:FOR Izi T O 38:PRINT "P";:NEXT "<RVSOF PRİNT " <CTRL- 4><RVSON>";:FOR Izi T O 38:PRİNT "<RVSOF Fy"; PRINT "* Izi TO " "; FRINT " <RVSÜFF 24057)"; :FOR Isi TO 38:PRIİINT " "; PRİNT REM FOR TO 17:PRİNT "<40SPACE>”"; KT PRİNT "<HOME>"; FOR 151384 TO 2023:POKE 1,248:POKE
BRINT "<HOME GOTO 88 END PRİNT SAYISI < " İNPUT
RETURN PRİNT "<HOME >< ><CTRL- BİTTİ - BOSLUK TUSUNA BASIN "138,08 GET âA$:1F A$<>" " THEN RUN 65 PRİNT LU ILİ KISMI 1549152 PRINT "KALAN
DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA DATA
Klavyeyle gezinmek için ← ve → tuşları.
Sayfa 17
Amiga gibi aletlerde, ekrandaki bir ok işareti, maus adı verilen bir araç yardımıyla hareket ettirilir. Bu oku bir tür cursor sayabiliriz. Peki Commodore 64 için de böyle bir şey yapılamaz mı? Bizim bir cursor'umuz zaten var. Maus yerine de joystick'i kullansak?
Şimdi programı MDE ile yazıp bir yerlere kaydedin. Sonra da normal LOAD ile yükleyip RUN ile çalıştırın. Görünürde bir şey olmayacak. Şimdi joystick'inizi PORT 2'ye takın ve kolu hareket ettirin. Cursor'un, kolun gösterdiği yönde hareket ettiğini göreceksiniz. RUN-STOP/RESTORE yapmadığınız sürece bu devam edecektir. Eğer kazayla bu tuşlara basarsanız, SYS 49152 ile yeniden joystick-cursor işbirliğini aktif hale getirebilirsiniz.
Şimdi gelelim teknik ayrıntılara... Programı RUN ile çalıştırdığınızda, esas program kısmı $C000-$C066 (49152-4 9254) arasına yerleşmektedir. Dolayısıyla buralara hiç dokunmamanız lazım.
Programın assembler kodu dökümünü, SUPER-ASS formatında veriyoruz. Birazdan onun üzerinde incelemelerimize başlayacağız.
Joystick'in hareketinin algılanması ve cursor'un hareket ettirilmesi, interrupt programlaması tekniği ile gerçekleştiriliyor. Şimdi bunu biraz açalım...
C64'ün içinde bazı işlemlerin devamlı olarak yapılması gerekmektedir. Örneğin sistem saatinin ilerletilmesi, klavyenin taranması, cursor'un yanıp sönmesi gibi. Ve tüm bu işlemler, bilgisayarın o anda çalıştırdığı programdan bağımsız olmak zorundadır. Bu nedenle, C64'ün sisteminde, interrupt rutini adı verilen bir program parçası vardır. Saniyede 60 kere C64, yaptığı işi bir süre dondurup bu interrupt rutinini işletir. Demin belirttiğimiz birtakım işler bitince, daha önce işleyen ana program kaldığı yerden çalışmaya devam eder. İnterrupt rutininin toplam çalışma süresi 1/60 saniyeden çok çok daha kısa olduğu için, saniyede 60 kere çağrılması zaman açısından bir sorun yaratmamaktadır. Bu rutin, sistemin içinde $EA31 (59953) adresinden başlamaktadır. Bu adres, $EA ve $31 olarak büyük ve küçük byte'larına ayrılabilir. İşte bu iki sayı da, $0314/$0315 (788/799) adreslerinde saklanır.
Biz tam burada işe karışıyoruz. $0314/$0315'e kendi yazdığımız bir rutinin başlangıç adresini yazıyoruz. Artık bilgisayar saniyede 60 kere bizim rutinimizi çalıştıracaktır. Ancak dikkat edilmesi gerekli bir iki küçük nokta var. Öncelikle rutinimiz uzun olmamalıdır. Eğer çok uzun olursa, zaman harcaması artacak ve interrupt rutininin çalışması yüzünden esas işlemlere zaman kalmayacaktır. Bir de, eğer kendi interrupt işlemlerinizi kendiniz yazacak kadar profesyonel programcı değilseniz, yazdığınız minik interrupt programımızın en sonuna JMP $EA31 koyarak esas interrupt rutinini çağırın.
Şimdi gelelim bizim programa... SYS 49152 yaptığınızda, 200-230 arasında gördüğünüz gibi interrupt vektörü $C00F adresine değiştiriliyor. Bu adres, assembler kodunun 280 numaralı satırına denk geliyor. Saniyede 60 kere cursor'u oynatmak çok hızlı olacağı için, saniyede 10 kere işlem yapılacak. Bunun için, $02 numaralı adres sayaç olarak kullanılacak. Burası 6'dan 0'a geri sayılacak ve 0 olduğunda joystick sorulacak. Sonra bu işlem tekrarlanacak.
280-300 arasında interrupt rutinin ilk yaptığı işlemleri görüyorsunuz. $02'deki sayaç bir azaltılıyor ve sıfır olup olmadığı kontrol ediliyor. Eğer sıfır değilse $EA31'deki normal interrupt rutinine atlanıyor. Aksi durumda ise, öncelikle bizim programın joystick ile ilgili kısmı çağırılıyor.
320'de ilk yapılan iş, sayacı yeniden 6 ile yüklemek. Sonra da C64'ün sisteminin, basılan ve klavye deposuna gönderilen tuşların sayısını okuyor. Eğer klavye deposu (keyboard buffer) dolmuşsa, doğrudan $EA31'e atlanıyor.
Dolmamışsa, işlem 390'dan devam ediyor. Önce akümülatör PORT 2'nin gönderdiği değer ile yükleniyor. 0 numaralı bit kontrol ediliyor.