Как сделать, чтобы персонаж обходил препятствия?

@Razuvai · Регистрация: 07.10.2021

Студворк — интернет-сервис помощи студентам

Как сделать на Delphi чтобы персонаж обходил препятствия

Добавлено через 6 минут
Управление мышкой!

@Razuvai · 14.08.2022, 15:18 **[ТС]**

Я поменял, всё равно ошибка Ranga check error.

@Пытливый · 14.08.2022, 16:23

Сообщение от Razuvai

Я поменял, всё равно ошибка Ranga check error.

В этом блоке такой ошибки быть не может, значит есть еще место, где вы ошиблись. Пробуйте использовать пошаговую отладку или отладку по условному прерыванию.
Я поменял только код в строках 188-191. Возможно вы уже изменили код.

@Razuvai · 14.08.2022, 17:01 **[ТС]**

Я всё исправил, всё равно ошибка Range check error.

Добавлено через 1 минуту

@Пытливый · 14.08.2022, 17:18

Показывайте исправленный код, а лучше весь проект(*.pas,*.dfm,*.dpr) в архиве прикрепите.

@Razuvai · 14.08.2022, 17:32 **[ТС]**

Вот.

@Пытливый · 14.08.2022, 17:57

В следующий раз не надо запихивать все подряд в архив, только те файлы, что я перечислили выше.

Добавлено через 8 минут
Прелестно...
Сразу первый косяк.

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
c:=1;
while (c<=10) do
begin
for a:=0 to 9 do
for b:=0 to 9 do
begin
if map[a,b,4]=c then
begin
if (a>=0) and (map[a-1,b,4]=0) then map[a-1,b,4]:=c+1;
if (a<=9) and (map[a+1,b,4]=0) then map[a+1,b,4]:=c+1;
if (b>=0) and (map[a,b-1,4]=0) then map[a,b-1,4]:=c+1;
if (b<=9) and (map[a,b+1,4]=0) then map[a,b+1,4]:=c+1;
end;

переменная "с" внутри цикла не меняется. Когда цикл завершится?

Добавлено через 3 минуты
и потом, где вы изменили в этом цикле проверку, как я написал выше? Может это старый файл?

Добавлено через 3 минуты
И еще маленький совет начинающему игроделу. Не надо работать с битмапами для отображения предметов и персонажей. На начальном этапе проще и быстрее работать с квадратиками. Когда уже мир начнет хоть немного жить, тогда можно и текстурки на него натянуть.

@northener · 14.08.2022, 18:01

Сообщение от Пытливый

Может это старый файл?

Разумеется старый. Последний раз изменен вчера в 18:27.

@Пытливый · 14.08.2022, 18:15

Сообщение от Razuvai

Я всё исправил, всё равно ошибка Range check error.

Не по теме:

Ну и как мне теперь верить людям?Отдалась я ему при луне.А он взял мои белые груди и узлом завязал на спине....

Добавлено через 6 минут
И что вас в стратегии потянуло? Вы бы для начала просто крестики-нолики сделали, потом минера, потом тетрис и вот когда у вас хоть какой-то опыт и понимание алгоритмов появится, можно попробовать сделать что-то помасштабнее. Вам даже предлагать минимальную заготовку под игру нет смысла, вы просто не поймете ничего.

@leors · 14.08.2022, 19:46

Если честно, это не код волнового алгоритма. Это тихий ужас.
И вообще нет никаких вводных данных.
Реализация алгоритма зависит от многих факторов.
Если это лабиринт то какой?
С толстыми стенками - один алгоритм.
С тонкими - другой.
А может ячейки шестиугольные.
Чем дальше тем сложнее для понимания новичками.
Дело уже упирается графы.
Для тонкостенных и шестиугольных уже нужно строить не простую карту а лепить граф.
Граф - подход универсальный.
Однако непонятно что вообще должно получится на выходе.
Какие-то картинки.
Картинки чего?
Да в общем то это дело десятое.
Задача волнового алгоритма - получить путь из одной точки в другую.
Но тут вопрос. Путей то несколько могут быть.
И надо найти их все и выбрать наикрачайший.
Или другой подход. следуя обратным ходом пытаться не отклоняться далеко от прямой соеденяющей точки.
Или уж точно строить полноценный граф и вычислять короткий путь каким-нибудь алгоритмом.

