Bu sayfadaki yazılar
Sayfanın metni
Sayfa 48
CELAL HALLAÇ
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 koordinatı kartezyen koordinata çevirir.
Bu program A$ değişkenindeki mesajı ekrana eşkenar dörtgen şeklinde basar. T değişkeni ise başlangıç sütununu ayarlar.
Klavyeyle gezinmek için ← ve → tuşları.
Sayfa 49
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
ÖKE
:PRİNT <2SPACE>BURADA KAC ?
THEN; 90 PHEN PRİNT "<SDOWN><2SPA | 4 80 HATAY S1
198,1:POKE 198,0
E
10 DENİZ: INT(100xP/8)
OYNAM STIİYURMUSUNUZ? (EZH)" od | |
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 Üçgen: Bu program verdiğiniz açılım sayısına göre pascal üçgenini bulur.
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