Abur Cubur

Celal Hallaç · Commodore sayı 64, Haziran 1991 · sayfa 48, 49, 50

ABURCUBUR

Bir ay aradan sonra tekrar tıkanmaya başlıyoruz. Aslında pek de tıkanamıyoruz çünkü siz yine bir şey yollamadınız. Buradan okuyup yazması kolay geliyor tabii. Eğer gerçekten de bir abur cuburcu olmak istiyorsanız kendi ürettiklerinizi diğer arkadaşlarınızla paylaşmalısınız. Kısa nutuktan sonra işimize başlayalım, bu ayın talihlisi de kendilerini CMC Computer Club adıyla tanıtan Mahir Çipil ve Caner Şimşir arkadaşlarımız. Aslında çalışmaları fena sayılmaz ama daha ilerlemeleri gerekiyor. Bize tam 15 adet program yollamışlar. Sağ olsunlar iyi de etmişler. Biz ise bunlardan 9 tanesini sizlere sunmaya değer gördük (sakın alınmayın çocuklar). Ayrıca 10 üzerinden not verip vermeyeceğimi soruyorlar, o sadece bir şakaydı. Evet işte tam ağzınıza layık dokuz şapırtılı şupurtulu program. Yapanların ellerine sağlık.

Türkçe: İşte Türkçe klavye programı. Türkçe karakterler için harflerin İngilizce'deki benzerlerine SHIFT ile basın.

Şişman Commodore'ların favori

köşesi Abur-Cubur'a hoş geldiniz. Geçtiğimiz ay yer sıkıntısı yüzünden Abur-Cubur'suz geçmişti. İşte yine yeni programlarla karşınızdayız.

Polar to kartezyen: Bu program polar koor-

Bu program A$ değişkenindeki mesajı ekrana eşkenar dörtgen şeklinde basar. T değişkeni ise başlangıç sütununu ayarlar.

46,7: A$= "COMMODORE": D=LEN(A$):K=1:T

Fast Game: Gözünüzün görme yeteneğini belirleyen bir programdır. Programdan çıkış için sorulan soruya 99 ile cevap verin. Böylece başarı oranını da görebilirsiniz.

F
PROGRAM ADI : FAST GAME
00001 REM * FAST CAME *
ÖKE
:PRİNT
<2SPACE>BURADA KAC ?
THEN; 90
PHEN PRİNT "<SDOWN><2SPA
| 4
80
HATAY
S1
198,0: WAIT
198,1:POKE 198,0
E
10
DENİZ: INT(100xP/8)
OYNAM
STIİYURMUSUNUZ? (EZH)"
od |
|
00140 SYS
110
“PH” THEN 110

Flash: Bu program A$ değişkenindeki mesajı sağdan sola patlatarak kaydırır. H değişkeni geçiş sayısını ayarlar.

L :G0TO &

Pascal Üçgeni: Bu program verdiğiniz açılım sa-

CAL ÜCGENİ
00001 ÜCGENİ
00010 ASPACESACILIM
M
“FOR Le2 To 9;
FOR TÜ M:FOR Hs1 TO İI:PRİ
Nİ NEXT :N
EST |
00060 POKE
<010>
|
198,0

Shaker: A$ değişkenindeki mesajı hoş bir efektle B.E.B.: Bu program verilen iki sayının sunar (merak eden yazar!). O.B.E.B.'ini hesaplar.

CLR:. 2 TO x modorecular

Vücud Alanı: Boyunuzu ve kilonuzu yazarak vücudunuzun alanını öğrenebileceğiniz bir program.

COMMODORE 64

10/ ¡poCu

COMMODORE