equal
deleted
inserted
replaced
124 |
124 |
125 procedure handler__i; |
125 procedure handler__i; |
126 var cmd: TCmdParami; |
126 var cmd: TCmdParami; |
127 s: shortstring; |
127 s: shortstring; |
128 begin |
128 begin |
129 writeln('handler__i'); |
|
130 s:= getShortString(); |
129 s:= getShortString(); |
131 if s[0] = #0 then exit; |
130 if s[0] = #0 then exit; |
132 cmd.cmd:= state.cmd; |
131 cmd.cmd:= state.cmd; |
133 s:= getShortString(); |
132 s:= getShortString(); |
134 if s[0] = #0 then exit; |
133 if s[0] = #0 then exit; |
136 sendUI(mtNetData, @cmd, sizeof(cmd)); |
135 sendUI(mtNetData, @cmd, sizeof(cmd)); |
137 handleTail() |
136 handleTail() |
138 end; |
137 end; |
139 |
138 |
140 procedure handler_i; |
139 procedure handler_i; |
141 begin |
140 var cmd: TCmdParami; |
142 writeln('handler_i'); |
141 s: shortstring; |
|
142 begin |
|
143 s:= getShortString(); |
|
144 if s[0] = #0 then exit; |
|
145 cmd.cmd:= state.cmd; |
|
146 cmd.param1:= strToInt(s); |
|
147 sendUI(mtNetData, @cmd, sizeof(cmd)); |
143 handleTail() |
148 handleTail() |
144 end; |
149 end; |
145 |
150 |
146 procedure handler__UNKNOWN_; |
151 procedure handler__UNKNOWN_; |
147 begin |
152 begin |