Bu sayfadaki yazılar
Sayfanın metni
Sayfa 23
REM REM TEK TUSLA BASIC KOMUTLAR ** REM — - *x REM HAZIRLAYAN: SUAT BAYCILI REM IF THEN POKE S6 AZPEEK (56) PRİNT TFEN BEKLEYİNİZ. FOR TO X POKE
Bt157,B24:POKE B*158,234 PRİNT 4 TEK-TUSLA BASIC KOMUTLAR HAZIR
DATA 74 DATA DATA DATA
DATA SE DATA DATA DATA DATA EN DATA DATA
SAVE YAL, SYS,PRINTH
* 2.GRUP TOKENLER:COMM. TÜSÜ *
Klavyeyle gezinmek için ← ve → tuşları.
Sayfa 22
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