28      PTeam     = ^TTeam;

    28      PTeam     = ^TTeam;

    29      PClan     = ^TClan;

    29      PClan     = ^TClan;

    30      THedgehog = record

    30      THedgehog = record

    31                  Name: string[MAXNAMELEN];

    31                  Name: string[MAXNAMELEN];

    32                  Gear: PGear;

    32                  Gear: PGear;

    35                  Ammo: PHHAmmo;

    36                  Ammo: PHHAmmo;

    36                  AmmoStore: Longword;

    37                  AmmoStore: Longword;

    37                  CurSlot, CurAmmo: LongWord;

    38                  CurSlot, CurAmmo: LongWord;

    38                  Team: PTeam;

    39                  Team: PTeam;

    39                  AttacksNum: Longword;

    40                  AttacksNum: Longword;

    40                  visStepPos: LongWord;

    41                  visStepPos: LongWord;

    41                  BotLevel  : LongWord; // 0 - Human player

    42                  BotLevel  : LongWord; // 0 - Human player

    42                  stats: TStatistics;

    43                  stats: TStatistics;

    43                  end;

    45                  end;

    44      TTeam = record

    46      TTeam = record

    45              Clan: PClan;

    47              Clan: PClan;

    46              TeamName: string[MAXNAMELEN];

    48              TeamName: string[MAXNAMELEN];

    47              ExtDriven: boolean;

    49              ExtDriven: boolean;