Электроника МС 0511 · Вильнюс-Бейсик 1988.09.28

Тетрис на кассетном Бейсике

Это настоящий Бейсик, а не запись экрана: программа лежит в памяти машины, её можно править и запускать. Наберите RUN — и пойдёт тетрис, управление стрелками. Две версии отличаются одной подпрограммой: первая перепечатывает только изменившиеся клетки, вторая стирает фигуру целиком и печатает заново. Счётчик справа показывает разницу.

УК-НЦ · 80×24 · КОИ-7 готов

Программа в памяти

Формат экрана

Клеток напечатано

0напечатано
0стёрто

За последний ход:

Скорость

— вбок, — поворот против часовой, или пробел — сброс, P — пауза, Q — выход. Работают и A D W S, и раскладка БК 7 9 8 5. Щёлкните по экрану, чтобы он слышал клавиши.

Листинг — правьте и записывайте в память

Что здесь настоящее

Начертания букв сняты с самой машины: программа напечатала все коды от 32 до 255 в эмуляторе, снимок разобран по знакоместам. То, что вы видите, — шрифт ПЗУ УКНЦ.

Чего здесь нет

Это не эмулятор УКНЦ, а разборщик подмножества его Бейсика. Он повторяет диалект в том, что важно для программы, но не считает такты процессора. Настоящая машина — UKNCBTL с картриджем Вильнюс-Бейсика.

Правила диалекта

Один оператор в строке: двоеточия эта система не знает. Значимы две первые буквы имени, а SC, SY, LP и PO заняты системой. Графики нет вовсе, поэтому тетрис текстовый.

Откуда числа задержек

Скорость измерена на живой машине: холостой виток главного цикла — примерно 350 раз в секунду. Отсюда таблица гравитации: на нулевом уровне фигура падает на клетку за секунду.