IPB
ЛогинПароль:

 
 Ответить  Открыть новую тему 
> Игра Сапер, Просьба оценить
сообщение
Сообщение #1





Группа: Пользователи
Сообщений: 3
Пол: Мужской
Реальное имя: Конышев Д. А.

Репутация: -  1  +


На днях написал вот такое подобие Сапера:
Прикрепленный файл  MINER.PAS ( 9.78 килобайт ) Кол-во скачиваний: 1132
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #2


Знаток
****

Группа: Пользователи
Сообщений: 466
Пол: Мужской
Реальное имя: Федосеев Павел

Репутация: -  9  +


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

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

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

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

Удачи!


Эскизы прикрепленных изображений
Прикрепленное изображение
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #3





Группа: Пользователи
Сообщений: 3
Пол: Мужской
Реальное имя: Конышев Д. А.

Репутация: -  1  +


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

Прикрепленный файл  MINER__MODIFIED_.rar ( 3.59 килобайт ) Кол-во скачиваний: 339
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #4


Знаток
****

Группа: Пользователи
Сообщений: 466
Пол: Мужской
Реальное имя: Федосеев Павел

Репутация: -  9  +


Ой, а тут мышь низкоуровневая, и несовместимая с FreePascal и я уже не могу посмотреть...
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 




- Текстовая версия 17.01.2018 9:45
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"