1 Nisan 1988 Tarihli Commodore Gazetesi Sayfa 47
PUPNOKLAş C-6GA4 için Püf Noktaları BURAK KİPER 1 PEEK VE POKE BASIC ile hazırlayacağınız oyunlarda kullanabilece- ğiniz bu POKE komutu ilginç efektler yapmanızı sağ- layabilir. 10 FOR J-0 TO 15: POKE 53270,J: NEXT J: GÖOTO 10 Bu program çalıştığında ekran, sanki deprem olu- yormuş gibi sallanacak. Daha da İlginç bir efekt yap- mak isterseniz FOR ... NEXT döngüsünü 31'e çıkarın. SAVE işleminin yapılmasını engellemek isterseniz aşağıdaki programı yazın: 5O0 POKE 818, 226: POKE 819, 252 60 POKE 818, 237: POKE 819, 245 Bu program çalıştığında SAVE komutunu vermeniz- le birlikte Cö4 açılış durumuna dönecek. ö0 numa- ralı satır SAVE komutunun normal şekilde çalışmasını sağlıyor. Eğer SAVE komutu verdiğinizde, Cö4'ün açılış durumuna dönmesi yerine başka bir şey olmasını İs- tiyorsanız, S0 numaralı satırı değiştirin. Bu satırda ya- pılmasını istediğiniz belirteç adresini verin. B değişke- ninde istenilen belirteç adresi yer alıyor. Örneğimiz- de Cö4'ün açılış durumuna dönmesini sağlayan be- lirteç B değişkenine yerleştirildi. 50 Bz—64738: Hlz INT[B!256] LO —B-256*Hl: POKE 818,L0: POKE 819,H Yapmış olduğunuz BASIC Programların RESTÖRE Tu- şu ile durdurulmasını istemiyorsanız SAVE komutunda olduğu gibi POKE komutu ile RESTORE tuşunu engel- leyebilirsiniz. 8Ü numaralı satır RESTORE komutunu ön- lüyor. 90 numaralı satır RESTORE komutunu tekrar iş- ler hale getiriyor. 80 POKE 792, 226: POKE 793, 252 90 POKE 792, 71 : POKE 793, 254 Bu komutların çalışmasından sonra RESTORE tuşuna basılması bilgisayarın açılış durumuna dönmesine se- bep olur. RESTORE tuşuna basıldığında başka bir ru- tinin çalışmasını istiyorsanız 80 numaralı satırı şu şekil- de değiştirin: 80 R-64738: Hl- INT[RJ'256] LO—R-256'HlI: POKE 792,L0: POKE 793, H R değişkenine istediğiniz rutinin belirteç adresini gi- rin. Klavyede her tuşa bastığınızda ses çıkmasını İster misiniz? Program döküm ekindeki PROGRAM-2'yi ça- lıştırdığınızda her tuşa basıldığında ses çıkaracak. Kur- sor RETURN ve fonksiyon tuşları için farklı sesler çıka- racak, OYUNLAR İÇİN KOLAYLIKLAR Panter Oyunu RESET edin POKE 12548, 255 SYS 4096 Artık 255 hakkınız var.
