Bu sayfadaki yazılar
Sayfanın metni
Sayfa 25
00010 REM KKKA REM ** TEK TUSLA BASIC KOMUTLAR *x REM ** - - 00013 REM *& HAZIRLAYAN: SUAT BAYCILI *& ©0014 REM 00015 00016 IF THEN
TEK-TUSLA BASIC KOMUTLAR HAZIR
DATA 7a DATA DATA DATA
DATA SE DATA DATA DATA DATA EN DATA DATA
* 2.GRUP TOKENLER:COMM. TUSU * 175,163,160:REM AND,TABC,CLO
Klavyeyle gezinmek için ← ve → tuşları.
Sayfa 24
Sinclair Spectrum kullanmış olanlar bu bilgisayarda BASIC komutlarının tek bir tuşa basarak yazıldığını bilirler. Diğer bütün bilgisayarlarda olduğu gibi Commodore'da da BASIC komutları harf harf tam olarak yazmak gerekir, tabii hiçbir hata yapmadan...
Fakat PRINT yazıp RETURN'e bastığımız zaman Commodore-64'ün belleğine aldığı şey, P, R, I, N ve T harflerinin tek tek ASCII kodları değildir. Sadece ve sadece tek bir bayt, 153 rakamıdır. Diğer bütün BASIC komutlar için de bu böyledir. PRINT yazmak yerine ? işareti koymanın da mümkün oluşu, tesadüfen ? işaretinin ASCII kodunun da 153 oluşudur. Bunun dışında tüm BASIC komutlar için Commodore'un ROM'unda birer rakam mevcuttur, bunlara TOKEN'ler denir.
Demek ki BASIC komutlarını uzun yazmak yerine bu tokenleri kullanabiliriz. Tabii bu işi doğrudan doğruya yapmak çok zor. Aşağıdaki programı önce LOAD ve RUN ederseniz, makine kodu da belleğe yerleşir ve kendi kendini NEW ettiğinden, yazacağınız programa herhangi bir şekilde engel olmadan görevini yerine getirmeye başlar. Verdiğimiz listeden göreceğiniz gibi, bu BASIC komutları va Commodore tuşu ya da shift tuşu ile birlikte bir tuşa basarak elde edebileceksiniz.
Program dökümünde hangi tokenin hangi BASIC komuta ait olduğu REM'ler halinde belirtilmiştir. Bunları kendi arzunuza göre değiştirebilirsiniz, ya da benim X işareti olarak boş bıraktığım yerlere siz başka BASIC komutlar yazabilirsiniz.
Token | BASIC komut Commodore-A | 175 | AND Shift-A | 198 | ASC Commodore-B | 163 | TAB( Shift-B | 166 | SPC( Commodore-C | 160 | CLOSE Shift-C | 199 | CHR$ Commodore-D | 135 | READ Shift-D | 131 | DATA Commodore-E | 128 | END Shift-E | 128 | END Commodore-F | 129 | FOR Shift-F | 129 | FOR Commodore-G | 141 | GOSUB Shift-G | 137 | GOTO Commodore-I | 139 | IF Shift-I | 133 | INPUT Commodore-L | 147 | LOAD Shift-L | 200 | LEFT$ Commodore-M | 202 | MID$ Shift-M | 143 | REM Commodore-N | 130 | NEXT Shift-N | 162 | NEW Commodore-O | 59 | OPEN Shift-O | 176 | OR Commodore-P | 194 | PEEK Shift-P | 151 | POKE Commodore-R | 201 | RIGHT$ Shift-R | 142 | RETURN Commodore-S | 169 | STEP Shift-S | 148 | SAVE Commodore-T | 167 | THEN Shift-T | 164 | TO Commodore-V | 149 | VERIFY Shift-V | 197 | VAL Commodore-Y | 158 | SYS Shift-Y | 158 | SYS Commodore-Z | 153 | PRINT Shift-Z | 152 | PRINT