====== Тетрис ======

Те́трис (производное от «тетрамино» и «теннис») — компьютерная игра, первоначально изобретённая и разработанная советским программистом Алексеем Пажитновым. Игра была выпущена 6 июня 1984 года — в это время Пажитнов работал в Вычислительном центре Академии наук СССР. 
Она была написана на языке программирования [[pascal-programming_language:pascal-programming_language|Pascal]] на микроЭВМ Электроника 60.

Тетрис представляет собой головоломку, построенную на использовании геометрических фигур «тетрамино» — разновидности полимино, состоящих из четырёх квадратов.

{{:tetris:original_tetris.png|первая версия, на Электроника 60}}
\\ [[https://tetris.wiki/images/e/ea/Original_Tetris.png|оригинал]]

Размер игрового поля: 20 × 10 «кубиков».

Фигура появляется сразу в строках 1 и 2.

На экране отображается также:
  * Полных строк
  * Уровень (0-9)
  * Счет

Назначение клавиш:
|<30% 20% 80%>|
|<key>7</key>|налево|
|<key>9</key>|направо|
|<key>8</key>|поворот|
|<key>4</key>|ускорить|
|<key>5</key>, <key>пробел</key>|сбросить|
|<key>1</key>|показать следующую (фигуру)|
|<key>0</key>|стереть этот текст (убрать подсказку)|


Правила подсчета очков:
  * Очки начисляются за каждое успешно поставленную на место фигуру.
  * На уровне 0 потенциальное количество очков для каждой фигуры начинается с 19 и уменьшается на 1 каждый раз, когда фигура опускается на один ряд. Как видно, фигура I, свободно падающее с верхней части игрового поля на нижнюю, спустится на 19 рядов и наберет 0 очков; никогда нельзя набрать меньше 0.
  * Игра на более высоких уровнях дает дополнительные 3 × (уровень + 1) очки за фигуру.
  * Игра с отключенным показом следующей фигуры дает дополнительные 5 очков за каждую фигуру.
  * 3 цифры предназначены для отображения счета; при превышении 999 счетчик сбрасывается до 0, и появляется подсчет символов, чтобы отслеживать тысячи.


7 фигур Тетрис: I, L, J, O, S, T, Z
\\ {{tetrominoes_ijlo_stz_worlds.svg|}}
\\ [[https://upload.wikimedia.org/wikipedia/commons/3/39/Tetrominoes_IJLO_STZ_Worlds.svg?download|оригинал]]


====== ДВК ======
<hidden>
^ ^  0  ^  1  ^  2  ^  3  ^
|O|<code>
     56
1    ██
2    ██
     56
</code>|
|I|<code>
    4567
1   ████
    4567






</code>|<code>
      6
1     █
2     █
3     █
4     █
      6
</code>|
|L|<code>
     567
1    ███
2    █
     567

</code>|<code>
      67
1     █
2     █
3     ██
      67
</code>|<code>
     567
1      █
2    ███
     567

</code>|<code>
     56
1    ██
2     █
3     █
     56
</code>|
|J|<code>
     567
1    ███
2      █
     567

</code>|<code>
      67
1     ██
2     █
3     █
      67
</code>|<code>
     567
1    █
2    ███
     567

</code>|<code>
     56
1     █
2     █
3    ██
     56
</code>|
|T|<code>
     567
1    ███
2     █
     567

</code>|<code>
      67
1     █
2     ██
3     █
      67
</code>|<code>
     567
1     █
2    ███
     567

</code>|<code>
     56
1     █
2    ██
3     █
     56
</code>|
|S|<code>
     567
1     ██
2    ██
     567

</code>|<code>
      67
1     █
2     ██
3      █
      67
</code>|
|Z|<code>
     567
1    ██
2     ██
     567

</code>|<code>
      67
1      █
2     ██
3     █
      67
</code>|
</hidden>

F = Поле

^  M  /  V ^  V=0  ^  V=1  ^  V=2  ^  V=3  ^
|M=1|<code>
IF Y=0 THEN X=5
X,Y
X+1,Y
X,Y+1
X+1,Y+1
</code><code>
 12
1██
2██
 
</code>|
|M=2|<code>
IF Y=0 THEN X=4
IF V=1 THEN X=X-2
X,Y
X+1,Y
X+2,Y
X+3,Y
</code><code>
 1234
1████





</code>спрайт 0|<code>

X=X+2
X,Y 
X,Y+1
X,Y+2
X,Y+3
</code><code>
 1
1█
2█
3█
4█
</code>спрайт 1|
|M=3|<code>
IF Y=0 THEN X=5
X+1,Y
X+2,Y
X,Y+1
X+1,Y+1
</code><code>
 123
1 ██
2██


</code>|<code>
X=X+1
X,Y
X,Y+1
X+1,Y+1
X+1,Y+2
</code><code>
 12
1█
2██
3 █
</code>|
|M=4|<code>
IF Y=0 THEN X=5
X,Y
X+1,Y
X+1,Y+1
X+2,Y+1
</code><code>
 123
1██
2 ██


</code>|<code>
X=X+1
X+1,Y
X,Y+1
X+1,Y+1
X,Y+2
</code><code>
 12
1 █
2██
3█
</code>|
|M=5|<code>
IF Y=0 THEN X=5
X,Y
X+1,Y
X+2,Y
X+1,Y+1
</code><code>
 123
1███
2 █


</code>|<code>
X=X+1
X,Y
X,Y+1
X+1,Y+1
X,Y+2
</code><code>
 12
1█
2██
3█
</code>|<code>
X=X-1
X+1,Y
X,Y+1
X+1,Y+1
X+2,Y+1
</code><code>
 123
1 █
2███


</code>|<code>


X+1,Y
X,Y+1
X+1,Y+1
X+1,Y+2
</code><code>
 12
1 █
2██
3 █
</code>|
|M=6|<code>
IF Y=0 THEN X=5
X,Y
X+1,Y
X+2,Y
X,Y+1
</code><code>
 123
1███
2█


</code>|<code>
X=X+1
X,Y
X,Y+1
X,Y+2
X+1,Y+2
</code><code>
 12
1█
2█
3██
</code>|<code>
X=X-1
X+2,Y
Y+1,X
Y+1,X+1
Y+1,X+2
</code><code>
 123
1  █
2███


</code>|<code>


X,Y
X+1,Y
X+1,Y+1
X+1,Y+2
</code><code>
 12
1██
2 █
3 █
</code>|
|M=7|<code>
IF Y=0 THEN X=5
X,Y
X+1,Y
X+2,Y
X+2,Y+1
</code><code>
 123
1███
2  █


</code>|<code>
X=X+1
X,Y
X+1,Y
X,Y+1
X,Y+2
</code><code>
 12
1██
2█
3█
</code>|<code>
X=X-1
X,Y
X,Y+1
X+1,Y+1
X+2,Y+1
</code><code>
 123
1█
2███


</code>|<code>


X+1,Y
X+1,Y+1
X,Y+2
X+1,Y+2
</code><code>
 12
1 █
2 █
3██
</code>|


<code>
[ ]
Т Е Т Р И С
        [ ]

2
0
|
Ваш уровень? (0-9) - _
</code>

<code>

               16
Полных строк:  0
Уровень:       0
  Счет:  0
         10



16 Ваше имя?
</code>

<code>
222223333333333444444444
567890123456789012345678
<! . . . . . . . . . .!>
<! . . . . . . . . . .!>
<! . . . . . . . . . .!>
<! . . . . . . . . . .!>
<! . . . . . . . . . .!>

<!====================!>
  \/\/\/\/\/\/\/\/\/\/
</code>

<code>
         1         2
1234567890123456789012
7: налево   9: направо
     8:поворот
4:ускорить  5:сбросить
1: показать  следующую
0:  стереть этот текст
  пробел - сбросить
</code>

----

{{:tetris:dvk_emulator_16.10.22_18-03.tar.gz|}}

[[zxpkru>threads/18351-emulyator-dvk.html|Эмулятор ДВК]]
====== MSX ======

[[+tab|wmsx>?DISKA_URL=/_media/msx:yamaha_kuvt:tetris2.dsk| Tetris][ ]]

====== Ссылки ======

[[wpru>Tetris]]

[[wpru>Тетрис]]

[[https://tetris.wiki/Tetris_(Electronika_60)|Tetris (Electronika 60) — TetrisWiki]]

http://treegame.ru/help/tetris.php

[[https://habr.com/ru/company/timeweb/blog/669676/|Тетрис: история одной игры / Хабр]]

[[https://www.youtube.com/watch?v=CUdS4kR1z0E|YouTube: Tetris (1984) [Electronika 60]]]

**https://archive.org/details/RT-11_Games**

{{tag>Game MSX}}