hedgewars/uGears.pas
changeset 5812 91d9de564ef5
parent 5810 552371cc69cc
child 5857 63276513b7b3
equal deleted inserted replaced
5811:2a9438e8adbf 5812:91d9de564ef5
    41 function  SpawnCustomCrateAt(x, y: LongInt; crate: TCrateType; content: Longword ): PGear;
    41 function  SpawnCustomCrateAt(x, y: LongInt; crate: TCrateType; content: Longword ): PGear;
    42 function  SpawnFakeCrateAt(x, y: LongInt; crate: TCrateType; explode: boolean; poison: boolean ): PGear;
    42 function  SpawnFakeCrateAt(x, y: LongInt; crate: TCrateType; explode: boolean; poison: boolean ): PGear;
    43 function  GetAmmo: TAmmoType;
    43 function  GetAmmo: TAmmoType;
    44 function  GetUtility: TAmmoType;
    44 function  GetUtility: TAmmoType;
    45 procedure ResurrectHedgehog(gear: PGear);
    45 procedure ResurrectHedgehog(gear: PGear);
       
    46 procedure HideHog(HH: PHedgehog);
       
    47 procedure RestoreHog(HH: PHedgehog);
    46 procedure ProcessGears;
    48 procedure ProcessGears;
    47 procedure EndTurnCleanup;
    49 procedure EndTurnCleanup;
    48 procedure ApplyDamage(Gear: PGear; AttackerHog: PHedgehog; Damage: Longword; Source: TDamageSource);
    50 procedure ApplyDamage(Gear: PGear; AttackerHog: PHedgehog; Damage: Longword; Source: TDamageSource);
    49 procedure SetAllToActive;
    51 procedure SetAllToActive;
    50 procedure SetAllHHToActive;
    52 procedure SetAllHHToActive;