AMOS THE CREATOR

• BASIC
• Müzik ve ses
• Program dökümü
• Kurslar ve dersler

TOR

Merhaba arkadaşlar. Bu ayki yazımızda, Amos'un ses Komutla rına kaldığımız yerden devam ediyoruz. İk olarak set wave ko mutu için bir örnek daha yazdım. Eğer Sonix programı nı kullanmışsanız, bu programın editing' yatı sesin dalga şeklini özelliğine sahip olduğunu da biliyorsunuzdür. İşte yazdığım program da bü işe yarıyor. yardımıyla ekrana çizeceğiniz bir sesi, 'set wave' komulu yardımıyla ses ka nallarına aktarıyor. Programın listesini aşağıda veriyorum:

Rem

Rem ** AMIGA DUNYASI
Rem ** AMOS Demo Program **
Rem ** Written by
Rem ** Burak Ozdemir
Rem ** AMOS Copyright 1990 **

Rem iririk

Limit Mouse 130,30 To 386,286
Dim (256)
Global
S$z””
WSC
SW
SA
Set Wave 3,5$
Set Envel 3,0 To 1,63
Set Envel 3,1 To 50,60
Set Envel 3,2 To 1,0
Wave 3 Tao 15
Volume 63
Da
If Mouse Key>0 Then Exit
Play 1,37,10
Wait 55
Loop
Procedure SW
Da
If Mouse Keyz1 and Scin(X Mouse,Y Mouse)-1 Then SW1
If Mouse Keyz2 Then Exit
Loop
End Proc
Procedure WSC
Screen Open 1,256,256,4,Hires
Screen Display 1,130,30,256,256
Palette 0,$FFO,$FO0,$F
Flash Off
Curs Off
Cis 0
Ink 2
Draw 0,128 To 255,128
Draw 128,0 To 128,255
ink 3
Box 0,0 To 255,255
For F-0 To 255

Next F
End Proc
Procedure SW1
Screen 1
XC-X Secreen(1,X Mouse)
YC-Y Screen(1,Y Mouse)
Ink 0
If Ol-z128 Then İnk 2
Plot XC,Ol
Ink 1
Plot XC,YC
End Proc
Procedure SA
For F-0 To 255
Next F
For F-0 To 255 |
If KE)<127 |
Else
|
End If
Next F |
End Proc
Programda, dalgayı sol moüse tüşü yardımıyla çiziyorsumuz.
Dalgayı çizdikten sonra, sağ mouse tuşuna basarak hunu dinle-
ineniz mümkün. Programda kullandığım “Set envel” komutunu
biraz sonra açıklayacağım. Şimdi komutlarımıza devam cdelim.

KOMUT: KULLANILIŞ: Noise to v

Bu komut, *v' parametresiyle belirtilen ses kanallarına gürültü işareti verir, Bu komut yerine aşağıdaki komutu da kullanabilirsi

Noise

niz:
Wave 0 to v

Rem

Rem ** AMIGA DUNYASI **
Rem ** AMOS Demo Program **
Rem ** Written by
Rem ** Burak Ozdemir **
Rem ** AMOS Copyright 1990 **
Rem ** Mandarin/Jawx *&
Rem iki ki ik tar
Noise To 15
Volume 63

Set Envel 0,0 To 10,63
Set Envel 0,1 To 50,63
Set Envel 0,2 To 20,0
Do
Play Rnd(96),80
Loop

KOMUT: Del wave KULLANILIŞ: Del wave n

Bu komut, “set wave” komutuyla hazırladığınız bir sesi silmek için kuHanılır. Komutun kullanılmasından ses kanalları sinüs dalgasına ayarlanır.

KOMUT: Ser envel KULLANILIŞ: Set cnvel da to s.g

