Program Döküm Eki sayı 1, sayfa 21
Sayfanın metni

Sayfa 21

DÜNYA programı, SIMON'S BASIC ile yazılmış bir programdır. Bu programı SIMON'S BASIC'e sahip olan C64 kullanıcıları kadar, C128 ve PLUS/4 sahipleri de grafik komutlarını biraz değiştirerek kullanabilirler.

Programın konusu, Dünya'nın çeşitli açılardan küresel görünümünü çizmektir. Grafik kullanımı sırasında yeterli hıza ulaşabilmek için, SIMON'S BASIC kullanılmıştır.

Figürlerde de göreceğiniz gibi, yerküreyi hem kendi ekseni etrafında çevirmek hem de eksenin kendisini uzay içinde değişik açılara göre döndürmek mümkün olmaktadır. İsterseniz programın nasıl işlediğini biraz görelim.

SATIR 500-510: Bu satırlarda grafiğin hangi grafik biçiminde çizilmesi gerektiği sorulmaktadır. Eğer normal grafik seçilirse sadece tek renkle çizilen, 320 * 200 oranında bir çözünürlüğe (resolution) sahip grafik ekranı kullanılır. Multi-color halinde ise, 4 renkli ancak 160 * 200'lük bir çözünürlük kullanılır.

SATIR 600-700: Programın bu kısmında ise, tüm programda kullanılan sayılar değişkenlerin içine yerleştirilmekte ve normal veya multi-color kullanımına göre değişen sayılar saptanmaktadır. Sayıları değişkenler içine yerleştirmekteki amacımız, programın işlemesini mümkün olduğu kadar çabuklaştırmaktır. Aynı nedenle, programın içinde sıfır kullanılması gereken yerlerde bir nokta kullanılmıştır. Gerçekten de bilgisayarın bir noktayı sıfır olarak algılaması, sıfır rakamını tanımlamasından daha çabuk olmaktadır.

SATIR 710: Bu satırda, çizimi yapılacak yerküreye bakış açısı istenmektedir. Bu iki açının anlamları şöyledir: Dünyaya tam kuzey kutbundan baktığımızı varsayalım. Dönme açısı, bu durumda dünyanın saat ibresi yönünde kaç derece dönmesi gerektiğidir. Eksi bir açı, dünyayı saat ibresinin ters yönünde döndürecektir. Şimdi de kuzey kutbu yukarıda olmak üzere dünyaya karşıdan baktığımızı düşünelim. Eğiklik açısı da bu durumda, eksenin bize göre kaç derece eğik olması gerektiğini verecektir. Pozitif bir sayı kuzey kutbunu bize yaklaştıracak ve güney kutbunu uzaklaştıracak; eksi bir sayı ise kuzey kutbunu bizden uzaklaştırarak güney kutbunu yakınlaştıracaktır.

SATIR 731-732: Eğer belirtilmişse, multi-color grafiğe geçilir ve yerküreyi çevreleyen hafif basık çember çizilir.

SATIR 800-860: Bu satırlarda, ekrana çizilen çemberin doldurulması gerçekleşir. Toplam 22 değişik kara parçası çizilmektedir. Tabii ki bunların sadece o sırada görünen kısımları çizilecektir. İşte bunun için 3000. satırdan itibaren başlayan bir alt-program kullanılır. Bu alt-program, DATA satırlarından okunan enlem ve boylamları ekran koordinatları haline getirir. Satır 830'da da bu ekran koordinatları, eğer çemberin içinde kalıyorlarsa, çizilirler. Bir kara parçasının sınırlarının çizimi bittikten sonra sıra içinin boyanmasına gelir. Her bir kara parçası için yeterli sayıda enlem ve boylam noktası verilmiştir. Bu noktalardan o anda görünen bir tanesi seçilerek o noktadan itibaren boyama işlemi gerçekleşir.

SATIR 1000-1160: Artık sıra enlem ve boylamların çizimine geldi. Önce güney kutbundan kuzey kutbuna doğru

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