1 Ağustos 1988 Tarihli Commodore Gazetesi Sayfa 51

CGA için yazılan BASIC programlarının çoğunda POKE komutlarının sık sık kullanıldığını görmüşsünüz- dür. Bu kornut sayesinde istenilen herhangi bir adre- sin İçeriğini kolaylıkla değiştirmek rmümkün olduğun- dan BASIC 2,0'da olmayan komutların İşlevlerini ra- hatlıkla POKE kormnutu yardımıyla gerçekleştirabiliriz. POKE kornutunu genellikle grofik ve ses efektlerini kontrol etmede kullanırız. Bundan başka POKE komu- tunu kullanadrak hafızaya makina dilinde yazılrmış programlar yerleştirilir. Bu işlemden sonra 5YS kornu- Tuyla program çolıştırılır. POKE komutu bir kerede südece bir byle değeri ha- fizcıycı yerleştirdiğinden KOR / NEXT döngüsü İiçinde büyük bir programı hafızaya yerleştirirken fazla mik- tarda zamcan kaybınca neden olur. Bu sebeple POKE komutunda ufak bir değişiklik ya- pürcak bir kerede birden fazla byte'i hafızcıyoı yazma- sını sağlayacağız. Her zaman küullarmakta olduğu- muz POKE komutunun yapısı şu şeklldedir: POKE cdres, byta Program Döküm Eki'ndeki İlk proğram çalıştığında POKE komutu yeni haliyle hizmete girmiş olacak. Ye- ni POKE Kornutunun yapısı: POKE ödres, bytel.byte,byte,...byte) Yeni POKE kornutu devraye girdikten sonra POKE koa- mMüutunu eski haliyle kullanabilirsiniz. Yeni POKE komu- tunda İlk yazdığınız değer hafızcıya yazılmaıya beş- İınacak ilk cadrestir. Yazılan byte'lar bu adreşten boş- lanarak hafızaya sırayla yazılmaya başlanır. 40 FOR X— 1024 TO 1029 : READY Y : POKE X,Y : NEXT Z20 DATA 72,69 76.76.79,33 Bu programı yeni POKF komutuyla aşağıdaki gibi yazabiliriz: 10 POKE 41024,72.69 76.76,79,33 FOR / NEXT ve READ komultlarını kullanmayarcık programın çalışmasını son derece hızlandırmış olduk. Programı doğru olarak yazdıkicın sonra RUN komu- tuyla çalıştırdığınızda yeni POKE komutu kullanımcı ha- zırdır. Yeni komutu etkisiz hale getirmek için bilgisa- yar açıp kapamanız yeterli olur. Eğer yeni POKE koa- mutunu programlarınızda kullanırsanız bu program- cığı programınıza eklemeyi unutmayın. Veya ilk ola- rak bu programı yükleyip çoalıştırın. OYUNLAR İÇİN KOLAYLIKLAR Burada sözü oyunlar için çeşitli kolaylıklar gönde- ren arkadaşlarımıza bırakıyoruz. Maraş-Magoöse-k,K.T.C.'den Salih Basri arkadıaışımız bize aşağıdeki ipuçlarını göndermiş. Kendisine teşek- kür ediyoruz. -Ball Oyunu yükleyip bilgisayarı resetleyin. POKE 20669,238 SYS 16939 Boall Crazy Oyunu yükleyip bilgisaycırı resetleyin. SYS 327854 (sonsuz hak) Krackout Oyunu yükleyip bilgisayarı resetleyin. POKE 35223,234 POKE 35224,234 POKE 35225,234 POKE 35242,234 POKE 35263 234 POKE 35264,2834 SYS 32837 (sonsuz hak) Frost Byte Oyunu yükleyip bilgisayarı resetleyin. POKE 4388, 165 SYVS 2825 (sonsuz hak) İstanbul'dan Onur Yattı cışağıdaki ipuçlarını gönder- rniş. Kendisine teşekkür ediyoruz. İnternational Karcta -- * tuşuüna basarük güneş ışığının denizdeki yansımc- sını değiştirebilirsiniz. B, Ö, U, S tüuşlarınc caynı cında basarak gökyüzünün renginl değiştirebilirsiniz. E ve S tuşlarıncı aynı anda basarak hareket etme- yen karatecilerin pantolonlarını düşürebilirsiniz. Balikesir'den Haydar Oğuz aşağıdaki ipuçlarını göndermiş. Kendislne teşekkür ediyoruz. Jinks Topunuz bir yere foakılıp çıkmıyorsa boşluk tuşuna basarak bir zelzele meydana getirebilirsiniz. Soldier | Oyunu yükleyip bilglsoayoarı resetleyin. POKE 2529,50 (50 hakkınız olur.) Arkancid I. düzeyi ışınlamadan sonunc kader biriktirebilirse- nİz sonsuz hak elde edebllirsiniz. 1942 RESTÖRE tuşuna basarok istediğiniz düzeye geçe- bilirsiniz. İstanbul'dan Arman Kundakçıağlu cışağıdaki ipuç- larını göndermiş. Kendisine teşekkür ediyoruz. Bone Cruncher Oyuna başlamadan El tuşuna basın. Kod soruldu- ğunda 'Gölemstenck' yazıp RETURN tuşüna basın. Ar- tık oyunca İkinci bölümden başlayabilirsiniz. Flatoon Dinamitle köprüyü havayo uçurduktan sonra köye gelin. 4 numarcl evde harita, â numaralı evda &l larm- bası var. 5& numaralı evden tünele gireblilrsiniz. Bulduğunuz oyun kolaylıklarırı diğer Commeodora'- cu arkadaşlarla paylaşmak isterseniz bize gönderme- yi unutmayın. Adresimiz: Commodore Dergisi Oyunlar İçin Kolaylıklar Köşesi Silakhane Cad. Ralli Apt. 5913 80200 Teşvikiye-İstanbul