--- a/hedgewars/uScript.pas	Thu Feb 25 04:08:47 2010 +0000
+++ b/hedgewars/uScript.pas	Thu Feb 25 12:49:04 2010 +0000
@@ -450,7 +450,7 @@
 begin
 ScriptAmmoStore:= '';
 for i:=1 to ord(High(TAmmoType)) do
-	ScriptAmmoStore:= ScriptAmmoStore + '00';
+	ScriptAmmoStore:= ScriptAmmoStore + '0000';
 end;
 
 procedure ScriptSetAmmo(ammo : TAmmoType; count, propability: Byte);