Sayfa 15

Size biri biri

HABERLER

hatam var, önce iyiyi artık

AMOS ile yapılan oyunlar çoğalmaya başladı, kötü olan ise bunların pek de başarılı çalışmalar olmamaları. Bu ay AMOS ile yapılan Boxing Masters ve adında iki oyun geldi. İkisi de pek iyi değil, sizi

“Do: “Cis 0: “ Print "1 ile 100 arası bir sayi tuttum." “Do

Program 1

Flash Off 2 : Paper 0 : Home

Curs Off : DIE

bekliyoruz. Öğrenin de şu AMOS'u, yapın bakalım harika oyunlar.

AMOS Professional'ın Help kısmında yazıldığına göre zaman gelecek kullanılan yapıda bile ters ismi de INTOS.

ANI zaman hiç bil -zebani).

AĞA

Evet ekranda OMAY yazdı. Bu nasıl oldu. İSİM$ değişkenine OMAY değerini yükledik(bu nasıl oldu diyorsanız siz köşeyi okumuyorsunuz demektir, size ceza gidin köşede tek ayak üzerinde durun) ve bunu PRINT komutuyla ekrana yazdırdık. Şimdi diğer programı silip şu programı yazın ve çalıştırın:

Print (345)/2

Ekranda 4 yazması lazım(yazmıyorsa bilgisayarınızı tamire götürmenizin zamanı gelmiş demektir). Ayrıca PRINT komutunda birçok şeyi yanyana kullanabilirsiniz. Şu programı çalıştırın:

Print"arkadaslar","nasılsınız."

Bu programla görüyoruz ki noktalı virgül işareti “arkadaşlar”ı "merhaba" kelimesinden sonra yazmaya devam etmiş, virgül işareti ise arada bir Tab tuşu kadar boşluk bırakmış.

PRINT'le ilgili şu anda söylememiz gereken son şey de şu, gerek program yazarken gerekse Direct modda bir şey denerken uzun uzun PRINT yazmak yerine soru işaretini kullanabilirsiniz. Örneğin şu program da yukarıdaki ile aynı işi görür: ? (345)/2 İleride yeri geldiğinde örnek programlarda PRINT komutunu daha değişik şekillerde deniyorum ve ikinci komutumuza geçiyorum. Bu adı INPUT. Bunu da kolay anlayacaksınız sanıyorum, yaptığı iş kullanıcıdan veri alıp bize bildirmek. Şu programla daha iyi anlarsınız:

Input "Adınız ne";ISIM$

Bu programı çalıştırdığınızda ekranda adınız ne? yazacak ve sizden cevap bekleyecek. Herhangi bir şey yazıp Return'e bastığınızda programın çalışması duracak. Burada bu satırın yaptığı iş şu, kullanıcının verdiği cevabı ismi de İSİM$ yazıkları olsun tüh kullanacaksınız

tutturduğunuz rakam varsa bilgisayar onu * işaretiyle, farklı yerde tutturduğunuz

“Input “İnc DENEME

HM “EK TAHMIİN<TU “Loop “Print “Loop

yoruz alım ne alıp ISIM$ değişkenine koyuyor ve bizim o cevaptan haberimizin olmasıni

To :

sağlıyor. Birde şu programı — yazın — ve bakın: Do : FAHMIN20 : Input "Adın ne To 4 dostum ";ISİM$ PK: : Print "Merhaba ";ISIM$;" ‚benim

adım da AMIĞA."

If TAHMIİN- TU”

“Aferin

Sereen Öpen 0,440,400,2,Hires

“Tahminini soyle";:TAHMİN

'SAYI Then Exit AYI Then Print TSAYI Then Print '

“Sayın Buyuk.' Sayın Kucuk."

DENEME;" denemede bildin."

Program 2

: Colour : Dim

Cis 0: Home

Next :

Then

DK Else

Vak AŞ): Iİ,

AN!

Print "- SAY Do : AZI While Vak |

Ya bakın bilgisayar sizle nasıl konuşuyor. İnsanoğlu neler buluyor. Şaka bir yana herhalde programın nasıl işlediğini anladınız. İyi o zaman bu aylık bu kadar diyorum. Siz bu ay anlattığım For To Next'i iyice bir çalışın. Bakın size bir örnek: If A=5 Then Inc A : For J=1 To 4 yazın ve bilgisayarla bir süre oynayın, eğlenin. İçinde bazı bilmediğiniz komutlar var, inceleyin ve anlamaya çalışın. Şimdi profesyonellere: Loop : Loop Sizleri unuttum sanıyordunuz değil mi, yanıldınız. Sizler için de zevkli bir oyun programı ve bazı püf noktaları verdim.

Oyun programında bilgisayar 4 basamaklı bir sayı tutuyor, siz de 4 basamaklı sayılar söyleyerek onu bulmaya çalışıyorsunuz. Söylediğiniz 4 basamaklı sayının içinde aynı yerde rakam varsa + işareti ile söylüyor. Örneğin bilgisayarın tuttuğu sayı 5468 ise ve siz de tahmin olarak 4068 derseniz size 6 ve 8 rakamları için +, 4 rakamı için - der. Evet programlar bu kadar, bu arada mektuplarınızı da bekliyorum. Biliyorsunuz yan gelip yatarak AMOS

'Aferin!

| biliyorsunuz

Iİ BULMA OYUNU

mi tullum. ti ahminin nedir? : İnput * 0 or Leni TE)<>d iİnpul "> Cup:

ÜN Cmave 60,0

tahminde bildin."

al 1)

DV

J.D) Then İnc E

Print "

r SI Print ' r ESIrS(E)

Then Print ' Print " (

öğrenilmez. Hadi bakalım sarılın kağıda kaleme. Evet bu aylıkta bu kadar. Yukarıda da söylediğim gibi mektuplarınızı bekliyorum. Şimdi ben burada bir şeyler anlatıyorum da iyi mi yapıyorum kötü mü

yapıyorum belli değil, bir Allah'ın kulu çıkıp da bir şey söylemedi, yayıncılıkta mektup almayan köşeyi kapatırlar. Ona göre köşeyi okuyorsanız bunu bana hemen belirtin, azıcık da beni değil sevgili Editörümüzü delirtin (maalesef dergide bir kafiye salgını başladı, bakalım ne olacak -zebani).

yani