На днях написал вот такое подобие Сапера:
Нажмите для просмотра прикрепленного файла

Прикольно!
Впечатлило открытие пустых клеток.

Одно но. Сразу после начала игры - забыл комбинации кнопок. Раз уж нет мыши - может добавить подсказку по клавишам?

Ещё, у меня уже нет TurboPascal и я с небольшими изменениями запускал под FreePascal ({$apptype GUI} и wincrt). Огорчили артефакты от слов.

По коду можно добавить замечаний, но ты продолжай программировать - всё само исправится. Подчеркну лишь, что по структуре кода программа всё глубже и глубже с каждой игрой "закапывается" в стек, когда из nachalo через ряд других процедур опять вызывается nachalo.

Удачи!

Спасибо за замечания.
Что касается среды, то у меня стоит SchoolPak под DOSBox-ом, там играет хорошо и без артефактов.

Нажмите для просмотра прикрепленного файла

Ой, а тут мышь низкоуровневая, и несовместимая с FreePascal и я уже не могу посмотреть...