Игра по типу демократии

@yaran · Регистрация: 08.02.2013

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

Добрый день, я решил сделать игру по типу демократии (есть поле, например 10х10, и каждый ход генерируется фигурка, ее надо переносить на поле, и если будет рядом с ней еще 2 таких же картинок, то они преобразуются в другую картинку выше рангом). Так вот, мне нужна помощь в том, как проверить, если ли рядом с картинкой в соседних ячейках еще 2 таких же картинки (чтобы они все были с общими сторонами) и удалить их. Как реализовать этот момент?

@enk · 16.10.2013, 18:12

Двумерным массивом

Pascal
1
array[0..9] of array[0..9] of byte;

@Lirrk · 16.10.2013, 18:36

yaran,
Для этого нужно делать игру как следует. Игровое поле для отображения. А для игры нужен двумерный массив. Вся игра будет происходить в нём.
К примеру у масcива имя Space

Каждая ячейка имеет статус
0- ничего нет
1 и далее ранги
И вот проверяем ячейку

Delphi
1
2
3
4
5
6
7
CyrRang:= Space[x,y]; //Получаем статус ячейки
if (Space[x-1,y]= CyrRang) and  (Space[x+1,y]= CyrRang) then
                                             begin;
                                             Space[x,y]:=0;
                                             Space[x-1,y]:=0;
                                             Space[x+1,y]:=0;  
                                             end;

После того, как ход сделан и весь массив принял текущее состояние, цикл сканирует его и каждый элемент отображает на игровом поле.

Добавлено через 3 минуты
enk,
Не путайся под ногами

Двухмерный массив объявляется так

Delphi
1
Space: array[0..11, 0..11] of byte;

Дело тут вот в чём Игровое поле 10 на 10
Но.. у него есть края. И дело в том, что при сравнении на краю... с чем будешь сравнивать.
А так лучше присобачить к игровому поле "стенки" вот они и будут по линиям 0 и 11 там записано значение, скажем 255
Сделать это надо так.
Объявляете массив-константу. В нём "рисуете" исходное поле.
При начале игры или при следующей игре он копируется в ваше игровое поле.

И вообще, подобные игры делаются на "таблицах"
Исходный рисунок - таблица
Игровое поле - таблица.
Только не путайте с компонентом таблица.
Таблица - это многомерные массивы, хранящие исходные и изменяемые в процессе данные

@yaran · 16.10.2013, 18:37 **[ТС]**

спасибо, будем пробовать

@enk · 17.10.2013, 15:27

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

Двухмерный массив объявляется так

Delphi
1
Space: array[0..11, 0..11] of byte;

Не по теме:

Ах, сударь, простите, что помешал! Конечно же только так, и никак более! И TArray<array of byte> тоже нельзя, нет.

Добавлено через 45 секунд

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

Но.. у него есть края. И дело в том, что при сравнении на краю... с чем будешь сравнивать.

Проверять на выход за границы массива не модно или стало слишком сложно?

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

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

Объявляете массив-константу. В нём "рисуете" исходное поле.

В суть игры не углублялся, но какой смысл, если стартовое поле всегда будет одинаковое? Может всё-таки не константу? И заполнять в цикле случайными фигурами, а при создании новой игры заполнять заново.

@Lirrk · 17.10.2013, 15:42

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

@enk · 17.10.2013, 15:47

Кликните здесь для просмотра всего текста

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

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

Не по теме:

Просто дак дерзко и активно начали отстаивать свою позицию, как будто она одна единственная.

@Lirrk · 17.10.2013, 15:48

enk,
Из тех, что предложено - да. Предложите лучше - заткнусь.

@enk · 17.10.2013, 21:20

Действительно есть разница в том, как объявлять массив?

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

Space: array[0..11, 0..11] of byte;

Это даст хоть +0.1% к производительности, по сравнению с объявлением по-другому?

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

Представьте что у вас лабиринт.

В данной конкретной задаче это не требуется, т.к. чётко задан размер матрицы. И можно просто проверять

