Bu sayfadaki yazılar
Sayfanın metni
Sayfa 14
CODER
AMOS
Serüvenimize devam ediyoruz.
Merhaba Programcılar. Kısa bir aradan sonra AMOS
Geçen ay dizileri ve matrisleri açıklamıştık, bu ay sizlere AMOS'un birkaç küçük komutunu anlatıp basit
Basic komutlarına geçmek istiyorum. AMOS'un birkaç küçük komutu dediğim şeyler, öğrendikten sonra bir daha unutmayacağınız kadar kolay birkaç komut. Örneğin bu komutlardan biri END. Zaten kolayca da anlayabileceğiniz gibi bu programınızı bitirmeye yarıyor. Diğer bir komut da EDIT. Bu da programı durdurmaya yarıyor fakat END'den farkı, programı durdurduktan sonra Edit Ekranına, yani program yazdığınız ekrana döner. Bunun dışında EDIT'e benzeyen bir komut da DIRECT. DIRECT komutu da Edit gibi programı durdurur fakat Edit Ekranı yerine Direct ekrana (Direct moda) geçer. Bu arada size Direct ekranı açıklamadığımı zannediyorum. Bu ekran AMOS'un program yazma dışındaki ikinci ekranı ve Esc tuşuna basarak buraya geçip hemen sonuçlarını görebileceğiniz programlar yazabiliyorsunuz. Diğer bir komutumuz STOP. Yaptığı iş ise programı durdurmak. Gördüğünüz gibi AMOS'ta programı durdurmak için bile birbirinden farklı birçok komut mevcut. Diyelim programdan çıkıp Workbench'e dönmek istiyorsunuz o zaman SYSTEM komutu imdadınıza yetişiyor. Programınızdan her türlü çıkış yolunu öğrendik de programı bir süre için durdurmayı öğrenmedik. Bu da WAIT komutuyla gerçekleştiriliyor. Nasıl mı kullanıyorsunuz? Diyelim programınızı 1 saniye için durdurmak isterseniz Wait 50 yazacaksınız. Neden 50 diye soracak olursanız şöyle bir açıklama yapayım. Wait komutundan sonra yazacağınız sayıyı sistem zamanı olarak yazıyorsunuz. Sistem zamanı da saniyenin 1/50'si olarak artıyor. Bu durumda 1 saniye 50 sistem zamanına karşılık geliyor. Hazır sistem zamanı kavramından söz etmişken size bilgisayarın bu zamanı, bilgisayarı açtığınızdan itibaren tutmaya başladığını da belirteyim. Bir şunu deneyin bakalım. AMOS'u yükleyin, Esc'e basarak Direct moda geçin ve PRINT TIMER yazın. Bunları yapınca ekrana bir sayı çıkacak, bu sayıyı 50'ye bölerseniz bilgisayarın ne kadar süre önce açıldığını öğrenirsiniz. Bu örnek sayesinde TIMER komutunun da ne olduğunu anladınız umarım. TIMER komutunun bir kullanılış şekli de şöyle:
Bölüm komutlar bitti. Şimdi sizlere Basic'in temel yapılarını anlatmaya çalışacağım. Konuya başlamadan önce neler anlatacağıma biraz değineyim. Anlatacağım şeyler aslında AMOS Basic'in değil de normal Basic'in de temel kuralları. Yani bu komutların aynıları veya benzerlerini başka Basic'lerde de rahatça kullanabilirsiniz.
işin püf noktası
Diyelim tablosu 1 3 diye bozuluyor ilk önce kolayı diyelim
Print Val RightS (Ser S 100).21 bir sidir. ol
Canınız öncek ama kolayın bu şekilde bilgisayarın sistem zamanını sıfırlamanız mümkün. Buradaki sıfır yerine istediğiniz bir sayıyı yazabilirsiniz. Bu komutla örneğin bir programınızın ne kadar zaman tuttuğunu öğrenebilirsiniz. Bunları size ilerde anlatacağım. Evet sıra son kısa komutlarımıza geldi. Bunlarda BREAK ON ve BREAK OFF komutları. Yaptıkları iş çok basit. Biliyor musunuz bilmiyorum bir AMOS programından çıkmak için CTRL ve C tuşlarına basmanız gerekir. BREAK OFF komutunun yaptığı işte bunu iptal etmek, yani programınızı kırılmaz hale getirmek. BREAK ON komutu da anlayacağınız gibi CTRL+C tuş kombinasyonunu tekrar işler hale getiriyor, yani programınız tekrar kırılabilir hale geliyor. Yalnız BREAK OFF komutunu kullanırken çok dikkatli olun, sonra programınızda bir döngü varsa ve BREAK ON'u kullanarak kendinize bir çıkış yapmadıysanız programınız sonsuz bir döngüye girer ve bilgisayarınızı resetlemekten başka bir diğerinden kat kat çareniz kalmaz. Evet tüm ufak tefek
Önemli Not
gelmişti. Programın aşağıya alınıyor. çalıştıramıyoruz. diye. İşte bu programların her satırını yazarken bir noktadan diğer noktaya olmayan satır başındaki sebepten
Şimdi 64'lerdeyken programların basımı konusunda bana bir şikayet kutusu geldi. İşte bu sebepten dolayı artık sığmayan kısımları Editör tarafından yazımı yüzünden kutu içindeki ufak bir nokta var. Siz programları noktaya kadar aynı satıra yazın. Yani başında üstündeki nokta olan satırın sonuna gelecek. Evet, artık ben yanlış yazmazsam programlarınızı rahatça çalıştırabileceksiniz.
anlayamıyor ve ni, SAYI değil ve pırlanta sil
Tabi bazı komutlara ilkel Basic'lerde mümkün değil, çünkü AMOS şu ana kadar çıkan Basic'ler arasında en üstün olanı. Konuları anlatırken komutların tüm özelliklerine aynı anda değinmeyeceğim, işinize yarayacak kadarki kısmı verip diğer özelliklerini yeri gelince anlatacağım. Evet anlatmaya başlayalım. Şimdi diyelim AMOS'u yüklediniz, ilk olarak ne yaparsınız. İsminizi ekrana yazdırmaya çalışırsınız. İşte böylece bayağı özellikleri olan
PRINT komutuyla karşılaşırsınız. Bu komutun ilk görevi ekrana bir şey yazdırmak. AMOS'u yüklediniz, hemen Edit ekranına şunları yazın ve F1'e basıp programı çalıştırın:
Print "Merhaba"
Böylece ekranda Merhaba yazdığını gördünüz. Gelin geçen aylarda öğrendiklerimizi çalışalım, AMOS'un pull-down menüsünden New komutunu seçip önceki programı silin ve aşağıdaki programı yazıp, çalıştırın:
ISIM$-"OMAY" Print ISIM$
Klavyeyle gezinmek için ← ve → tuşları.
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