Ekrana “Merhaba Dünya” yazdıracağız. Bunu yapmak için 2 adım kullanacağız öncelikle komut ekranımıza aşağıdaki satırı yazalım:
PRINT “Merhaba Dünya”
Sonra ya F5 tuşuna basalım yada Çalıştır menüsünden Çalıştır seçeneğini seçelim. Ekran görüntümüz:
Merhaba Dünya
Şeklinde olacaktır. Şimdi bu programı bir string (alfanümerik veya
karakter) değişkenle yapalım.Bunun için string (alfanümerik veya
karakter) değişkenlerin bir adet $ işareti ile belirlendiğini bilmemiz
gerekmektedir. A$ şeklinde bir string (alfanümerik veya karakter)
değişken kullanacağım. A$ string (alfanümerik veya karakter)
değişkenine “Merhaba Dünya” ifadesini atayacağım. Ön-celikle komut
ekranımıza aşağıdaki satır yazalım:
a$="Merhaba Dünya"
PRINT a$
Sonra ya F5 tuşuna basalım yada Çalıştır menüsünden Çalıştır seçeneğini seçelim. Ekran görüntümüz yine aynı olacaktır.
Şimdi ise ekranın belirlediğim bir yerinde yani yatay(x) ve dikey (y)
koordinatlarını verdiğim bir yerde yazması için SET CURSOR komutunu
kullanacağım.Bunun için SET CURSOR x(yatay koordinat),y(dikey
koordinat) şeklinde belileyeceğim. Öncelikle komut ekranımıza aşağıdaki
satırları yazalım:
SET CURSOR 10,10
a$="Merhaba Dünya"
PRINT a$
Sonra ya F5 tuşuna basalım yada Çalıştır menüsünden Çalıştır seçeneğini
seçelim. (10 piksel aşağıda ve 10 piksel sağda oluşacak olan )Ekran
görüntümüz 10 satır içerde ve aşağıda oluşacaktır.
Şimdi ekrandan bu string (alfanümerik veya karakter) değişkeni okuyan
bir program yazalım .Bunun için Input komutunu kullanacağım. Input
“soru” ve string (alfanümerik veya karakter) değişken şeklinde yazarak
kullanalım. Öncelikle komut ekranımıza aşağıdaki satırları yazalım:
INPUT "dünyaya ne demelisin?>";a$
SET CURSOR 30,30
PRINT a$
Sonra ya F5 tuşuna basalım yada Çalıştır menüsünden Çalıştır seçeneğini
seçelim. Soruya Merhaba Dünya dersek (30 piksel aşağıda ve 30 piksel
sağda oluşacak olan)Ekran görüntümüz:
dünyaya ne demelisin?> Merhaba Dünya
Merhaba Dünya
Şimdi rast gele 0 ila 10 arası bir sayıyı ekrana yazdıralım. Bunun için
RND(10) komutunu kullanacağım. Öncelikle komut ekranımıza aşağıdaki
satırı yazalım:
PRINT RND(10)
Sonra ya F5 tuşuna basalım yada Çalıştır menüsünden Çalıştır seçeneğini seçelim. Ekran görüntümüz:
5
Şeklinde olabilir.(Unutmayın 0 ile 10 arası her sayı çıkabilir.)
Şimdi ekranın her hangi bir yerine Merhaba Dünya (veya soruya ne yanıt
verdiysek) yazdıralım do ve loop döngüsü ile devamlı yazmayı sağlayalım
CLS komutu ile de ekranı temizleyelim . Öncelikle komut ekranımıza
aşağıdaki satırları yazalım:
INPUT " dünyaya ne demelisin?> ";a$
DO
CLS
SET CURSOR RND(640), RND(480)
PRINT a$
LOOP
Sonra ya F5 tuşuna basalım yada Çalıştır menüsünden Çalıştır seçeneğini
seçelim ve bu haftaki konumuzu bitirmiş olalım. İlginize Teşekkürler
arkadaşlar umarım işinize yaramıştır.