1 Ağustos 1989 Tarihli Commodore Gazetesi Sayfa 50

DİSKET SÜRÜCÜSÜNÜN IŞIK GÖSTERGESİ Bu C-64 büyüsüyle programlarınıza renk katabilir- siniz. 15441 ya da 1574 disket sürücünüzün ışığının ya- vaş yavaş yanıp sönmesini sağlar. Bunun için önce SYS 49152 komutunu vermeniz gerekir. Onu run-stop/restore tuşuyla durdurup disket sürücü- nüzü kapatana kadar sürücüye ulaşmanızı da engel- ler. PROGRAM ADI © İSİK GÖSTERİSİ 64 DISKETSURUCU İSİK GÖSTERİSİ <ili) 00810 FOR Te49152 TO 48866G1READ DIPOKE T *DECKECK #DENEKT <156) ©d820 IF CKOLSdĞO7 THEN PRİNT "DATALARD A HATA N <177) 6806238 PRINT CHRSC47) "SURUCUNUN LAMBASINI AKTIFEDEBİLMEK İCİN SYS4S1S2 GİRİN" (168) 00040 DATA 1689.1.162.0.160.15,32.166.255. 169.0.92.108 3a2.188 «162 000650 DATA |. aı.nı.m 162.0.1689.77.32.2 Y0.855.169.45.32.B10.BS5.168.87 <165)> <183)> 92.210.R55.130.32.210.255.168. 5.32.8210.255.169.1.32,210.255 00070 DATA 1689.90.192,32,210.255.130.72.3 04 <aaı)> <aa3) <816) 804 .855.86.169.2954.170.32.21.5 .*S2.B1.S.B32 a) 8.248 m 138.72 .*73.B55,1686,169.248.141.8 ©0110 OATA 202.2086.246.169.240. ııı.o.ıuı.ı 36.200.248.104.170.896 <810) <093) RESTORE TUŞUNU KONTROL ETMEK C-64'te tüm tuşlara basılıp basılmadığını kontrol et- mek bir ya da daha fazla Peek komutu kullanılarak kolayca mümkün olabilir ama bu restore tuşu için mı:ırnkün değil Resîore Tuşu Kontrol Ruflnını kuııcına- rak run bu İşi yapcıbiıırslnız Program etkinliğe geçmek için RS-232 portunu mo- nitör eder ve diskete ulaşmayı normal tutabilmek için 673'e bir Ü poke eder. Yalnız bu rutini programları- nızda kullanırken RS-232 erişimlerinden (access) uzak durmayı unutmayın. PROGRAM ADI © RESTÖORE TUSU 00000 REM RESTÖRE KONTROLU <108) 60010 PRİNT CHKRSC147)1POKE 56500,.1tPOKE & — T7T3. <159) 60088 PRIİNT “<HOMESMESAJI GÖRMEK İCİN RES TORE TUSUNA K 60030 I1F PEEKC6E73)S128 THEN POKE 673.11 GOTO 58 <dal)> 66846 GOTO 820 <a226) 60050 PRINT “<CTRL-İ)BİTİRMEKİCİN RESTORE TEKRAR tr* <ı7a) 00060 IF PEEKCE73İ)s188 THEN PÜKE 673.01 END 66878 GOTO GE <032) 64 KLAVYE BUFFER GENİŞLETİCİSİ C-64 Klavye Buffer'ı dinamik bir klavye olarak kul- lanılacağı zaman gerçekten kısıtlamalar getirmekte- dir. -on karakterlik bir kapasitesi var. Genişletici ona yeni bir bellek yeri vererek buffer'ın kapasitesini 245 karaktere çıkarten kesilme (İnterrupt) dinamikli bir yar- dımcıdır. Programı yazıp çalıştırdıktan sonra onu aynı defa- ult buffer'ı gibi kullanabilir ve programlayabilirsiniz. 255 karakterlik kapasitesiyle bu programı klavye ru- tinlerinizde kullanmak isteyeceğinize hiç kuşku yok. PROGRAM ADI © KLAVYE BUFFER 00000 REM KLAVYE BUFFER GENİSLETİCİ 00010 AsGürBâ25510-5633410465535:'POKE 1.5 SrePOKE C.PEEKCC) AND <B-İ) sco2e m aı?.ıım A40,.168:POKE nız Bt BtPOKE A.BIPOKE AtHL.BtSYS <835) <Bd42)> <146)> dllll 060030 POKE O.PEEKCOYLPOKE C.PEEKCC) OR lt POKE C-9,SG:POKE 1.53 POKE *ÖtPOKE 588606.18982:POKE 5G BiÖ.1tPOKE 568911.1898 POKE 58813.G1POKE S5Sa01d.188 POKE GOZE POKE GÖZ22.1882:POKE Bd 9.255 <087) 8078 REM DEMO <118) 08088 PRİNT CHRSÇ147)"GENİSLETİLMİS KLAVY " <250) 00048 <0i * <ga20:> 800858 <059)> 68080 FOR Te48iS2 TO 494071POKE T.GSLNEKT ıPOKE 198,255 <a FLAŞLI 64 DİSKET YÜKLEYİCİ Bunları direkt modda ya da programlarınızda kul- lanarak program yüklemeyi daha az sıkıcı hale geti- rebilirsiniz. Programı yazıp çalıştırdıktan sonra disket sürücüsünün bir dosya yüklediği her seferinde ekran kenarında hızla 16 renk yanıp sönecek ve hareket edecel k. Bu kesilme (interrupt) ile çalışan program başka programlardan etkilenmez. Run-Stop/restore tuşuna basarak onu durdurabilir ve POKE 1,53 ile yeniden ça- lıştırabilirsiniz. PROGRAM ADI © FLASLI LOADER 00000 REM C-64 FLASLI LOADER 00010 A-0891Be2551C045633410465535:POKE 1.5 tPOKE C.PEEKCC) AND <B-1) POKE Â*7.GrPOKE A48.160tPOKE As2.Bt POKE A*3.BtPOKE A.BtPOKE AH1.BISYS 41919 60030 POKE D.PEEKCO)!POKE C.PEEKCC) ÖR lt POKE C-8.S6GtPOKE 1.53 60040 FOR Ts678 TO G79481READ DIPOKE T.01 NEKT <148) <035)> <250)> 1 ©0050 DATA 230,32.200.120.169.,0.76.22.238 <015> 00060 POKE 60947,76:POKE 60948.167:POKE & 0948.8 <133) OYUNLAR İÇİN KOLAYLIKLAR Bu sayımızda yine sizlerden gelen oyun ipuçlarını yayınlıyoruz. Commodore'cuların birbirleriyle haber-