--- 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);