--- a/hedgewars/uFLNet.pas Sat Nov 28 00:18:04 2015 +0300
+++ b/hedgewars/uFLNet.pas Mon Nov 30 23:25:18 2015 +0300
@@ -126,7 +126,6 @@
var cmd: TCmdParami;
s: shortstring;
begin
- writeln('handler__i');
s:= getShortString();
if s[0] = #0 then exit;
cmd.cmd:= state.cmd;
@@ -138,8 +137,14 @@
end;
procedure handler_i;
+var cmd: TCmdParami;
+ s: shortstring;
begin
- writeln('handler_i');
+ s:= getShortString();
+ if s[0] = #0 then exit;
+ cmd.cmd:= state.cmd;
+ cmd.param1:= strToInt(s);
+ sendUI(mtNetData, @cmd, sizeof(cmd));
handleTail()
end;