Bu sayfadaki yazılar
Sayfanın metni
Sayfa 48
Derleyen Celal HALLAÇ
Bir ay daha geride kaldı ve posta kutumuz büyük bir açlıkla sizlerden gelecek olan (en azından öyle umduğu) paketleri bekledi. Bekledi fakat pek bir sonuç alamadı. Son saniyede diyebileceğim bir zamanlama ile Ersin KAYGAN arkadaşımızın paketi imdadımıza yetişti. İlk sayfada tam ondört program yolladığını belirtiyordu fakat ikinci sayfada sadece altı program görünce “acaba eksik mi” diye düşünmeye başladım. Yazının sonunda ise şaka yaptığını, sadece altı program yolladığını yazmış. Biraz hayal kırıklığına uğradık tabii. Neyse bu kadar hikaye yeter sanırım. Eminim ki hepiniz yeni programlarınıza kavuşmak için can atıyorsunuzdur. Bu ay, programlarınızın arasında M.D.E. (Makina Editörü) ile yazılması gerekenler de var. Eğer bu program elinizde yoksa hemen bir arkadaşınızdan edinin ya da bir kağıt kalem alıp vereceğim adrese boş kaset ya da disketinizi, kendi adresinizi, istediğiniz programı ve 4.000 TL'lik posta pulu gönderin.
Bu olanak diğer döküm eki programları için de geçerlidir (şimdilik sadece 40. sayıdan sonrakiler için). Artık başlayalım mı, ne dersiniz? Bu ayın iki Abur Cubur'cusu Hakan Arıbaş. Bize yolladığı dört programı da yayınlıyoruz. Ersin Kaygan ise altı tane yollamış fakat ondan da sadece dört tanesini yayımlayabiliyoruz. Ersin ve Hakan arkadaşlarımıza teşekkür ediyor ve programların devamını bekliyoruz.
Bu ay bir de beklenmedik misafirimiz var: Harun Kalıpçıoğlu. Döküm eki için yolladığı program biraz kısa olduğu için Abur Cubur'a transfer ettik ve emekleri için kendisine de teşekkür ediyorum. Bu aylık benden bu kadar. Sayfayı programcılarınıza bırakıyorum ve hepinize iyi çalışmalar diliyorum.
NUMBERS Ersin KAYGAN Merhaba Tayfun, nasılsın? Programın açıklaması içinde, Deneyin Görün.
Klavyeyle gezinmek için ← ve → tuşları.
Sayfa 49
RENUMBER Hakan ARIBAŞ RENUMBER (başlangıç satır no), (artış miktarı) şeklinde kullanılır ve programlardaki satır numaralarını yeniden belirlemeye yarar. Fakat programın bir açığı GOTO GOSUB gibi komutları gösterdiği satır numaralarını değiştirmiyor. Ona da elden yapabilirsiniz.
PROGRAM. «© RENUÜMBER COS&C
PLEASE SHINE Ersin KAYGAN A$ değişkenine programın adını, B$, C$ ve D$ değişkenlerine ise mesajınızı yazıp açılış rutini olarak kullanabilirsiniz.
RAMLARINIZI YERLEŞTİRİNİZ! *
SPEED Hakan ARIBAŞ C64'ün zamanlaması ile oynayarak bilgisayarın işletim sistemi için kullandığı zamanlamasını değiştirir. Komut parametreli ya da parametresiz kullanılabilir. SPEED komutundan sonra 0-255 arası bir değer yazılıp RETURN'E BASILIR. Sadece SPEED yazılırsa bilgisayar ilk hızına döner. Hız farkını daha iyi anlamak için aşağıdaki programı önce SPEED 10 ile sonra da SPEED 255 ile deneyin. 10 TI$ = “000000” 20 FOR A = 1 TO 100 30 B = BYA: 40 PRINT “SURE = “; TI/60
YOUR SCREEN Ersin KAYGAN Bu program ekranınızın tüm kenarlarda kapanıp açılmasını sağlar.
PROGRAM ADI : YOUR SCREEN
00010 CLR:FOR A:49152 TO 49200:READ | *B:POKE A,B:NEXT. 00020 1F C€<>5637 THEN PRİNT 00030 POKE 56325,255:5Y5 © 00040 DATA 120,169,13,141,20,3,169,192,14 1,21,3,88,96,169,7,141,22,208,169,1. 00050 DATA 17,208,162,0,16 ,232,224,0,208,246,169,27,141 8,169 “00060 DATA
<080> <201)> <163>
LINE Hakan ARIBAŞ Program C64'e GWBASIC'teki AUTO komutunu ekler. Bu komut basic ile program yazarken her satırı girdikten sonra yeni bir satır numarası belirmesini sağlar. Böylece her seferinde yeni satır numarası yazmaktan kurtulursunuz. Kullanılışı ise LINE (Başlangıç satır no), (artış miktarı) LINE 100,10 gibi. Komut parametresiz kullanıldığında son kullanılan satır numarasından itibaren çalışmasına devam eder