Delphi
1
2
if (y < length(matrix)) then
  if (x < matrix[y]) then

Хотя, вариант со стенками тоже не плох, можно в цикле 0..1 сделать

Delphi
1
case matrix[y + i1, x + i2] of...

Новые блоги и статьи Все статьи Все блоги /
Первый деплой lagorue 16.01.2026 Не спеша развернул своё 1ое приложение в kubernetes. А дальше мне интересно создать 1фронтэнд приложения и 2 бэкэнд приложения развернуть 2 деплоя в кубере получится 2 сервиса и что-бы они. . .	Расчёт переходных процессов в цепи постоянного тока igorrr37 16.01.2026 / * Дана цепь постоянного тока с R, L, C, k(ключ), U, E, J. Программа составляет систему уравнений по 1 и 2 законам Кирхгофа, решает её и находит токи на L и напряжения на C в установ. режимах до и. . .	Восстановить юзерскрипты Greasemonkey из бэкапа браузера damix 15.01.2026 Если восстановить из бэкапа профиль Firefox после переустановки винды, то список юзерскриптов в Greasemonkey будет пустым. Но восстановить их можно так. Для этого понадобится консольная утилита. . .	Изучаю kubernetes lagorue 13.01.2026 А пригодятся-ли мне знания kubernetes в России?
Сукцессия микоризы: основная теория в виде двух уравнений. anaschu 11.01.2026 https:/ / rutube. ru/ video/ 7a537f578d808e67a3c6fd818a44a5c4/	WordPad для Windows 11 Jel 10.01.2026 WordPad для Windows 11 — это приложение, которое восстанавливает классический текстовый редактор WordPad в операционной системе Windows 11. После того как Microsoft исключила WordPad из. . .	Classic Notepad for Windows 11 Jel 10.01.2026 Old Classic Notepad for Windows 11 Приложение для Windows 11, позволяющее пользователям вернуть классическую версию текстового редактора «Блокнот» из Windows 10. Программа предоставляет более. . .	Почему дизайн решает? Neotwalker 09.01.2026 В современном мире, где конкуренция за внимание потребителя достигла пика, дизайн становится мощным инструментом для успеха бренда. Это не просто красивый внешний вид продукта или сайта — это. . .

@yaran 1 / 1 / 0 Регистрация: 08.02.2013 Сообщений: 49

	Игра по типу демократии 16.10.2013, 17:39. Показов 1367. Ответов 8 Метки нет (Все метки) Добрый день, я решил сделать игру по типу демократии (есть поле, например 10х10, и каждый ход генерируется фигурка, ее надо переносить на поле, и если будет рядом с ней еще 2 таких же картинок, то они преобразуются в другую картинку выше рангом). Так вот, мне нужна помощь в том, как проверить, если ли рядом с картинкой в соседних ячейках еще 2 таких же картинки (чтобы они все были с общими сторонами) и удалить их. Как реализовать этот момент? 0

@yaran 1 / 1 / 0 Регистрация: 08.02.2013 Сообщений: 49
	16.10.2013, 18:37 [ТС]
	спасибо, будем пробовать 0

@Lirrk Заблокирован
	17.10.2013, 15:42
	enk, Зачем проверять. когда проще ограничить? Представьте что у вас лабиринт. Вы там тоже будете проверять? А если вы не знаете где стенка и она может быть где угодно? так же и здесь. Самые лучшие и быстрые игры сделаны на основе таблиц. Если игровое поле стандартно, тогда константа. Если меняется. Тогда можно и генерировать. Это не принципиально. Я высказал свой подход. Он освоен на огромном опыте. Я тоже когда-то проходил через всё это. Я тоже писал много чего не так. И со временем у меня выработались принципы написания игр. А со временем я узнал, что многие подходы применяются профессионалами. Ну раз нравится наступать на грабли, то пожалуйста. Не нужны простые оптимальные решения - пожалуйста. Я не против. 0

@Lirrk Заблокирован
	17.10.2013, 15:48
	enk, Из тех, что предложено - да. Предложите лучше - заткнусь. 0