Bu sayfadaki yazılar
Sayfanın metni
Sayfa 28
TO Z OR THEN NEXT GOSUB G301PRİNT "CİSSPACE)" PRİNT "<İSSPACE >” PRİNT 520 1F THEN 170 GOSUB 6301PRINT 1GOSUB 4801G0SUB 63 HAMLE" 1GOSUB 29016070 140 60526 PRİNT TO 4 PRİNT
(16) "KARELER<CTRL-2)* PRİNT K ONTROL OYUNCUDA" PRİNT 10SPACE )<CTRL -6>2. KONTROL BILGISAYARDA" FOR Xs1 TO 4 PRİNT ><HOME >< Ci VEYA 2'Yİ SECİN)<CTR GET ASLIF OR VALCAS)S0 TH EN 610 TYCXYAVALCASIINEKT 160TO 80 PRİNT "<HOME>" EFOR TO NEXT RETURN IF THEN 108 PRİNT *<RVSON> SONU 1 * FOR Xs1 TO 41POKE 646 TABC7) OK AREC3SPACE NEXT PRİNT *SPCC2) R OYNAMAK İSTER MİSİNİZ? E 198 GET ASLIF THEN RÜN IF THEN PRİNT
Klavyeyle gezinmek için ← ve → tuşları.
Sayfa 29
Amaç: Bildiğiniz gibi Commodore 64'lerin Basic komutları arasında ekranda yazılacak ve bilgi girişi yapılacak alanların kolay tayin edilmesine yardımcı komutlar yoktur. Bunların eksiği programcıları bir takım kurnazlıklarla bu komutların yerine geçecek yöntemler uygulamaya yöneltmektedir. İşte ekran alt programı da bu nedenlerden dolayı her isteyenin kendi programının ihtiyacı doğrultusunda ekranını dizayn etmesine, bilgi girişi esnasında, körsörün bağımsızca hareket etmesine, belirtilen field uzunluğunda bilgi girilmesine, sadece nümerik veya alfa nümerik bilgi girilmesine ve daha birçok başka kullanım alanlarının yaratılmasını mümkün kılan bir programdır.
Programın bazı özellikleri, öncelikle relatif file ile çalışacakları ilgilendirmektedir. Bildiğiniz gibi relatif file ile açılan tüm kütüklerde kayıtların aynı uzunlukta olması gerekmektedir. Sistem boş kalan alanları tanımlayamamaktadır. Ekran alt programı incelendiğinde 60709 no'lu satırda girilen datanın uzunluğuna girilmesi gereken uzunluğa erişinceye kadar boşluk eklenmektedir. Bir de uzunluk eşitlemesinden sonra fazla bir karakter daha (chr2(13)) eklenmekte, bu ise daha sonra kaydın okunması esnasında son derece gerekli olacaktır. Ancak bu ekleme nedeni ile kütüğün toplam kayıt uzunluğu birer karakter fazlalaşmaktadır. Kütük açılırken bu fazla karakterlerde gözönüne alınarak uzunluğu tayin etmek gerekir. Ekran alt programının bir amacı da dolu bir kayıttan okunan bilgilerin gene aynı dizaynda ekrana getirilmesidir. Ancak bu arada unutulmaması gereken nokta bu fazladan eklediğimiz (chr$(13) Return) karakteri ekran dizaynımızı etkileyerek bozmasıdır. Bu bozulmayı engellemek için alt programa geçmeden önce ileride daha detaylı açıklayacağımız XW$ (x) değişkeninin en sonundan bir karakteri silmemiz gerekir.
Konunun daha iyi anlaşılması için isterseniz programın satır, satır açıklamasını yapalım.
5 no'lu satır ekranı temizler ve renklerini ayırır.
10 no'lu satır Q$ ve XW$ değerlerine ait boyutları belirler.
20 ile 33 no'lu satırlar programın belkemiğini oluşturan satırlar olup yazmayı düşündüğünüz program doğrultusunda değiştirmeniz gereken satırlardır. Örnek olarak ilk satırı alarak açıklamasını yaparsak anlamları daha iyi belirtilmiş olur. Yalnız burada bir kavram kargaşasına yol açmamak için küçük bir örnekte sık kullanılacak iki deyimi açıklığa kavuşturmak isterim. Bunlar:
FİRMA
Değişken tanımı
BİMPA LTD.ŞTİ.
Değişken
Örnek data satırı
1. Data (2) Değişken tanımın ekran üzerinde yazılmaya başlayacağı satır
2. Data (1) Değişkenin tanımının ekran üzerinde yazılmaya başlaacağı sütun
3. Data (FİRMA) Bilgi girilmesi istenen değişken tanımı.
4. Data (16) Girilecek değişkenin uzunluğu. Ekranda 16 karakter uzunluğunda bir hat çizilir.
5. Data (1) Değişkenin mutlak surette girilmesi isteniyorsa (0) değeri verilir. Böylece program çalışırken kullanan operatör bilgi girişi yapmadan