Turtle Graphics (Kurbağa)

Turtle Graphics (Kurbağa)

Small Basic’de  pek çok komuta sahip olan bir Turtle(kurbağa) nesnesi bulunur.  Bu makalede, Kurbağayı ekranda grafikler çizmek için kullanacağız. Başlangıç olarak, Kurbağanın ekranda görünür hale gelmesini sağlamamız gerekiyor.  Bunu tek satırlık basit bir programla yapılabilir.

Turtle.Show()

Bu programı çalıştırdığınızda, merkezinde bir yeşil renkli bir şekil olan bir pencere açılacaktır.

Rasgeleleştirmek

Rasgeleleştirmek

ekranın değişik yerlerine rastgele renklerle oluşan noktaları oluşturan program yazalım.

1.GraphicsWindow.Width = 200 2.GraphicsWindow.Height = 200 3.GraphicsWindow.BackgroundColor = "Black" 4.For i = 1 To 300 5.GraphicsWindow.BrushColor = GraphicsWindow.GetRandomColor() 6.x = Math.GetRandomNumber(200) 7.y = Math.GetRandomNumber(200) 8.GraphicsWindow.FillEllipse(x, y, 10, 10) 9. EndFor

ve bu programı çalıştırdığınızda...

İç İçe Daireler

İç İçe Daireler

Bir döngü içerisinde boyutları gittikçe artan daireler çizeceğiz.

1.GraphicsWindow.BackgroundColor = "Black" 2.GraphicsWindow.PenColor = "Red" 3.GraphicsWindow.Width = 300 4.GraphicsWindow.Height = 300 5.For i = 1 To 100 Step 5 6.GraphicsWindow. DrawEllipse (150-i, 150-i, i*2, i*2) 7.EndFor 8.GraphicsWindow.Show()

ve bu programı çalıştırdığınızda...

İç İçe Dikdörtgenler

İç İçe Dikdörtgenler

Bir döngü içerisinde boyutları gittikçe artan dikdörtgenler çizeceğiz.

1.GraphicsWindow.BackgroundColor = "Black" 2.GraphicsWindow.PenColor = "Red" 3.GraphicsWindow.Width = 300 4.GraphicsWindow.Height = 300 5.For i = 1 To 100 Step 5 6.GraphicsWindow.DrawRectangle(150-i, 150-i, i*2, i*2) 7.EndFor 8.GraphicsWindow.Show()

ve bu programı çalıştırdığınızda...

Şekiller Çizmek ve İçlerini Doldurmak

Şekiller Çizmek ve İçlerini Doldurmak

Şekil için genellikle iki tip işlem vardır. Bunlar, Çizme ve İçini Doldurma işlemleridir. Çizme işlemleri, bir kalem kullanarak şeklin dış çerçevesini çizer ve İçini Doldurma işlemleri de, bir fırça kullanarak şekli boyar. Örneğin; aşağıdaki programda, iki adet dikdörtgen var, bunlardan birisi yeşil bir kalem kullanılarak çizilmiş ve diğeri de kırmızı Fırça kullanılarak içi doldurulmuş.
Örnek1

1.GraphicsWindow.Width =400 2.GraphicsWindow.Height =250 3.GraphicsWindow.PenColor ="Green" 4.GraphicsWindow.DrawRectangle(50, 20, 300, 75) 5.GraphicsWindow.BrushColor = "Red" 6.GraphicsWindow.FillRectangle(50, 140, 300, 75) 7.GraphicsWindow.Show()

ve bu programı çalıştırdığınızda...

Çizgiler Çizmek

Çizgiler Çizmek

GraphicsWindow’ni açtıktan sonra, üzerine şekil, metin ve hatta resim çizebiliriz. Bazı basit şekiller çizmekle başlayalım. İşte, Grafik Penceresine bir çift çizgi çizen bir program.

1. GraphicsWindow.Width = 200 2. GraphicsWindow.Height = 300 3. GraphicsWindow.PenColor = "Green" 4. GraphicsWindow.PenWidth = 5 5. GraphicsWindow.DrawLine(15, 25, 100, 200) 6. GraphicsWindow.Show()

ve bu programı çalıştırdığınızda...

GraphicsWindow’a Giriş

GraphicsWindow’a Giriş

Metinlerle ve Sayılarla çalışmamıza izin veren TextWindow gibi, Small Basic aynı zamanda bir şeyler çizmemizi sağlayan bir GraphicsWindow da sunar.  GraphicsWindow’u görüntüleyecek  komut

GraphicsWindow.Show()

Bu programı çalıştırdığınızda, bildiğimiz siyah metin penceresi yerine, beyaz bir pencerenin açıldığını göreceksiniz. Henüz bu pencerede yapacak fazla bir şey yoktur. Ancak, bu bölümde üzerinde çalışacağımız zemin pencere bu olacak.

Grafik penceresi, görünüşünü isteğiniz gibi ayarlamanıza izin verir. Bu pencerenin başlığını, arka planını ve boyutunu değiştirebilirsiniz.  Bir örnekle açıklayalım.

1.GraphicsWindow.BackgroundColor = "SteelBlue" 2.GraphicsWindow.Title = "Grafik Pencerem" 3.GraphicsWindow.Width = 320 4.GraphicsWindow.Height = 200 5.GraphicsWindow.Show()

ve bu programı çalıştırdığınızda...