Bu komut sesin şiddetinin zamanla değişmesini, yani zarf eğrisini (Envelope) ayarlamak içindir. Bu komut yardımıyla, en fazla yedi aşamalı zarf eğrileri hazırlayabilmek mümkündür. Günümüzde çok profesyonel olmayan synthesizer'ların büyük bir bölümünün en fazla beş aşamalı olduğunu dikkate alacak olursak, bu pek küçümsenmeyecek bir sayıdır. Bu kadar reklamdan sonra, gelelim komut parametrelerinin açıklanmasına: 'd', dalga numarasıdır. Her dalga için ayrı bir zarf eğrisi hazırlayabilirsiniz. 'a', zarfın o an ayarlamakta olduğunuz aşamasıdır. 0 ile 6 arasında değerler alabilir. 't', o an ayarlamakta olduğunuz aşamanın VBL cinsinden değeridir. 'g' ise, aşamanın sonunda sesin almasını istediğiniz genliktir. 0 ile 63 arasında değerler alabilir. Bu genlik değerleri bağıl değerlerdir; yani Volume komutu ile sesi kıssanız bile eğrinin şekli değişmez. Aşağıdaki şekilde bir zarf eğrisinin aşamalarını daha detaylı olarak inceleyebilirsiniz / genlik

Rem — AMOS Copyright 1990 ia

Rem ** Mandarin/Jawx
Rem &&
Rem kkk
Noise To 15
Volume 63

Set Envel 0,0 To 90,63
Set Envel 0,1 To 90,25
Set Envel 0,2 To 55,0
Da
Play 2,43,20
Play 8,50,30
Play 1,35,20
Play 4,30,300
Loop

hepiniz bazı programların, Amiga'nızın 'power' lambasının parlaklığını değiştirdiğini Bunun, Amıga'nın sesiyle ne ilgisi var diyebilirsiniz. Aslında bu lambanın bilgisayarın ses üretim sistemiyle direk bir ilgisi yoktur. Bunun yanında tek fonksiyonu, ilk bakışta görüldüğü gibi Amiga'nın açık olduğunu belirtmek değildir. Monitörünüzden veya Amiga'mzı bağladığınız müzik sisteminden istenmeyen hışırtıların gelmesini önlemek için, bilgisayarın ses çıkışına bir filtre bağlanmıştır. Fakat bu filire, perkusyon seslerinin ve çok ince seli efektlerin etkisini bozmaktadır. Bunun üzerine Amiga'yı tasarlayanlar. bu filtrenin programcı tarafından açılıp kapatılmasını mümkün kılmışlar. İşte bu İambanın diğer bir görevi de, bu ses durumu hakkında bilgi vermektir. Lamba parlak durumdaysa, filtre aktif haldedir. Lamba az bir ışık veriyorsa filtre cikisiz Eski tip filtre kapalı iken ışık tamamen sönmektedir. Bu yüzden şaşırmayın.

Şimdi hem “set envel' komutuna, hem de “noise” komutuna örnek bir program daha veriyorum. Bu program. okyanus kenarındaki dalga seslerini andırır sesler çıkarır.

Rem

Rem kl
Rem ** AMIĞA DUNYASI **
Rem** — AMOS Demo Program
Rem ** Written by
Rem ** Burak Özdemir .*

KOMUT: Led KULLANILIŞ: Led on Led off

Bu komut, anlattığım filtreyi açıp kapatmak için kullanılır.

Rem

Rem **

Rem ** DUNYASI
Rem ** AMOS Demo Program — **
Rem ** Written by

Rem ** Burak Özdemir
Rem ** AMOS Copyright 1990  **
Rem ** Mandarin/Jawx **
KEK
Noise To 15
Volume 63

Set Envel 0,0 To 10,63
Set Envel 0,1 To 50,30
Set Envel 0,2 To 20,0
Do
Led On
Play 25,80
Led Off
Play 25,80
Loop

Şimdi gelelim Amiga'yı kanuşturmaya. Amiga Basic'de olduğu gibi translate$ gibi bir komutla cümleyi önceden fonetiklere çevirmenin gereği yoktur. (İşte bir üstünlük dahal). Bunun için sadece iki komutumuz var:

