2018: Турнир стратегий

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

В начале игры муравьи один за другим появляются на клетке своего муравейника.

У муравья есть набор сенсоров, которые позволяют ему определять следующую информацию для ближайших к нему 9 клеток:

У каждого муравья есть память размером 32 байта, которую он может использовать как угодно. Кроме того, муравей всегда знает, есть ли у него в лапах еда.

Муравей за каждую единицу времени может сделать одно из следующих действий:

Одновременно с этим муравей может пометить клетку, на которой находится, некоторым запахом с интенсивностью 100 единиц. Помечивание запахом происходит до передвижения муравья. Старый запах клетки полностью перекрывается новым. В начале игры все клетки имеют интенсивность запаха равную 0.

Муравей, кусая в одну из сторон, обездвиживает на 8 ходов одного из находящихся там чужих муравьёв. Муравей, на которого придётся укус, всегда выбирается по такому алгоритму:

Если у укушенного муравья была с собой еда, она падает на ту клетку, где находится укушенный муравей. Обездвиженному в результате укуса муравью управление не передаётся до тех пор, пока, к нему не вернётся способность двигаться.

В процессе игры ход по очереди передаётся каждому муравью в следующем порядке:

Состояние игры обновляется после каждого хода каждого муравья. Как только все муравьи совершили ход, считается, что прошла одна единица игрового времени.

У каждой ячейки может быть некоторый запах. Запах характеризуется двумя неотрицательными числами: оттенком запаха (smell) и интенсивностью (smellIntensity). За единицу времени интенсивность запаха всех ячеек (с интенсивностью запаха отличной от нуля) уменьшается на единицу.

Шаблон проекта состоит из двух файлов: Файла проекта DelphiSample.dpr и модуля Ants.pas. Все свои изменения нужно вносить исключительно в файл проекта. Модуль Ants.pas менять не рекомендуется, потому что жюри со своей стороны будет компилировать ваш проект с модулем Ants.pas в его первоначальном виде.

Чтобы создать программу-муравья Вам следует написать тело процедуры GetAction так, чтобы она реализовывала вашу задумку. Вот ее прототип:

procedure GetAction(sensors: TSensors; hasFood: Boolean; memory: PMemory; var result: TAntAction); cdecl;

Далее приводятся определения и описания всех необходимых типов.

const
  MAX_MEMORY = 32; // Размер памяти вашего муравья
type
  // Все возможные действия муравья
  TAntActionType = (
    aaMoveUp, aaMoveLeft, aaMoveDown, aaMoveRight, // передвижение
    aaBiteUp, aaBiteLeft, aaBiteDown, aaBiteRight, // кусание
    aaGet, aaPut); // манипуляция с едой

  // Показания органа чувств муравья.
  // Орган чувств возвращает информацию об одной клетке игрового поля
  TAntSensor = record
    smell: Integer; // оттенок запаха
    smellIntensity: Integer; // интенсивность запаха
    isFriend: Boolean; // наличие "своего" муравья
    isEnemy: Boolean; // наличие "чужого" муравья
    isMyHill: Boolean;  // наличие "своего" муравейника
    isEnemyHill: Boolean;  // наличие "чужого" муравейника
    isFood: Boolean; // наличие еды
    isWall: Boolean; // наличие стены
  end;

  // Действие муравья на текущем ходу  
  TAntAction = record
    actionType: TAntActionType; // передвижение, кусание или манипуляция с едой
    putSmell: Boolean; // оставить ли запах на клетке
    smell: Integer; // оттенок оставляемого муравьём запаха
  end;

  // Показания всех сенсоров муравья для ближайших 9 клеток к муравью.
  // sensors[-1, -1] - информация о левой верхней соседней клетке
  // sensors[1, -1] - информация о правой верхней соседней клетке
  // sensors[1, 1] - информация о правой нижней соседней клетке
  // и т.д.
  TSensors = array[-1..1, -1..1] of TAntSensor;

  // Память муравья
  PMemory = ^TMemory;
  TMemory = array[0..MAX_MEMORY-1] of Byte;
        

В шаблонный проект включено два файла: основной код в файле main.cpp и заголовочный файл IAntLogic.hpp. Все свои изменения нужно вносить исключительно в файл main.cpp. Остальные файлы менять не рекомендуется, потому что жюри со своей стороны будет компилировать ваш проект с этими файлами в их первоначальном виде.

Чтобы создать программу-муравья Вам следует написать тело функции GetAction так, чтобы она реализовывала вашу задумку. Вот ее прототип:

AntAction GetAction(const Ant &ant, AntSensor sensors[3][3])

ant - состояние муравья

sensors - показания всех сенсоров муравья для ближайших 9 клеток к муравью.

Далее приводятся определения и описания всех необходимых типов.

// Все возможные действия муравья
enum AntActionType{
	// передвижение:
	MOVE_UP = 0,
	MOVE_LEFT = 1,
	MOVE_DOWN = 2,
	MOVE_RIGHT = 3,
	// кусание:
	BITE_UP = 4,
	BITE_LEFT = 5,
	BITE_DOWN = 6,
	BITE_RIGHT = 7,
	// манипуляция с едой:
	GET = 8,
	PUT = 9,
};
// Действие муравья на текущем ходу  
struct AntAction
{
    AntActionType actionType; // передвижение, кусание или манипуляция с едой
    bool putSmell; // оставить ли запах на клетке
    int smell; // оттенок оставляемого муравьём запаха
};

// Показания органа чувств муравья.
// Орган чувств возвращает информацию об одной клетке игрового поля
struct AntSensor{
    int smell; // оттенок запаха
    int smellIntensity; // интенсивность запаха
    bool isFriend; // наличие "своего" муравья
    bool isEnemy; // наличие "чужого" муравья
    bool isMyHill; // наличие "своего" муравейника
    bool isEnemyHill; // наличие "чужого" муравейника
    bool isFood; // наличие еды
    bool isWall; // наличие стены
};

// Класс, описывающий состояние муравья
class Ant
{
public:
    virtual char* getMemory() const = 0; // память муравья
    virtual bool hasFood() const = 0; // есть ли у муравья еда
    virtual ~Ant() {}
};

const int MAX_MEMORY = 32; // Размер памяти вашего муравья