hedgewars/uGears.pas
changeset 9224 bce8cf41d666
parent 9103 b70352db5675
parent 8817 0d3014097240
child 9236 ddd675825672
child 9283 76e68c136a11
equal deleted inserted replaced
9223:71fc5893071c 9224:bce8cf41d666
    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);