Sayfa 67

Hazır programlarda joystickten yararlanmaya artık hepimiz alıştık. Ama ekran üzerindeki işaretimizi, yeni bir program olmaksızın kendimiz joystickle hareket ettirebilir miyiz? Bu konuda Commodore el kitabı yetersiz kalıyor. Verilecek on BASIC satırı, belki de kullanışlı bir menü için zemin oluşturabilecektir.

Öncelikle, joystickle yönlendireceğimiz işaretin ne olacağını saptamamız gerekiyor. Dikkatimizi asıl bu işaretin nasıl joystickle yönlendirileceği meselesinde yoğunlaştıracağımızdan, işaret olarak basit bir negatif basılmış boşluk karakteri kullanacağız. Öncelikle joystick'i bilgisayara bağlayan kapının değerine ihtiyacımız var. Eğer ikinci joystick girişini (Port 2) kullanıyorsak bu değer 56320. bellek hücresindedir. Port 1 kullanılsaydı, adres 56321 olacaktı. Ekran üzerinde yönlendirme yapabilmemiz için, ekranın başlangıç (1024, sol üstte) ve bitiş (2023, sağ altta) adresleriyle, ekrandaki her noktanın rengini kontrol edecek renk belleğine ihtiyacımız var; bu her ekran noktasına 54272 eklenerek bulunur. O halde programımız, 10 PO=56320:EKRAN=1024:RENK=54272 satırıyla başlayacaktır. Bundan sonra işaretimizi ekrana getirebilmemiz için kullanılacak işareti PEEK ile okuyoruz ve ME değişkenine aktarıyoruz. Sonra kodu 160 olan işaretimizi POKE ile ekrana yazıyoruz. İşletim sistemi ise ekranın mevcut rengini 646. bellek hücresine yazıyor; buradan bizim bu değeri PEEK ile okumamız mümkündür. 20 ME=PEEK(EKRAN):POKE EKRAN,160:POKE EKRAN+RENK,PEEK(646)

FF