Delphi. Вопрос с алгоритмом пакетирования.

[Artsiom]

День добрый.
Может кто ни будь может помочь(не написать код), просто подкинуть мысль по нижеизложенному поводу. Думаю 1,5 дня, но мыслей нет никаких. Собсно ломаю голову над эмулятором боя одной старой игры.

В нашем случае число пакетов равно 4.
У первого игрока число юнитов в пакете 2, у второго 1.
Случайным образом выбираем порядок в котором будут стрелять игроки (в нашем случае таких возможностей всего 2: сначала первый потом второй, и наоборот. В случае 3 игроков возможно 6 вариантов: 1-2-3, 1-3-2, 2-1-3, 2-3-1, 3-1-2, 3-2-1, и т.п.).

Итак, у нас получилось 4 пакета, причем у первого в пакете 2 юнита, а у второго - 1. Расписывая эту последовательность, получаем [A2 B1][A2 B1][A2 B1][A1 B1]. Последний пакет оказался неполным ( Xчисло, означает, что стреляет число юнитов стороны X).

Т.к. у нас порядок следования игроков в каждом пакете случаен, то возможны следующие варианты:

(A2 B1)(A2 B1)(A2 B1)(A1 B1)
(A2 B1)(A2 B1)(A2 B1)(B1 A1)
(A2 B1)(A2 B1)(B1 A2)(A1 B1)
(A2 B1)(A2 B1)(B1 A2)(B1 A1)

(A2 B1)(B1 A2)(A2 B1)(A1 B1)
(A2 B1)(B1 A2)(A2 B1)(B1 A1)
(A2 B1)(B1 A2)(B1 A2)(A1 B1)
(A2 B1)(B1 A2)(B1 A2)(B1 A1)

(B1 A2)(A2 B1)(A2 B1)(A1 B1)
(B1 A2)(A2 B1)(A2 B1)(B1 A1)
(B1 A2)(A2 B1)(B1 A2)(A1 B1)
(B1 A2)(A2 B1)(B1 A2)(B1 A1)

(B1 A2)(B1 A2)(A2 B1)(A1 B1)
(B1 A2)(B1 A2)(A2 B1)(B1 A1)
(B1 A2)(B1 A2)(B1 A2)(A1 B1)
(B1 A2)(B1 A2)(B1 A2)(B1 A1)

Не знаю как реализовать в массивах разбивку юнитов на 16 линий пакетов.
Готов принять любую помощь.

[Базиля]

Что-то не могу понять, что у вас понимается под пакетом?

[Artsiom]

Грубо: пакет это, например А2(два юнита стороны А) стреляет в В1(один юнит с другой стороны). Может я чего логическое пропустил... полная версия на http://dc.cdelta.org/dc:articles:battle_manual в пункте пакетирование.

[Базиля]

Хорошо.
Сегодня я уже если честно не в состоянии соображать логически.
Завтра с утра обзятельно загляну в тему, если никто не поможет, постараюсь подкинуть идею

[Базиля]

Прочитал про пакетирование, вроде как более - менее все проясняется.
Правильно ли я понимаю что в этой таблице:

(A2 B1)(A2 B1)(A2 B1)(A1 B1)
(A2 B1)(A2 B1)(A2 B1)(B1 A1)
(A2 B1)(A2 B1)(B1 A2)(A1 B1)
(A2 B1)(A2 B1)(B1 A2)(B1 A1)

(A2 B1)(B1 A2)(A2 B1)(A1 B1)
(A2 B1)(B1 A2)(A2 B1)(B1 A1)
(A2 B1)(B1 A2)(B1 A2)(A1 B1)
(A2 B1)(B1 A2)(B1 A2)(B1 A1)

(B1 A2)(A2 B1)(A2 B1)(A1 B1)
(B1 A2)(A2 B1)(A2 B1)(B1 A1)
(B1 A2)(A2 B1)(B1 A2)(A1 B1)
(B1 A2)(A2 B1)(B1 A2)(B1 A1)

(B1 A2)(B1 A2)(A2 B1)(A1 B1)
(B1 A2)(B1 A2)(A2 B1)(B1 A1)
(B1 A2)(B1 A2)(B1 A2)(A1 B1)
(B1 A2)(B1 A2)(B1 A2)(B1 A1)

