Compucolor BASIC tokenized file
The Compucolor computer line was one of the first to support color in text modes as well as graphic mode. The original Compucolor I used an 8-track tape drive to store programs, while the later and more popular Compucolor II had a 5.25" disk drive. BASIC programs had a .BAS extension. The BASIC language was an adapted version of Microsoft BASIC (as was true of many BASICs of the time).
Not much information is readily available about its tokenization system, but it was presumably similar to that of the other Microsoft BASICs, which tended to have the same general scheme, differing only in the specific token assignments. (See articles on other tokenized BASICs for more details.) Some clues as to the possible token values can be seen in the April 1979 newsletter for Compucolor users (the particular part of relevance is at page 33 of the PDF linked below) where shortcut keys for various BASIC commands are listed. These keys use the Control or Command keys along with letters, numbers, or symbols. It is likely these have some correspondence with the token values, most likely with the Command-plus-letter keys representing the high-bit-set version of the control character corresponding to the given letter (e.g., Command-B standing for hex 82, which is Control-B with the high bit set), and the Control-plus-number-or-symbol perhaps representing the high-bit version of that ASCII character. This would produce a token set not much different from those of the other BASICs.
Tokens
(likely tokens reconstructed from clues as noted above)
| Hex | Dec | Token meaning |
|---|---|---|
| 80 | 128 | END |
| 81 | 129 | FOR |
| 82 | 130 | NEXT |
| 83 | 131 | DATA |
| 84 | 132 | INPUT |
| 85 | 133 | DIM |
| 86 | 134 | READ |
| 87 | 135 | FILE |
| 88 | 136 | GOTO |
| 89 | 137 | RUN |
| 8A | 138 | IF |
| 8B | 139 | RESTORE |
| 8C | 140 | GOSUB |
| 8D | 141 | RETURN |
| 8E | 142 | REM |
| 8F | 143 | GET |
| 90 | 144 | OUT |
| 91 | 145 | PUT |
| 92 | 146 | PLOT |
| 93 | 147 | SAVE |
| 94 | 148 | LOAD |
| 95 | 149 | POKE |
| 96 | 150 | |
| 97 | 151 | LIST |
| 98 | 152 | CONT |
| 99 | 153 | CLEAR |
| 9A | 154 | DEF |
| 9B | 155 | WAIT |
| 9C | 156 | ON |
| 9D | 157 | TAB( |
| 9E | 158 | TO |
| 9F | 159 | FN |
| A0 | 160 | SPC( |
| A1 | 161 | THEN |
| A2 | 162 | NOT |
| A3 | 163 | STEP |
| A4 | 164 | + |
| A5 | 165 | - |
| A6 | 166 | * |
| A7 | 167 | / |
| A8 | 168 | ^ |
| A9 | 169 | AND |
| AA | 170 | OR |
| AB | 171 | > |
| AC | 172 | = |
| AD | 173 | < |
| AE | 174 | SGN |
| AF | 175 | INT |
| B0 | 176 | ABS |
| B1 | 177 | CALL |
| B2 | 178 | FRE |
| B3 | 179 | INP |
| B4 | 180 | POS |
| B5 | 181 | SQR |
| B6 | 182 | RND |
| B7 | 183 | LOG |
| B8 | 184 | EXP |
| B9 | 185 | COS |
| BA | 186 | SIN |
| BB | 187 | TAN |
| BC | 188 | ATN |
| BD | 189 | PEEK |
| BE | 190 | LEN |
| BF | 191 | STR$ |
| C0 | 192 | VAL |
| C1 | 193 | ASC |
| C2 | 194 | CHR$ |
| C3 | 195 | LEFT$ |
| C4 | 196 | RIGHT$ |
| C5 | 197 | MID$ |
| C6 | 198 | ? |
Documentation
- Compucolor newsletters
- Compucolor II manual; has character set chart and description of control and escape codes
- Compucolor II programming manual rev 1
- Compucolor II Programming manual rev 2
- More Compucolor info