Say KULLANILIŞ: Say Bu komutla 1$ string'i içinde bulunan kelimeleri okur. Yalnız (8'in son karakterinin olmasına özen gösterin. *m Çi lışma belirler. Afabileceği değerler, *0' ile 'V dir. Birinci modda program 1$'ı okuyana kadar bir sonraki komuta geçmez. Diğer mod ise, multitasking modudur. Bu seler program sına devam eder. Bu modun dezavantajı programı yavaşlatmasıdir.

KOMUT: Set talk KULLANILIŞ: Set talk

Bu Komut Amiıga'nın konuşma modunu belirler. sesin sözde cinsiyetini belirler. *0' kadın sesi içindir. 'm' konuşma modun belirler. Alabileceği değerler yine *0' ile *T'dir. İkinci seçenek konuşmaya değişik bir tonlama getirir. sesin fre kansıdır. *65' ile arasında değerler alabilir. 'h' ise konuşma hızıdır. *40 "ile arasında değerler alır. Bu komutları Uk kullandığınızda, *narrator.device" disketten yüklenir. Bu dosyanın disketinizde bulunmasına özen gösterin. Aslında narrator.device pek iyi hazırlarımış bir device değil; bu yüzden, bu komutları kullanırken biraz dikkatli olmanız gerekiyor. Eğer programlarınızda kullanacağınız bütün sesleri kendiniz yaratmak zorunda olsaydınız. işiniz epey zor olacaktı. Çünkü ne kadar yeteneli olursanız olun, gerçekte etrafımızda var olan sesleri taklıt etmeniz çok zordur. Böyle durumlarda, en iyisi bu sesleri hafızaya kopyalamak ve doğrudan oradan kullanmaktır. Bu olaya *Sampling' yani örnekleme adı verilir. Bu işi yapabilmeniz için sampler adı altında satılan ek hir parçaya sahip olmanız gerekiyor.

Fakat bu parçaya sahip değilseniz hiç üzülmeyin. AMOS, etrafta kolayca bulabileceğiniz müzik programlarının kullandığı hazır sample edilmiş seslerin çoğunu kolayca kullanabilme özelliğine sahiptir. Gelecek ay bunlara değinerek ses komutlarını bitirip, müzik komutlarına geçeceğiz. O zamana kadar hepinize iyi çalışmalar. Hoşçakalın...

İşte sabahleyin kalktığınızda duyduğunuz o güzel kuş seslerini bilgisayara kaydetmek ister misiniz? Ya da ailenizin seslerini bir diskete kaydedip onları ölümsüzleştirmek veya köpeğinizin sesinden bir müzik programı vasıtasıyla şarkı besteleyip ona dinletmek? Eğer profesyonelce düşünüyorsanız, kendi enstrüman setinizi kendiniz dizayn edebilirsiniz. Nasıl mı? Yapmanız gereken, sadece aşağıdaki devreyi gerçek hayata sokmak olacaktır. Bu bir Sound Sampler devresidir. Yani ses örnekleyici devresi. Bunun yardımıyla, bir teypten veya anfiden gelen sesi bilgisayara sayısal bilgi olarak depolayabiliriz. Daha sonra bu sesi değiştirmek, artırıp çoğaltmak, başka seslerle karıştırmak, tersten çalmak veya bir müzik enstrümanı haline getirmek çok kolay olur. Gerekirse, bu devreyle Amiga'yı bir osiloskop gibi kullanabilirsiniz. Devremiz ses girişi olarak +/- 2.5 Volt maximum girişe kadar sürülebilmektedir. Standard çıkış +/- 1 Volt olduğundan, devremiz bu tip preanfi çıkışlarına pek hassaslık göstermez. Devreyi bir teybin hoparlör çıkışından rahatlıkla sürebilirsiniz. Sampler'ımız mono bir sampler olup, hızı entegrenin kalitesine göre 30-40 KHz arasında değişmektedir. Bu, birçok kullanıcı için yeterli bir değerdir. Biz 555 Timer entegresini zorlayarak maximum frekansı göndermekteyiz. Ve ADC 0808 entegresini maximum örnekleme hızına çıkacak şekilde şartlamaktayız.