1 Ağustos 1989 Tarihli Commodore Gazetesi Sayfa 33

sesler için, bit 1'i POKE SD -4 4 PE- EK(SD 4 4) AND 254 işlemi ile ka- patmak gerekiyor. Programdaki si- ren sesinin çözülmesi gerekmediğin- den bu işleme gerek duymadım.) Kontrol kütüğünün bit 1'i şimdi ayarlanmış olsa bile hâlâ ses yoktur. Çünkü SD ve SD4- 1 frekans kütü- ğündeki değerler hâlâ O'dır. (Ü fre- kans oldukça sessizdir.) Bu siren ru- tininde değişir, ses yükselir ve sesi ka- pat rutininde seş dalar ve durur. Satır 190, frekans düşük byte'ına 1 ve satır 200 frekans yüksek byte'ı- na değişken bir değer (x) yerleştirir. Program iki FOR-NEXT döngüsün- den her geçişinde, yüksek byfe kütü- ğündeki değer 1'le değişir, bu da tüm frekans değerini 256 ile değiştirmek- le aynıdır. (Yüksek byte'ın 256 ile çarpıldığını unutmayın, bu rakam düşük byte'a eklenerek frekans sayı- sı bulunur.) Satır 210-280 sesi uzatmak için bir düşüş döngüsü kullanır. 1. dökümü yazdıktan sonra SAVE edin. Bu programdaki değişkenlerle oynayarak deneyler yapabilirsiniz. Satır 110'da değişik bir dalga biçimi kullanmak iyi olabilir. Sirene bir iki ses daha ekleyebilirsiniz. Bunun için ses2 ve ses3'deki ses kütükleri ayar- lanabilir. DOĞAYA DÖNÜŞ Döküm 4'de C-64 için cırcır böce- ği sesi çıkartan bir program var. Bu programı kurbağa sesi çıkartan bir programa dönüştürebilirsiniz. Bunun için dökümdeki 130 satırı POKE SD 4 1,20 yapın. Şöyle bir 135. satır ekli 135 POKE SsD,X 2 ve 160 satırı değiştirin: 160 DT-20: GOSUB 200 PüOüRAM AÖI | CİECiM GÖCCÜL #0010 I:ıı :ııcıı GöCcEĞl GÖĞÜÜ G0 ööadü ııaıı.ı dĞLAZM Gİü' ı ıı:ın ı:ı' 830 : Böğdü POKRE w &4 UBLREM (d15r —:l l cağbı diğLACe SÖĞ VECT (cağı ı —?I DT nıw SEĞERCM — OUĞUZ tüğd : GÖRÜĞ ti ııı ı:ı rııwı (0301 ııııı ıvııııı <801> (8T6> “Hİ lt!l Glk CIACIR SEĞL (50d> öLdü FOR N1 TO Z MİLL Gördü WOKE SÖÜ . HÜSEREM FECKANİ (erdı 00140 FOÖKC GÜ4 . İĞEREM ÜVCĞÜN DALĞA BÜCİM 00150 POKE G044.PCCKCADSA) Ö€ l *D0Ğ ) “l“ GİMIM BöĞde veğdı K04 .PECK(BÖSAT AD EEMNACM cöĞÜr ıiııı ıııı:ı *RETURN UU 1ğa HUU lll' GUĞUĞ BUTİNİ «13Tı _ıll. İ_ OCsi TÖ ÖOTENCET #ACTURN t188) -ı:ıuıı ACOET RUTİNİ mıuxımıııı—ıııoııcıv l(î Şimdi oyu değiştirelim. Dal- ga sesine ne dersiniz? Döküm 5 size dalga sesi sunacak. Dalga sesinden sı- kılıp havai fişek patlaması duymak istediğinizde 70. satırdaki ATAK de- gişkenini (A) 3 yapmanız yeterli. Ma- kineli tüfek sesi duymak istiyorsanız 130. satırdaki DÜŞÜŞ döngüsünü kı- saltın. Umarım sesler güzeldir. Ve yine umuyorum ki bu yetersiz yazının yar- dımıyla arkadaşlarınız ve programla- rınız için birbirinden güzel sesler üret- meyi başarırsınız. #RÖĞRAM AĞI * KUTUK ACGET PÜ ©0810 KeMİĞ: ©e7 aaöza ıı ıııııoıı—ıııı THEM KBü lENDA ııı 180 ICİN can> söara yen KULDUMCDAĞ MLPOKE JA CM *" 402.E3 . 108 .0.1ETUREM eüM “ Mlh 0.212.Daz .HO0 .rdü “a36> 00000 DATA l4i G.BLEÜĞ