1 Ağustos 1989 Tarihli Commodore Gazetesi Sayfa 49

Önce & yazın ve sonra komutu tırnak işaretleri içi- — 64 MEMORY SAVER ne alın. Örneğin, 10 210" sürücü'yü başlatacaktır. C-64'te bellek alanlarını diskete save etmek için ge- reken Binary Save komutu yok diye üzülmeyin. bu so- runu Baslc kodunda yazılacak altı satır İle çözebilirsi- niz. Memory Saver ile belleğin makine dili rutini içe- ren bölümünü diskete hızlı yükleyen bir makine dili dosyası olarak yükleyebilirsiniz. Örnek olarak 49152 ve 49252 sayılı yerler arasında bulunan ve SYS 49152 İle harekete gaeçirilan bir yar- dımcınız olduğnu düşünelim. Önce yardımcıyı yükle- yip çalıştırın. sonra da ö4 Memory Saver'i çalıştırın. Başlangıç adresi olarak 49152 ve bitiş adresi olarak 49252'yi ve dosya adı olarak da örneğin “49152 UTİLİTY” girin. Yardımcıyı diskette öâ4 Memory Saver ile save ettik- ten sonra LOAD"49152 UTILİTY”,8, 1 İle yükleyebilir ve SYS 49152 ile çalıştırabilirsiniz. 64 PENCERELERİ Programcılar ilk baştan beri C-64 için pencere yar- dımcıları yazmakla meşguüller. Şimdi elimizde maki- ne dili için bir pencere sistemi var. Bu kısa, kolay ve programlarınızla koordine edilmesi kolay bir yardımcı. İki pencere oluşturan ve bunların nasıl oluşturulduk- larını gösteren bir demonstrasyon programımız da var. Program hafızada yeniden yerleştirilmeye uygun olmakla birlikte hata yeri 49152. Ondan sonra SYS 49152 ekran hafızasını koplayalacak, SYS 49263 bir pencere oluşturacak ve SYS 49335 ekran hafızasını ye- nileyecek. 64 Pencere sistemini harekete geçirdikten sonra aşağıdaki yerleri ekrandaki renk ve pozisyon pencerelerine değerlerine göre poke edin Sol taraf: Poke 251, (0-38) Sağ tara Poke 252, (1-30) Taban Poke 253, (1-25) Karakter Rengi Poke 254, (0-15) PROGRAM ADI ! PENCERELER socne PENCERELER 00010 J-491521FOR AsJ TO JY8S3LREAO DiCKe CK*ÖTPOKE A.DINEKT <150) l!' CK<)356di THEN PRİNT "DATALARD 08000 REM C-64 BELLEK SAVEEDİCİSİ <(230) 80010 INPUT "BASLANCIC ADRESİL")S <143)> ©8020 INPUT "BİTİS Wll'llll'l*l <ez9) 0003€ W'l' "DOSYA ADIC"IFSISYE STOİRFE cia9)> ooadda m 173,8/8561POKE 172.B-25G8PEEK C 173) <ı7>> ooa2a 782 .E/256 <068) A HATA VAR"TEND <B05) 00060 POKE 7G1,.E-2SGSPEEKC7O2)TEYE GSd0E <B0a) POKE 851.GıPOKE 292.291POKE ES3.101 POKE 254,14 <B213)> 000d0 GSYE 4d9152t15YS 49063 (039) 80050 PRINT CKRSCİB)EPCCSO)”EKRANI SAVE | CINI" 230)> 80060 PRİNT SPCC16)*SYSASISE" üda> JOYSTICK-KONTROLLÜ KURSOR 60870 PRIİNT SPCCSA)"PENCELER İCİIN" <033) BERSEER D L G e L D SELE? C-64 kursorunu kursor tuşları dışında bir şeyle hare- BKİNA et KALIR KM A ai | tesa> | — ketettirebilmek istiyorsanız C-64 kursor joystiği tam si- BÜLUR m: BEL LUROKL GÖĞ ETePOKK. CU .dL üŞ ze göre, SYS 49152 ile harekete geçirilen bu program- #01ka HKİNY GENECİAYANC ( NE Y KA MENTORE € da2. lanan bir joystick kursoru heryere ha- g0138 :ı'ı;u-r SPC(16)'6YSA9335" :ş:ı:: TOKGİ SİLEDİMON SAĞİGYOĞA 0140 PRINT GPCCEM)ĞIR TUBA GAG* SN easis Bu programın başka program işlemlerine hiçbir şe- 060150 GET K&tİF K&«"* THEN 158 <17a)> kilde müdahale etmemesi hoşunuza gidecek. Run- estore komutuyla durdurulabilir ve kursor hızı PO- KE 49174, X, girilerek ayarlanabilir. X burada 3len hızlı) ile 15(en yavaş) arasında bir değerdir. 78 ENO 00160 DATA 168.8216.134,100.,169,0.133.167. 1628,0.160.0.173.254.0.145.167.200 <055) 00180 DATA 1988.dö.1dd.B46,24.163.187.105, 40.,1339.187.165.160.,105.0.133.1606 <046) gozaa B3e. .B00.226.1682.0.,108.0 »Ü . 157,0.60,8232,.B2d .2S5.E08.245 <135) ü BOZL10 DATA 173,855.4,1d1.255.60.1682.8.188 *0.5.157.0.61.Bİd2.ddd .255.2060.245 <i110> PROĞGRAM ADI * JOYETİCK CURSOÖR 00220 DATA 173.855.5.141.2855.61.162,6.169 .0.6.157.0.6G2.232.224 ,255.000.245 <ada)> 00008 REMİ CURSOÖR-JÖYETİICK <0a2) 00230 DATA 173.253,6.141,255.62.162.0.168 00010 FOR T-49152 TO 482491 READ DİPOKE T .0.7.157.0.,63.232.204.255.200.B45 — <ila) .DECKECK #DENEKT <a26> sa2“8 DA .162.4.134.100.169,0.133.167 epore ıı eıumıııı THEN PRİNT "DATALARDA .*162.,0.172.8251.0.169.117.145.1067 <1e2) YAR"TEND <B813) PA3250 DATA 200.169.32.145.187.B200.20d.B52 60030 .1'. A9ISZLPRİINT w JOYSTİICK AK .*G.144.246,172.252.0.169.110.145 <187) TİIVE EOİLDİ" <014)> 00260 DATA 107.24.165.1067,105.40.,1332,167. DATA 180.1689,13.141.80.3.168.188.1 165,108.105.0.133.100,232.236.8253 <083) 41.21.3.80.96.234 ,234 ,234.206 .97 Ğlll) 00270 DATA 0.200.B18.178.851.0.168.180.14d 60050 DATA 192.200.73.169.d.141.97.1892,17 * 5.187.200.204.258.0.144.246.169 <1080)> 9.0.220.801.1827.240.61.169.1.133 <190) 00280 DATA 180.145. IW *96.162.0.109.0.60. 00060 DATA 199,1İ73.0.220.201.126.209.6.16 157.0.4.292 .224 .2959.200.245.,173 <ia3) 89,145,141.119.2.76.489.234.173.0 <058)> 60286 DATA E55.60. l!î *255.4.162.0.189.0.6 DATA 220.201.1825.200,8.1689.17.1di.1 1.157.,0.5.232.28d.255.200.245.173 <176)> 19.,28.76.49.234.173.0.220.201.118 <862)> 860308 DATA 855.6G1.1d1.82955.5.162.0.169.0.6 DATA 2089.8.168.89.141.119.2.76.894.1 B.157.,0.6.B32.28d4.,255.200.245.173 <185) 92,173.0.220.801,.123.200.5.169 <019)> 60310 DATA 255.62.141.8255.6.162.0.109.0.6 00090 DATA 157.,1d1.119.,.8,76.d9.834.d <07L)> 9.157.0.7.232 .Bdd .255.200.245.096 #(115) 49