--- a/hedgewars/uCommandHandlers.pas	Wed Jan 01 13:42:38 2014 +0400
+++ b/hedgewars/uCommandHandlers.pas	Wed Jan 01 14:16:01 2014 +0400
@@ -119,6 +119,11 @@
 ScriptLoad(s)
 end;
 
+procedure chScriptParam(var s: shortstring);
+begin
+    cScriptParam:= s;
+end;
+
 procedure chCurU_p(var s: shortstring);
 begin
 s:= s; // avoid compiler hint
@@ -796,6 +801,7 @@
 //////// End top by freq analysis
     RegisterVariable('gencmd'  , @chGenCmd       , false);
     RegisterVariable('script'  , @chScript       , false);
+    RegisterVariable('scriptparam', @chScriptParam, false);
     RegisterVariable('proto'   , @chCheckProto   , true );
     RegisterVariable('spectate', @chFastUntilLag   , false);
     RegisterVariable('capture' , @chCapture      , true );