@harrybook · 15.08.2022, 01:48

Сообщение от Пытливый

потом тетрис

Серьёзные геймдевелоперы этим не заморачиваются. Нормальный маршрут такой:
Wolfenstein 3d -> doom II -> quake I

@northener · 15.08.2022, 02:21

leors, "ты не умничай, ты код давай".
ТС'у нужен готовый код. Сам он ничего не знает, не умеет и не хочет ни знать, ни уметь.

Сообщение от harrybook

Серьёзные геймдевелоперы этим не заморачиваются.

Где вы тут увидели хотя бы начинающего геймдевелопера?

@harrybook · 15.08.2022, 02:35

northener,

Сообщение от northener

Где вы тут увидели хотя бы начинающего геймдевелопера?

Гипотетически они в тут должны быть (незримо).

@northener · 15.08.2022, 02:42

Сообщение от harrybook

Гипотетически они в тут должны быть (незримо).

Только гипотетически!

@leors · 15.08.2022, 13:14

Если собственно простой лабиринт, то есть квадратные ячейки и толстые стены то начинать надо с того чтобы создать модель лабиринта.
То есть где стены где можно пройти.
А далее.
Предположим лабиринт 10 на 10
Объявлем двумерный массив 11 на 11

Это для того чтоб был перимеитр если его нет в самом лабиринте.

Ну а далее проще пареной репы.

ставим число один на старте.
И далее смотрим вверх вниз влево вправо. Можно и по диагоналям.
если ячейка пуста то ставим номер 2
если стена или не пуста то ничего не ставим.
каждый новый номер заносим в массив волны.
Получилось скажем 8 ячеек 2
берем новое число 3.
и обсматириваем по сторонам эти 8 ячеек.
Каждый раз обновлем массив волны для для нового числа.
Вот собственно и все.
Если нужная точка не достигнута а количесво ячеек в лабиринте превышено, значит пути нет.
А если достигнута финальная точка. идем до исходной. по числам.
Вот собственно и все.

@Razuvai · 15.08.2022, 13:37 **[ТС]**

Ничего не понятно. Нужен готовый код с персонажем на Delphi.

@droider · 15.08.2022, 13:45

Сообщение от Razuvai

Ничего не понятно. Нужен готовый код с персонажем на Delphi

всё, финиш. Вы хоть сами понимаете, что Вам нужно? Самолетики - не то, гонки с препятствиями - не то.

Ребята, предлагаю завершить на этом вообще обсуждение этого вопроса. 4-я страница обсуждения ни о чем. Толку для ТС - ноль.

@AzAtom · 15.08.2022, 13:52

droider, это было ещё на первой странице понятно.

@droider · 15.08.2022, 14:02

AzAtom, тем более

Новые блоги и статьи Все статьи Все блоги /
Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого zorxor 21.09.2026 Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .	Мобильное приложение ColorStep pavlinmavlin 17.09.2026 Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .	Запрет дублирования строк в табличной части Maks 13.09.2026 Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .	Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Jin X 06.09.2026 Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .
Программа опроса у.з. расходомера SLS-720F Argus19 02.09.2026 Программа опроса у. з. расходомера SLS-720F Программа опрашивает один раз в минуту три ультразвуковых расходомера SLS-720F через интерфейс RS-485 по протоколу Modbus RTU. Опрашиваются регистры. . .	Hyper-V: Компьютер должен поддерживать доверенный платформенный модуль 2.0. Maks 31.08.2026 При установке Windows 11 на виртуальную машину Hyper-V 2-го поколения вылезла такая ошибка: Решение: в параметрах виртуальной машины, в разделе "Безопасность" (Security) активировать флаг. . .	Архитектура биовида Стива в Майнкрафте: Зачем бонобо кубический каннибализм anaschu 30.08.2026 Кубический Вагинокапитализм в Minecraft: Математический инвариант ОДУ и рок Стивов-бонобо Главная задача разработанной «Модели Всего» — наглядно продемонстрировать наличие системной «судьбы». . .	Оттачиваю умение писать js программы. russiannick 30.08.2026 Проектом выходного дня стало написание Книги шифров Виженера. Итогом стала версия 200, синий туман. Синий туман назван так, потому что замораживает текст под собой. Нажатие синих кнопок управляют. . .

