Тетрису 30 лет.

[Alex_K]

Ну ладно, я ещё допустим могу поверить, что один и тот же паскалевский исходник можно собрать на двух машинах, если эмулируется или используется стандартный вывод на терминал (например VT52).

Не соберёте, там активно используется сервис RT-11, типа ввода с клавиатуры через EMT 341, ну ещё кое-что. OMSI Pascal немного отличался от стандартного Паскаля, были кое-какие расширения, которые активно использовались.

- - - Добавлено - - -

Белый экран встраиваемого МС 6105 становится сначала зелёным

А ещё обратите на верхнюю строку в редакторе. Я чего-то таких в RT-11 не припомню. Особенно имя файла B:TETRIS.PAS. Такое ощущение, что это не RT-11, а CP/M.

- - - Добавлено - - -

Нашёл этот фрагмент (в видео обсуждения фильма - 6:26). Вот не верится, что в OMSI Pascal-е на ДВК прошло бы имя TERIS.ROTATEBLOCK

Правильно сомневаетесь. Попробовал в компиляторе версии 1.2, на чём собственно написан и тетрис, вот результат:

LINE  STMT LEVEL NEST   SOURCE STATEMENT


   1                     program D;
   2                     var A:integer;
   3                     procedure TETRIS.ROTATEBLOCK;
                             ^           ^
******          EXPECTED 'SEMICOLON' MISSING
******          IMPROPER SYMBOL
******          ALL CHARACTERS IGNORED UNTIL SEMICOLON


   4                     begin
   5     1     2     1    A:=1;
   6     2     2     1   end;
   7                     begin
   8     1     1     1    TETRIS.ROTATEBLOCK;
                    ^           ^
******          INVALID SYMBOL
******          ALL CHARACTERS IGNORED UNTIL SEMICOLON


   9     3     1     2   end.


ERRORS DETECTED:  3    
FREE MEMORY: 13734  WORDS