Содержится ифнормация о том, кто в кого стреляет первым?
Т.е. например, берем первую строку:

(A2 B1)(A2 B1)(A2 B1)(A1 B1)

И видим что 2 юнита игрока А стреляют в 1 юнита игрока B и т.д. ?

Не знаю как реализовать в массивах разбивку юнитов на 16 линий пакетов.

Что такое 16 линий пакетов? О подобных вещах в мануале ни слова.

[Artsiom]

Сообщение от Базиля

Прочитал про пакетирование, вроде как более - менее все проясняется.
Содержится ифнормация о том, кто в кого стреляет первым?
Т.е. например, берем первую строку:
(A2 B1)(A2 B1)(A2 B1)(A1 B1)
И видим что 2 юнита игрока А стреляют в 1 юнита игрока B и т.д. ?

Да, всё верно.

Сообщение от Базиля

Что такое 16 линий пакетов? О подобных вещах в мануале ни слова.

16 линий это 16 вариантов(извиняюсь, ошибся со словом) порядка стрельбы(т.е. кто в кого). И дальше там перечислены все 16 вариантов. Проблема в том как составить эти варианты.

[Базиля]

Artsiom
Получается 4 игрока уже участвовать в игре будут?

[evg_m]

И видим что 2 юнита игрока А стреляют в 1 юнита игрока B и т.д. ?

Да, всё верно

Нет. не совсем так.
(A2 B1)
A2 -- 2 юнита A стреляют по противнику
затем
B1 -- 1 юнит B стреляет по противнику.

() затем идет следующий блок. и так до исчерпания варианта (до исчерпания юнитов у А и B).

A и B кто начинает первым, кто вторым. цифры сколько юнитов будет задействовано.

пакет означает что не все юниты одной стороны сразу вступают в бой. а противник тупо ждет окончания огня, и только потом отвечает.
А огонь ведется порциями (пакетами) и при этом со случайным выбором очередности огня.
(A..B..) (A..B..) (A..B..) ... это один вариант развития событий(очередности огня)
(A..B..) (B..A..) ..... а это другой.
Цифры особой роли не играют (они постоянны, за исключением последнего (неполного) блока в каждой строке.). А их сумма есть общее число юнитов у какой-либо стороны.

число порций (скобок) в пакете (строке) не постоянно и равно числу юнитов у противника с наименьшим числом юнитов.

каждая порция есть либо Ax By либо By Ax

примерная гененрация ОДНОГО случайного пакета.

qA:=<число юнитов A>;
qB:=<число юнитов B>;
r:=min(qA, qB); //число порций
mA:=qA div r; // мощность порции A
mB:=qB div r; // мощность порции B

for j:=1 to r-1 do begin //полные порции
  case random(2) of
  0: s:=format('A%d B%d',[mA, mB]);
  1: s:=format('B%d A%d',[mB, mA]);
  end;
end;

//последний возможно неполный блок
  case random(2) of
  0: s:=format('A%d B%d',[qA-mA*(r-1), qB-mB*(r-1)]);
  1: s:=format('B%d A%d',[qB-mB*(r-1), qA-mA*(r-1)]);
  end;

[Artsiom]

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

Нет. не совсем так.

Да, сам не разобравшись полез что то делать.
Не обратил внимание на фразу "Выбранные юниты стреляют, учитывая приоритеты и т.п. и т.д."

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

примерная гененрация ОДНОГО случайного пакета.

Возможно что тут не верно.
Ведь с начала составляются(а не генерируются случайно пакеты) все возможные варианты (А2 В1) и далее. и так пока не кончатся юниты у двух сторон, а потом из них выбирается рандомно один вариант по которому они и стреляют.

[evg_m]

Ведь с начала составляются(а не генерируются случайно пакеты) все возможные варианты (А2 В1) и далее. и так пока не кончатся юниты у двух сторон, а потом из них выбирается рандомно один вариант по которому они и стреляют.

а какая разница
случайно выбрать ОДИН из полного списка.
или
случайным образом составить ОДИН.

При условии что вероятности выпадения(выбора/генерации), будут одинаковы.

Можно вообще отказаться от пакетов.
1. Все юниты (всех противников) имеющие право действия выстраиваются в очередь
2. затем данная очередь перемешивается случайным образом
3. и действия юнитов выполняются в порядке случайной очереди.