Sayfa 19

- vardır. Bunu üç ekranlı bir örnek ile açıklayacağız. Bu ekranlar normal durumdaki hafızasının bir kısmını kullanacağı için BASIC hafızasını biraz kaydırmamız gerekmektedir, aksi takdirde BASIC programlarınız yeni ekran hafızalarına yazılabilirler. Etkileşimli tarzda şu komutları giriniz.

POKE 46,40: POKE10240,0: NEW

Aşağıdaki BASIC program ile “FI F3 F5” tuşlarını kullanarak ekranları değiştirebilirsiniz.

“EKİ 11 satır: buraya eklenecek”” 42-53

Programı çalıştırdıktan sonra FI F3 F5 tuşlarından birine basarak elde edebileceğiniz üç ayrı ekranınız olacaktır. Bu ekranlarda ilk olarak tamamı ile çeşitli karakterlerin oluşturduğu bir çöplük görüntüsündedir. Ekranları PRINT CHR$(147) veya PRINT (CLR/ HOME) ile temizleyin. Bir ekrana geçtiğiniz anda ilk başta imleci göremeyeceksiniz. İmleci görebilmek için herhangi bir tuşa-basmanız gerekmektedir. Ekranlarınız arasında değişimi program içinden de yapabilirsiniz. Bunun için şu komutları programınızda kullanmalısınız. -

-POKE 213,4

Birinci ekran POKE 213,5 İkinci ekran POKE 213,6 Üçüncü ekran

Aşağıda programımız tarafından kullanılan hafıza bölümleri yer almaktadır:

Ekranlar EKRAN 1 EKRAN 2 EKRAN 3 Ekran hafıza başlangıcı $0400 $23FF $27FF Renk REM -başlangıç $D800 $D800 $D800 Renk RAM -bitimi $DBEFF — $DBFF Basılacak tuş FI F3 FS CIRCLE Komutu

BASIC 7.0'daki en yararlı komutlardan birisidir. İsminden de anlayacağınız gibi bu komutla daireler çizebilirsiniz. Fakat bu komut sadece daire çizmeye yaramıyor, onunla çizgiler, üçgenler, dörtgenler, elipsler ve diğer geometrik şekiller çizmeniz mümkündür. Bu komut aşağıda verilen yapıya sahiptir.

CIRCLE renk renk hafıza kodu (0-3) X,)y : merkez noktanın koordinatları xr : x-yönünde yarıçap yr. : Jy-yönünde yarıçap Sa : dairenin başlama açısı ea : dairenin bitim açısı r : dönme için açı 1 : dairenin çizilen bölgeleri için açı

Bir daire çizmek istiyorsanız sadece ilk dört parametreyi (renk, x, y, xr) kullanmalısınız, diğer parametreler daha ince detaylar içindir. Bir elips çizmek için yr parametresine xr parametresinden farklı bir değer vermelisiniz. Örnek:

CIRCLE 0,160,100,10,30 Yarım daire elde etmek için şunu yazın

CIRCLE

En son parametreye aşağıda verilen değerleri girerseniz daire yerine çeşitli geometrik şekiller elde edersiniz.

1 geometrik şekil 0-44 Daire (sayı büyüdükçe daire yuvarlaşacak) 45 Oktagon 60 Hexagon 75 Pentagon 90 Kare ve dikdörtgen 91-119 Çeşitkenar üçgen 120 İkizkenar üçgen 121-179 Eşkenar üçgen

180-255 Çizgiler

- Window (Pencereler)

WINDOW'lar yeni çıkan bütün bilgisayarlarda olan bir özelliktir. C-128 de bu özelliğe sahip olarak doğmuş olan bir bilgisayardır. Ne yazık ki, mevcut komutlarla bir kerede sadece bir window açabilirsiniz, fakat biraz gayretle birden fazla window elde etmemiz mümkündür. Aslında bütün bir ekran bir window, bir window da bir ekrandır. WINDOW 0,0,39,24 komutu ile 40-kolon gösterimde bütün ekranı kaplayacak bir window tanımlamış oluruz. WINDOW'la tanımlanmış alanın koordinatlarını şu şekilde elde edebiliriz:

10 WINDOW 1,11,20,22 20 PRINT “ALT 30 PRINT “ÜST SINIR:”;PEEK (229) 40 PRINT “SOL 50 PRINT “SAĞ

Üstteki programda verilen adresler tanımladığınız window'un koordinatlarını taşımaktadır. Bu adresleri kullanarak makine dilinde de window'ları tanımlayabileceksiniz. Bu adreslerin açılış durumları şöyledir:

228 ($E4) : 24 229 ($E5) : 0 230 ($E6) : 0 231 ($E7) : 79 (80-kolon) : 38