hedgewars/uGears.pas
changeset 9234 2bf3796c5855
parent 9224 bce8cf41d666
child 9236 ddd675825672
child 9283 76e68c136a11
equal deleted inserted replaced
9195:e653e96b0ec3 9234:2bf3796c5855
    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);
    45 procedure RestoreHog(HH: PHedgehog);
       
    46 procedure ProcessGears;
    45 procedure ProcessGears;
    47 procedure EndTurnCleanup;
    46 procedure EndTurnCleanup;
    48 procedure SetAllToActive;
    47 procedure SetAllToActive;
    49 procedure SetAllHHToActive; inline;
    48 procedure SetAllHHToActive; inline;
    50 procedure SetAllHHToActive(Ice: boolean);
    49 procedure SetAllHHToActive(Ice: boolean);