![]() |
1. Пользуйтесь тегами кода. - [code] ... [/code]
2. Точно указывайте язык, название и версию компилятора (интерпретатора).
3. Название темы должно быть информативным.
В описании темы указываем язык!!!
![]() |
pas |
![]() ![]()
Сообщение
#1
|
Группа: Пользователи Сообщений: 2 Пол: Мужской Репутация: ![]() ![]() ![]() |
Помогите написать игру лабиринт. Игра должна быть оформлена.
Меню 1.Играть 2.Помощ(Тут управление ну и т.д.) 3.Выход Цель игры: Инраеш типо роботом ( можно изобразить ввиде точки или квадрата) Должен от точки начала лабиринта дойти до точки конца лабиринта. Нужно использовать модуль: Graph и можно crt. |
![]() ![]() |
pas |
![]()
Сообщение
#2
|
Группа: Пользователи Сообщений: 2 Пол: Мужской Репутация: ![]() ![]() ![]() |
Что делает эта процедура???
procedure initbgi;
var
grdriver,
grmode,
errcode : integer;
begin
grdriver := DETECT;
grmode := EGAhi;
initgraph(grdriver, grmode, 'e:\bp\bgi');
errcode:= graphresult;
if errcode <> grok then
begin
writeln('Graphics error: ', grapherrormsg(errcode));
halt(1);
end;
end;
|
![]() ![]() |
![]() |
Текстовая версия | 24.07.2025 0:53 |