--- a/hedgewars/uConsts.pas Wed Aug 16 11:41:00 2006 +0000
+++ b/hedgewars/uConsts.pas Wed Aug 16 21:35:27 2006 +0000
@@ -270,7 +270,7 @@
Ammoz: array [TAmmoType] of record
NameId: TAmmoStrId;
Ammo: TAmmo;
- Slot: Longword;
+ Slot: 0..cMaxSlotIndex;
TimeAfterTurn: Longword;
end = (
(NameId: sidGrenade;
--- a/hedgewars/uIO.pas Wed Aug 16 11:41:00 2006 +0000
+++ b/hedgewars/uIO.pas Wed Aug 16 21:35:27 2006 +0000
@@ -204,7 +204,7 @@
CursorPoint.Y:= extcmd[cmdcurpos].Y + WorldDy;
end;
'1'..'5': ParseCommand('timer ' + extcmd[cmdcurpos].cmd);
- #128..#134: ParseCommand('slot ' + char(byte(extcmd[cmdcurpos].cmd) - 79))
+ #128..char(128 + cMaxSlotIndex): ParseCommand('slot ' + char(byte(extcmd[cmdcurpos].cmd) - 79))
end;
inc(cmdcurpos)
end;