Amiga Dunyasi - Sayi 19 (Aralik 1991).pdf - Retro Dergi

DERLEYİCİLER
sek hertz'de bir frekans değeriverilirse de, bu ses 15000 hertz
olarak üretilir. Aşağıdaki tablo,4 oktav için frakans değerlerini
gösteriyor:
Nota,OktavFrekans (hertz) Nota,Oktav Frekans (hertz)
c,l 130.82 c,3 523.28
d,l
e,l
146.83
164.82
d,3
e,3
587.28
659.28
f,l 174.62 f,3 698.48
g,l
a,l
196.00
220.00
g,3
a,3
784.00
880.00
b,l 246.94 b,3 987.76
c,2 261.63 c,4 1046.52
d,2 293.66 d,4 1174.52
e,2 329.63 e,4 1318.52
f,2 349.23 f,4 1396.92
g,2
a,2
392.00
440.00
g,4
a,4
1568.00
1760.00
b,2
c,5
493.88
2093.00
b,4 1975.52
süre, 0 ile 77 arasında bir sayısal değerdir. Sesin çalma süresinin
uzunluğu burada tanımlanır. Bir saniye 18.2 değerine karşılık
gelir. Maksimum değer olan 77, 4.25 saniye sürer. Aşağıdaki tabloyu,
süre hesaplamalarında kullanabilirsiniz:
Saniye olarak SOUND Süre Saniye olarak SOUND Süre
Süre
0.1
Birimi
1.8
Süre
0.8
Birimi
14.6
0.2 3.6 1.0 18.2
0.4 7.3 2.0 36.4
0.5 9.1 3.0 54.6
0.6 10.9 4.0 72.8
Diyelim ki 3.5 saniyelik bir sese ihtiyacınız var. 3.0 saniyelik
değere bir saniyeliğin yarısını ekleyerek istediğiniz değeri bulursunuz:
54.6+9.1=63.7
ses yüksekliği, bildiğimiz volüm ayarı. En yüksek ses 255, en
düşük ise 0 olarak kullanılıyor; tanımlı değer 127.
ses kanalı argümanı ise sesin 4 ses kanalının hangisinden verileceğini
belirler. 0 ve 3 sol ses çıkışını, 1 ve 2 sağ ses çıkışını tanımlar;
tanımlı değer 0'dır.
SOUND WAIT
SOUND RESUME KOMUTLARI:
Kullanım Şekli: SOUND WAIT
SOUND RESUME
SOUND WAIT, SOUND yönergesinde verilen ses dizisinin
çalmasını durdurur ve kalanını tutar. SOUND RESUME yönergesi
verilene kadar da çalmaz. Yani birinci komut bekleme, ikinci
komut kaldığı yerden devam sağlıyor.
Şimdi komutlarımızı kullanarak bir müzik çaldıralım. Bakalım
tanıyabilecek misiniz
SOUND WAIT
Bilgial:
READ frek,sur,vol,kan
IFfrek=-1 THEN Play
SOUND frek,sur,vol,kan
GOTO Bilgial
Play:
SOUND RESUME
DATA 523.23,15,127,0,659.28,15,96,1,784,15,96,2
DATA 784.15,15,222,0,987.76,15,180,1,1174.52,15,180,2
DATA 698.48,6,127,0,0,6,0,1,0,6,0,2
DATA 659.28,6,127,0,0,6,0,1,0,6,0,2
DATA 587.28,6,127,0,0,6,0,1,0,6,0,2
DATA 1046.52,15,225,0,1318.52,15,180,1,1568,15,180,2
DATA 784,24,180,0,987.76,24,160,1,1174.52,24,160,2
DATA-1,-1,-1,-1
SPACES KOMUTU:
Kullanım Şekli:
Dizi=SPACE$(uzunluk)
uzunluk ile belirtilen sayıda boşluk içeren bir yazısal dizi oluşturur,
uzunluk 0 ile 32767 arasında bir tamsayıdır. Bu tür yazısal
diziler ekran ve printer çıkışlarının formatını ayarlamak için çok
kullanışlıdır. Aynı zamanda ekrandan bir satır silmek için de kullanılabilir.
SPACES komutu ile başlık çubuğu olarak kullanılabilecek
renkli çubuklar da elde edilebilir. Aşağıdaki örnekte olduğu gibi:
COLOR 0,3
PRINTSPACE$(10)
LOCATE 1,3:PRINT"ADI:"
SPC KOMUTU:
Kullanım Şekli:
SPC(X)
Bir PRINT ya da LPRINT komutu içerisinde verilen x değeri
kadar boşluk basar. x, atlanacak boş karakter sayısını verir ve 0
ile 255 arasında bir değer alabilir. Genel kullanımı aşağıdaki gibidir:
FOR x=1 TO 3
PRINT SPC(x)"AMIGA"
NEXT x
Bu küçücük program, AMIGA yazısını ekrana her seferinde bir
karakter içeriden başlatarak yazar.
SQR KOMUTU:
Kullanım Şekli:
SQR(deger)
Verilen değerin karekökünü hesaplar, değer, sıfıra eşit ya da sıfırdan
büyük olmalıdır. Çeşitli değerler vererek fonksiyonu deneyebilirsiniz.
STICK KOMUTU:
Kullanım Şekli:
STİCKU)
Bu komut, Amiga'ya bağlı joystick ile ilgili bilgi verir. Birinci
mouse portundan takılan joystick A, ikinci porttan takılan joystick
ise B olarak kabul edilir. x değeri, iki joystick'ten hangisinin
ne yönde hareket ettiği hakkında bilgi verir:
Değer,
Bilgi
0 Joystick Tin x yönünde hareketi
1 Joystick 1 'in y yönünde hareketi
2 Joystick 2'in x yönünde hareketi
3 Joystick 2'in y yönünde hareketi
STICK(.v / ), joystick yukarı ya da sağa hareket etmişse 1 değerini;
STICK(x), joystick'in hareketleri birbirine geçmişse 0 değerini;
STICK(.v), joystick aşağı ya da sola hareket etmişse -1 değerini
alır.
STOP KOMUTU:
Kullanım Şekil:
STOP
Programın çalışmasını, açık dosyaları kapatmaksızın durdurur.
STOP komutu ile çalışması durdurulan bir dosya, CONT komutu
ile kaldığı yerden çalışmasını sürdürebilir.
Evet, bu aylık da bu kadar... Gelecek ay tekrar görüşmek üzere,
hoşçakalın.
AMIGA DÜNYASI 41