Sayfa 16

Selam! Bu ay da grafik komutlarını açıklamaya devam ediyorum. Ek olarak da, beğeneceğinizi umduğum ufak bir sürpriz var. Lafı uzatmadan komutlara geçiyorum. Geçen ay başladığım ekran komutlarına kaldığım yerden devam ediyorum. Ekran komutları: Screen To Front (Ekr): Ekr ile numarası verilen ekranı öne çıkartır. Bu sadece ekranın diğer ekranlardan daha önde görüntülenmesini sağlar. Ekranı aktif hale getirmez. Screen To Back (Ekr): Screen to front'un aksine verilen ekranı diğer ekranların arkasına atar. Screen Height: Aktif screen'in Y ekseninde sahip olduğu nokta sayısını verir. Screen Width: Aktif screen'in X ekseninde sahip olduğu nokta sayısını verir. Screen Colour: Aktif screen'in renk sayısını verir. Screen Display (Ekr, x, y): Ekranların görüntü ayarlarını değiştirmek için kullanılır. Ekr: Ekran numarası. X: 0 ile 448 arası bir değer verilebilir. Ekranın, monitörde görüntülenmeye başladığı X pozisyonunu belirler. Ekranın görüntüye girebildiği minimum değer 112'dir. Verilen değerler 16'nın katı olmak zorundadır. Y: Ekran görüntüsünün Y pozisyonunu belirler. -170 ile 312 arası değer verilebilir. Görüntüye girebilmesi için verilmesi gereken değerler 30 ile 300 arası olmalıdır. Width: Ekranın X ekseninde görüntülenecek nokta sayısı. Örneğin 352 uzunluğundaki bir ekranın sadece 320 piksellik bir bölümünün görüntülenmesini sağlayabilirsiniz. Height: Ekranın Y ekseninde görüntülenecek nokta sayısı. Sıra geldi ufak bir örnek programı

Screen Open 32, Lowres Cure C££ : Flash O££ : Cis 0 Print Screen ; Screen Height Print Screen Colsur Wait Key Opan 1,320, Curs C££ : Flash Ö££ : Cis 0 Print Sere Print Söze Screen To Front 1

Renk kaydırma komutları:

Shift Up (Renk) (Değil)

Bek : Her kaydırmadan sonra beklenecek süre. Eğer saniyede 50 defa renk kaydırmak (cycle) istiyorsanız bu değer 1 olarak verilmeli. İlk Renk : Renk kaydırma işleminin başlayacağı renk numarası. Son Renk : Kaydırma işleminin biteceği rengin numarası. Değ : Değeri olarak verilen parametre. Eğer 1 verilirse

kaydırma işlemi renklerin yerlerinin değiştirilmesi ile gerçekleştirlir. Bu da ekrandak renklerin sürekli kaydırılmasını sağlar. Eğer O ğerini verirseniz. Renkler birbirinin üzerine kopyalanır. İk kaydırma işleminden sonra , ekranda ki tüm renkler İlk renkle ayrı değerlere sahip olurlar. Ufak bir örnek: Screen Open 0,320,256,16, Lowres 1=20 For K=1 To 16 Ink K Baz L 20,0 To L,255

Shift Up 10,1,15,1 : 100 Shift | Wait S0 Shift Up 10,1,15,0 : Waât 140 or

Shift Down (Bek), (İlk) Gördüğünüz gibi parametre bakımından Shift Up ile aralarında herhangi bir fark yok. Yalnız Shift Up, ilk rengi ikinciye, ikinciyi üçüncüye kopyalayarak kaydırma işlemini gerçekleştirir. Shift Down ise tam ters yönde kopyalama yapar. Bu yüzden de ekran üzerinde verdiği efekt Shift Up ile tam ters yönde olacaktır. Shift Off : Shift Up veya Shift Down komutlarıyla başlatılan kaydırma işlemini durdurur. Shift komutları interrupt (program çalışmaya devam ederken işlevini sürdürme) çalışan komutlardır. Shift Up/Down komutu program içerisinde bir kez verildiğinde, Shift Off komutuna kadar kaydırma işlemi sürekli gerçekleştirilir ve program akışına görünür herhangi bir etki yapmaz. (Bek) : Program akışını Bek değeri kadar bekletir. 50 verirseniz, program akışı 1 saniye durur. Bekleme süresi makinanın hızından bağımsızdır. Yani programınız Amiga 500'de de, Amiga 4000'de de aynı miktarda bekler. Bu arada interrupt çalışan bütün programlar çalışmalarına devam ederler. Joystick komutları da kısaca şöyledir: JDown (port) : Joystick'in aşağı çekilip çekilmediğine bakar. Joystick aşağı çekiliyorsa -1 değerini geri gönderir. (port) : gibi çalışır. Görevi joystick'in yukarı itilip itilmediğini kontrol etmektir. JRight (port) : Joystick'in sağa hareketini kontrol eder. JLeft (port) : Joystick'in sola hareketini kontrol eder. Fire (port) : Ateş tuşuna basılıp basılmadığını kontrol eder. Port : Joystick'in bağlı olduğu port numarası, 1 veya 2 olabilir. Bu ayın programı yine Ofset kullanımıyla ilgili. Ama ek olarak Shift komutlarını ve kontrol komutlarını da ekledim. Program grafik datasıyla birlikte Manyetik Paket içinde yer almakta. Umarım beğenirsiniz. Görüşmek üzere, hoşçakalın.

TOLGA KAHRAMAN '4 Screen Offset & Shift Up — * Örnek 2.1 * Amiga Dergisi 1993 * Hide Unpack 7 to 0

Seraen Hide O Screen Display 0.128, , 320,256 Screen Offset 0,150,0 For K<0 To 7 Colour K,$0 Next Screen Show O Fada 5, $0, ŞARA, 9246, $246, 9246, 9246 Wait 100 Shâft Up 1,2,7,1 : Do T£ 1£ End TE Screen Offset 0, XYER,O End 1£ I£ (1) T£ XYER>320 End Te Screen Offset 0,KYER, O End Tire(1) Then Exit