Здравствуйте, форумчане, я тут недавно написал игру-текстовую РПГ на pascal ABC.
Буду очень признателен, если вы ее посмотрите на предмет багов.
Сообщение отредактировано: Apopheosis -
![]() |
![]() |
Apopheosis |
![]()
Сообщение
#1
|
Группа: Пользователи Сообщений: 1 Пол: Мужской Репутация: ![]() ![]() ![]() |
Здравствуйте, форумчане, я тут недавно написал игру-текстовую РПГ на pascal ABC.
Буду очень признателен, если вы ее посмотрите на предмет багов. Сообщение отредактировано: Apopheosis - Прикрепленные файлы ![]() |
![]() ![]() |
Федосеев Павел |
![]()
Сообщение
#2
|
Знаток ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 481 Пол: Мужской Реальное имя: Федосеев Павел Репутация: ![]() ![]() ![]() |
Откомпилировать не могу - нет у меня PABC.
Могу высказать замечания. 0. randomize вызывается только один раз в самом начале программы - это 100% баг. 1. Очень большая монолитная программа. Напрашивается декомпозиция - разделение на подпрограммы. Вижу реализацию камень-ножницы-бумага - точно можно реализовать отдельной подпрограммой. 2. Множество строк инициализации через case. Проще сделать через типизированные константы const Массу таких определений массивов можно вынести в отдельный модуль, чтобы не засорять код. А ещё можно в переменной titul хранить не строку, а сам индекс - ведь это не пользователь что-то ввёл, а предопределено при составлении программы. Сообщение отредактировано: Федосеев Павел - |
![]() ![]() |
![]() |
Текстовая версия | 26.06.2024 8:45 |