Bu sayfadaki yazılar
Sayfanın metni
Sayfa 8
PRINT Y TANE" PRINT ASCI II KOD'U X OLAN" PRINT DEGİSKENİ VER" PRİNT 3 X$'I N KARAKTER SAYISI" PRİNT : KX$'I N ASCII KODUNU VER" PRİNT : X SA YISINI SOZCUK YAP" PRİNT
SAYISAL YAP" PRİNT > YAZ" GET C$:1F RETURN PRİNT “<CLR>":POKE 53281.6:POKE 522 80.14:PRINT PRİNT PRİNT KOMUT U <RVSOFF >" PRİNT PRİNT ACE <SSPACE >-DOGRU-" ATACISPA CE YANLIS" PRINT 'ATA' PRINT 12818 PRINT PRİNT 34*5.18/3 *412<6SPACE PRINT "<3RIGHT>38<9SPACE 6“ PRINT PRİNT 'ATABEY' CER
PRINT GET Csc>" " THEN 2670 RETURN PRINT “<CLR>":POKE 53281.2:POKE 532 80.10 PRİNT PRO
GRAM MOD'U <RVSOFF >" PRİNT “<DOWN><ERİGHT> 4 SATIR NUMARA LARI TASİYAN PROGRAM DENİR, * PRİNT PROGRAM ANCA KOMUTU. ILABILIR.* PRİNT 4 PROGRAMDA AK SI SÖYLENMEDİKCE İSLEM<ESPACE >SIRAS I KUCUK SATIR” PRİNT “<UP DOĞRUDUR. *“ PRİNT BELLEKTEKİ P ROĞGRAML CERANA GETİRMEK <SSPACE 'LIST' KOMUTU" PRİNT PRİNT SECMELİ LİST ELEME DE PRİNT CE >38.SATIR PRİNT E0-7OÇASPACE >20 -?0 1 LİSTELENİR" *CE3RIGHTOLIST 7TA-CESPACE ATIR SÜNkaASI" PRİNT KuDmk ” PRİNT "IP RINT >”
FOR TO " RX * * > GET “ THEN 20230 RETURN > 93281.6:POKE 522 PRİNT “HOME 132 > FOR TO * 132 PRİNT " <198 PRİNT > SİRASİ <EVSOFF >” de PRİNT TC <119 FOR XMs1 TO 13:PRİNT K <193) PRİNT “<HOME>" 4 sa PRİNT PACE >-.* VE ) PARANTEZ” (237 PRİNT >* U S ALMA PRİNT CARPMA VEYA BOLME" <805)> PRİNT TOPLAMA VEYA PRİNT CC ÖNCELİKLİ PRİNT DORE ÖNCE V 1656) GET “ THEN 2990 <169) RETURN )> PRİNT S3080.10 <171> PRİNT “<HÜME KUMUTLAR DOGRULTUSUNDA" <154) PRINT “HESAPLAMALAR YAPABİLEN.KARSI LASTIRANILEN.KARAR VEREBİLEN E.MAKI NE. PRİNT E N GENELDE 3 İS <17e> PRİNT cccı" PRINT TABC9):"Bİ- ARITMETİK<ESPACE ,»B" PRINT TaB<C9):"B2- B“ PRINT KARAR PRİNT LER” eau: PRİNT 3PRİNT “<CTRU- 2: DUNYADA BİLGİ AYAKLAR. 1 <a2a5> PRINT "LARDA GELİSEREK KULLAN'LMAYA BASLANDI." PRINT “ANCAK O ZAMANIN BİLGİSAYARLA RI VE 1 DİLER." . PRINT “40 YIL TCİNDE 4 KUSAK GECİRE N BILGISAYARLAR 19830'LI YILLARA COK DAHA" <asa> PRİNT “HİZLİ .KUCUK . YUKSEK OLARAK GİRDİLER. PRIHT “GÜNÜMÜZDE BİLGİSAYARLAR HAYV ANCILIK e (146: PRİNT “HAVACILIK YAYIN. URCTIM SANAYI TİCARET. EĞİTİMDE KUL LANILMAK Tal IR * > ERİN” KULLANILM mk. TADIR” 127: GET “ THEN 23170 RETURN Ni ETT
Klavyeyle gezinmek için ← ve → tuşları.
Sayfa 9
Programımız C-64 için BASIC dili ile yazılmıştır.
Yüklenmesi normal yolla LOAD "AR-DOS" (disket kullanıcıları için LOAD"AR-DOS",8) komutu ile yapılmaktadır.
Programın yüklenmesi Dataset ile yaklaşık 90 sn. sürmektedir.
Disk-Driver kullanıldığında yükleme süresi 12 sn'ye inmekte ve program disket üzerinde 18 Blok kaplamaktadır.
Programın amacı, Elektronik cihazların tamir ve servisinde çalışan teknik personele her gün kullanabileceği bir 'ARIZA DOSYASI' sunabilmektir.
Program RUN edildiğinde önce size şifre sorulmakta, şifre doğru verilmediği takdirde program kendini bellekten silmektedir. Böylece programın yetkisiz kişilerce kullanımı engellenmek istenmiştir. Ben şifre olarak kendi soyadımı kullandım. Ancak bunu 940'ıncı satırdaki DATA'yı yazarken Commodore tuşunu basılmış tutarak yaptım. Sonuçta 'CEKER' sözcüğü yerine grafik karakterlerden oluşan bir şifre ortaya çıktı. 240 no'lu satırı istediğinize uygun biçimde değiştirerek çok farklı şifreler üretebilirsiniz.
Şifre doğru verilmişse karşınıza 'Yeni veya Eski Dosya' seçeneği çıkacaktır. Siz yeni bir dosya hazırlayacağınız için 'Y' harfini tuşlayacaksınız. Karşınıza çıkan MENU'ye göre artık dosyanıza Ekleme, Silme, Arama ve Çıkış yapabilirsiniz.
Ekleme yaparken aynı cins cihazları bir dosyaya kayıt etmelisiniz. Ben, standart olarak üç tip dosya kullanıyorum. Bunlar (B/W TV, COLOR TV ve VIDEO) dosyalarıdır. Ekleme yaparken 'arıza ve arıza nedeni' 'INPUT'larının 80'er karakteri geçmemesi yerinde olur. Belli bir cins cihaz ile bunları tek tek incelemek mümkün. Ancak C-64'ünüzü kapamadan önce ÇIKIŞ seçeneğini seçip 'E' yanıtı ile dosyanızı istediğiniz bir adla saklamayı unutmayın.
Eğer dosyalayacağınız cihazlar Siyah-Beyaz TV ise dosya adının "B/W TV-renkli TV ise "COLOR TV-video ise "VIDEO- sözcükleri ile başlamasına dikkat edin. "-" işaretinden sonra istediğiniz sayı veya harfleri (Toplam 16 karakteri geçmeden.) Çünkü dosyanızı başka bir zaman yüklerken adı sorulduğunda dosya adının bu ilk karakterlerine bakılarak kontrolu yapılacaktır. Eğer standart olarak isimlendirdiğim bu üç dosya dışında dosya açmak istiyorsanız 920-930 no'lu satırlar arasına ekleme yaparak özel dosyanızın sayfa ve ekran rengini seçmeniz ayrıca CI$ (cins değişkeni) değişkenine değer vermeniz gerekecektir.(*)
Daha fazla bilgi isteyen veya sorunu çıkan arkadaşlar bana yazabilirler. Tüm Commodore Programcılarına selam ve saygılar
(*) NOT: Örneğin Radyo'lar için bir dosya açılacaksa şu iki satırı ekleyiniz.