Sayfa 32

Merhaba arkadaşlar. Yazımızın yeni bir bölümüne beraberiz. Bu ay geçen sayıda başladığımız grafik komutlarına devam edeceğiz. Yazı dizimiz doğal olarak AMIGABASIC yazısıyla bir paralellik göstermektedir. Eğer AMOS BASIC ile bir probleminiz olursa AMIGABASIC yazısını da okuyun. Yine de tatmin olmazsanız bana mektup yazabilirsiniz. Sırada yeni komutlarımız yer alıyor. GRLOCATE Bu komutla kursoru ekran üzerindeki herhangi bir noktaya koordinatlarını belirleyerek götürebilirsiniz. Kullanımı: GRLOCATE x, y Örnek: GRLOCATE 5, 100 GRLOCATE 10, 200 GRLOCATE 350, 200 gibi örnekler verebiliriz. XGR XGR fonksiyonu kursorun o andaki X pozisyonunu verir. Kullanımı: XGR Örnek: PRINT XGR YGR XGR gibi çalışır, kursorun o anki Y pozisyonunu verir. Kullanımı: YGR Örnek: PRINT YGR PLOT PLOT komutuyla verilen koordinatlara belli bir renkte nokta yerleştirebilirsiniz. Kullanımı:

x : Noktanın X koordinatı. y : Noktanın Y koordinatı. z : Noktanın rengi. Verilmesi şart değildir. Verilmediği zaman en son kullanılan renk kullanılır. Örnek : FOR i=1 to 100 NEXT i POINT Bu komut verilen koordinattaki noktanın rengini bildirir. Kullanımı : POINT x, y Örnek : POINT (100, 100) DRAW Draw komutu belli iki nokta arasına düz bir çizgi çekmek için kullanılır. Dört adet parametre gerektirir. Kullanımı : DRAW x, y to a, b x: 1. noktanın x koordinatı y: 1. noktanın y koordinatı a: 2. noktanın x koordinatı b: 2. noktanın y koordinatı Örnek :

FOR i-1 to 100 FOR j-1 to 100 DRAW i, jto 10, 10 Next j Next i BOX BOX komutu ile içi boş bir dik- dörtgen ya da kare

çizebilirsiniz. DRAW gibi dört parametre gerektirir. Kullanımı : BOX x, y TO a, b x : Sol üst köşenin x koordinatı. y : Sol üst köşenin y koordinatı. a : Sağ alt köşenin x koordinatı. b : Sağ alt köşenin y koordinatı. Örnek :

BOX 0, 10 to 300, 70 POLYLINE Bu komut DRAW ile aynı işi yapar fakat peşpeşe bir çok çizginin çizilebilmesine imkan verir. Bu sayede beşgen, altıgen, yedigen ve diğer geometrik şekilleri çizebilirsiniz. Kullanımı : POLYLINE a, b to x, y to g, z to

Örnek: POLYLINE 10, 10 to 20, 20 to 100, 100 to 250, 100 CIRCLE Çember çizdirmekte kullanılan bir komuttur. Kullanımı: CIRCLE x, y, z x: Çemberin merkezinin X koordinatı. y: Çemberin merkezinin Y koordinatı. z çapı. Örnek: FOR i=1 to 100 CIRCLE 160, 100, i NEXT i ELLIPSE Bu komutla bir elips çizdirebilirsiniz. Tabii elipsin her iki çapını da vermeniz gerekir. ELLIPSE x, y, a, b x: Elipsin merkezinin X koordinatı. y: Elipsin merkezinin Y koordinatı. a: Elipsin birinci çapı. b: Elipsin ikinci çapı. Örnek: ELLIPSE 100, 100, 40, 50 SET LINE Bu komutla çizgilerinizi tanımlayabilirsiniz. Yani dümdüz giden bir çizgi yerine kesik kesik giden bir çizgi ya da nokta x: Noktanın x koordinatı. y: Noktanın y koordinatı. renk: noktanın rengi. PALETTE komutuyla belirlenen renk listesindeki numaraya göre belirlenir. Örnek: PSET (320,100),1 (320,100) koordinatlarına 1 numaralı renkte bir nokta koyar. Bir de STEP fonksiyonu kullanabilirsiniz. Bu fonksiyon kullanıldığı zaman nokta (x,y) koordinatlarına değil en son çizilen noktadan (x,y) kadar uzağa konur. Örnek: PSET (100,50) PSET STEP (10,20) İkinci satırı PSET (110,70) şeklinde de yazabilirdik. Bu fonksiyonun bize faydası matematiksel bir fonksiyonu çizdirirken belli olur. Mesela f(x)=sin(x) fonksiyonunu tek tek hesaplayıp çizdirmektense kullanarak rahatça çizdirebiliriz. POINT Point komutu verilen bir noktanın ne renk olduğunu belirlememize olanak sağlar. Kullanımı şu şekildedir: POINT (x,y) x ve y noktanın koordinatlarını belirlerler. Örnek: POINT (100,100) (100,100) koordinatlarındaki noktanın rengini verir. (Verilen değer bir sayıdır ve bu sayı PALETTE komutu ile belirlenen renk numarasıdır.) Eğer verdiğiniz koordinatlar ekrana sığmıyorsa -1 değeri verir. Bu arada ufak bir program dökümü. 10 FOR i=1 TO 1000 20 X=INT(640*RND) 30 Y=INT(200*RND) 40 Z=INT(4*RND) 50 PSET (X,Y),Z Açıklama: 10. Satır: İlk önce bir FOR ..