diff -r fc52f7c22c9b -r 6155187bf599 hedgewars/PascalExports.pas --- a/hedgewars/PascalExports.pas Mon Jan 16 10:22:21 2012 +0100 +++ b/hedgewars/PascalExports.pas Tue Jan 17 09:01:31 2012 -0500 @@ -32,9 +32,13 @@ {$INCLUDE "config.inc"} procedure HW_versionInfo(netProto: PLongInt; versionStr: PPChar); cdecl; export; + function HW_getNumberOfWeapons:LongInt; cdecl; export; + function HW_getMaxNumberOfTeams:LongInt; cdecl; export; + function HW_getMaxNumberOfHogs:LongInt; cdecl; export; + procedure HW_terminate(closeFrontend: Boolean); cdecl; export; implementation @@ -225,8 +229,8 @@ function HW_isAmmoMenuNotAllowed: boolean; cdecl; export; begin; - exit( (TurnTimeLeft = 0) or (not CurrentTeam^.ExtDriven and (((CurAmmoGear = nil) or - ((Ammoz[CurAmmoGear^.AmmoType].Ammo.Propz and ammoprop_AltAttack) = 0)) and hideAmmoMenu)) ); + exit( (TurnTimeLeft = 0) or (not CurrentTeam^.ExtDriven and (((CurAmmoGear = nil) + or ((Ammoz[CurAmmoGear^.AmmoType].Ammo.Propz and ammoprop_AltAttack) = 0)) and hideAmmoMenu)) ); end; function HW_isWeaponRequiringClick: boolean; cdecl; export; @@ -270,7 +274,7 @@ begin // this most likely won't work in network game if (CurrentHedgehog <> nil) and (CurrentHedgehog^.Ammo <> nil) and (CurrentHedgehog^.BotLevel = 0) - and (CurrentHedgehog^.CurAmmoType = amPiano) then + and (CurrentHedgehog^.CurAmmoType = amPiano) then case snd of 0: PlaySound(sndPiano0); 1: PlaySound(sndPiano1);