Program Döküm Eki sayı 4, sayfa 14

Bu sayfadaki yazılar

Sayfanın metni

Sayfa 14

komutu yerine getirirken klavyeden yazılanlar ekrana çıkmaz ama bu bafırda sıraya girerler. Bafırda sıraya girebilecek tuş miktarı 10'dur. Bir başka bellek baytında bafırda bulunan tuş miktarı belirtilmektedir. Bilgisayar icra etmekte olduğu komutu tamamlayınca bu bayttan bafırda kaç tuşun beklediğini öğrenir ve bafıra giriş sıralarına göre bunları icra eder. 198 no.lu YER bafırda bekleyen tuş miktarını tutar. Bafırın bulunduğu bölge ise 631 - 640 arasındadır. İşte program içerisinde bu baytlara istediğimiz tuşların rakam karşılıklarını POKE'lar ve 198'e de kaç tuş beklediğini POKE'larsak END ile programdan çıkınca bilgisayar bu tuşları icra eder.

63220 no.lu satırdan itibaren yaptığımız şudur:

Önce ekranı temizliyor ve iki tane PRINT komutu kullanarak körsır ekranın dördüncü satırına getiriyoruz. Bu satıra silinecek blokun ilk satırının numarasını yazdırıyoruz. Onun altına da END ile çıktığımız programa dönebilmek için GOTO 63280 yazdırıyoruz. Daha sonra da körsır HOME yaparak (CHR$(19)) körsır ekranın sol üst köşesine alıyoruz. 631 ve 632'ye 13 (yani RETURN) POKE'luyoruz. 198'e de 2 POKE'layarak bafırda bekleyen iki tuş olduğunu belirtiyoruz. END komutuyla programdan çıkınca körsır sol üst köşede bulunduğundan READY yazısı ekranın üçüncü satırında çıkıyor ve körsır ekranın dördüncü satırında kalıyor. Program durduğu için bilgisayar direkt moda geçip 198'i kontrol ediyor, bafırda iki tuşun beklediğini görerek bafıra bakıyor. Bafırda iki adet RETURN tuşunun icra edilmeyi beklediğini görerek bunları icra ediyor. Birinciyi icra ettiğinde körsır dördüncü satırda olduğundan ve bu satırda silme blokunun ilk satırının numarası yazılı olduğundan blok silme işlemi gerçekleşiyor. İkinci RETURN tuşu icra edildiğinde ise körsır beşinci satırın başında olduğu ve bu satırda GOTO 63280 yazılı olduğu için bu program 63280 no.lu satırdan itibaren yeniden çalışıyor. Silmeye devam edip etmeyeceğimiz soruluyor. E ile cevap verirsek program silinecek yeni blokun başlama ve bitim numaralarını alarak aynı işlemleri tekrarlıyor. H ile cevap verdiğimizde başlama ve bitim numaraları olarak SİLME PROGRAMI'nın başlama ve bitim satırları kabul ediliyor ve işlemler tekrarlanıyor. SİLME PROGRAMI kendisini de siliyor. Bu defa beşinci satıra LIST yazdırdığımız için RETURN'ler uygulanınca ilk RETURN programı (silme programını) siliyor ve ikinci RETURN, içinden satırlar silinen programınızın kalan bölümünü LİST'liyor.

Klavyeyle gezinmek için ← ve → tuşları.