@Razuvai 0 / 0 / 0 Регистрация: 07.10.2021 Сообщений: 32

	Как сделать, чтобы персонаж обходил препятствия? 08.08.2022, 14:15. Показов 5532. Ответов 77 Метки нет (Все метки) Как сделать на Delphi чтобы персонаж обходил препятствия Добавлено через 6 минут Управление мышкой! 0

@Razuvai 0 / 0 / 0 Регистрация: 07.10.2021 Сообщений: 32
	14.08.2022, 15:18 [ТС]
	Я поменял, всё равно ошибка Ranga check error. 0

@Razuvai 0 / 0 / 0 Регистрация: 07.10.2021 Сообщений: 32
	14.08.2022, 17:01 [ТС]
	Я всё исправил, всё равно ошибка Range check error. Добавлено через 1 минуту 0

@Пытливый 3765 / 2272 / 706 Регистрация: 29.05.2013 Сообщений: 9,622
	14.08.2022, 17:18
	Показывайте исправленный код, а лучше весь проект(.pas,.dfm,*.dpr) в архиве прикрепите. 0

@leors 14 / 11 / 3 Регистрация: 14.08.2022 Сообщений: 157
	14.08.2022, 19:46
	Если честно, это не код волнового алгоритма. Это тихий ужас. И вообще нет никаких вводных данных. Реализация алгоритма зависит от многих факторов. Если это лабиринт то какой? С толстыми стенками - один алгоритм. С тонкими - другой. А может ячейки шестиугольные. Чем дальше тем сложнее для понимания новичками. Дело уже упирается графы. Для тонкостенных и шестиугольных уже нужно строить не простую карту а лепить граф. Граф - подход универсальный. Однако непонятно что вообще должно получится на выходе. Какие-то картинки. Картинки чего? Да в общем то это дело десятое. Задача волнового алгоритма - получить путь из одной точки в другую. Но тут вопрос. Путей то несколько могут быть. И надо найти их все и выбрать наикрачайший. Или другой подход. следуя обратным ходом пытаться не отклоняться далеко от прямой соеденяющей точки. Или уж точно строить полноценный граф и вычислять короткий путь каким-нибудь алгоритмом. 0

@leors 14 / 11 / 3 Регистрация: 14.08.2022 Сообщений: 157
	15.08.2022, 13:14
	Если собственно простой лабиринт, то есть квадратные ячейки и толстые стены то начинать надо с того чтобы создать модель лабиринта. То есть где стены где можно пройти. А далее. Предположим лабиринт 10 на 10 Объявлем двумерный массив 11 на 11 Это для того чтоб был перимеитр если его нет в самом лабиринте. Ну а далее проще пареной репы. ставим число один на старте. И далее смотрим вверх вниз влево вправо. Можно и по диагоналям. если ячейка пуста то ставим номер 2 если стена или не пуста то ничего не ставим. каждый новый номер заносим в массив волны. Получилось скажем 8 ячеек 2 берем новое число 3. и обсматириваем по сторонам эти 8 ячеек. Каждый раз обновлем массив волны для для нового числа. Вот собственно и все. Если нужная точка не достигнута а количесво ячеек в лабиринте превышено, значит пути нет. А если достигнута финальная точка. идем до исходной. по числам. Вот собственно и все. 0

@Razuvai 0 / 0 / 0 Регистрация: 07.10.2021 Сообщений: 32
	15.08.2022, 13:37 [ТС]
	Ничего не понятно. Нужен готовый код с персонажем на Delphi. 0

@AzAtom Модератор 4153 / 2362 / 814 Регистрация: 15.11.2015 Сообщений: 9,496
	15.08.2022, 13:52
	droider, это было ещё на первой странице понятно. 0

@droider 4893 / 2826 / 867 Регистрация: 04.10.2012 Сообщений: 10,278
	15.08.2022, 14:02
	AzAtom, тем более 0