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

> Помогите написать бомбермена
darkangel22388
сообщение 12.09.2011 21:28
Сообщение #1





Группа: Пользователи
Сообщений: 4
Пол: Мужской

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


Мне нужно написать бомбермена на PAscalAbc, кто мне может с этим помочь?
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
 
 Ответить  Открыть новую тему 
Ответов
TarasBer
сообщение 13.09.2011 11:13
Сообщение #2


Злостный любитель
*****

Группа: Пользователи
Сообщений: 1 755
Пол: Мужской

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


Пример простой - каждый бот поиском в ширину узнаёт, в какую сторону ему идты, потом в эту сторону он и идёт.
Примеры поиска в ширину - на википедии. Пример движения бота в нужную сторону я тебе, так и быть напишу:


procedure Move(var B: TBot; dx,dy: integer);
begin
B.x := B.x + dx;
B.y := B.y + dy;
end;



--------------------
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

Сообщений в этой теме


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

 



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