40 function  SpawnCustomCrateAt(x, y: LongInt; crate: TCrateType; content, cnt: Longword): PGear;

    40 function  SpawnCustomCrateAt(x, y: LongInt; crate: TCrateType; content, cnt: Longword): PGear;

    41 function  SpawnFakeCrateAt(x, y: LongInt; crate: TCrateType; explode: boolean; poison: boolean ): PGear;

    41 function  SpawnFakeCrateAt(x, y: LongInt; crate: TCrateType; explode: boolean; poison: boolean ): PGear;

    42 function  GetAmmo(Hedgehog: PHedgehog): TAmmoType;

    42 function  GetAmmo(Hedgehog: PHedgehog): TAmmoType;

    43 function  GetUtility(Hedgehog: PHedgehog): TAmmoType;

    43 function  GetUtility(Hedgehog: PHedgehog): TAmmoType;

    44 procedure HideHog(HH: PHedgehog);

    44 procedure HideHog(HH: PHedgehog);

    46 procedure ProcessGears;

    45 procedure ProcessGears;

    47 procedure EndTurnCleanup;

    46 procedure EndTurnCleanup;

    48 procedure SetAllToActive;

    47 procedure SetAllToActive;

    49 procedure SetAllHHToActive(Ice: boolean);

    48 procedure SetAllHHToActive(Ice: boolean);

    50 procedure DrawGears;

    49 procedure DrawGears;