equal
deleted
inserted
replaced
189 CurrentHedgehog^.Gear^.X:= int2hwFloat(t); |
189 CurrentHedgehog^.Gear^.X:= int2hwFloat(t); |
190 val(y, t); |
190 val(y, t); |
191 CurrentHedgehog^.Gear^.Y:= int2hwFloat(t) |
191 CurrentHedgehog^.Gear^.Y:= int2hwFloat(t) |
192 end; |
192 end; |
193 |
193 |
|
194 procedure chSetAmmoLoadout(var descr: shortstring); |
|
195 begin |
|
196 SetAmmoLoadout(descr) |
|
197 end; |
|
198 |
|
199 procedure chSetAmmoDelay(var descr: shortstring); |
|
200 begin |
|
201 SetAmmoDelay(descr) |
|
202 end; |
|
203 |
|
204 procedure chSetAmmoProbability(var descr: shortstring); |
|
205 begin |
|
206 SetAmmoProbability(descr) |
|
207 end; |
|
208 |
|
209 procedure chSetAmmoReinforcement(var descr: shortstring); |
|
210 begin |
|
211 SetAmmoReinforcement(descr) |
|
212 end; |
|
213 |
194 procedure chAddAmmoStore(var descr: shortstring); |
214 procedure chAddAmmoStore(var descr: shortstring); |
195 begin |
215 begin |
196 AddAmmoStore(descr) |
216 AddAmmoStore |
197 end; |
217 end; |
198 |
218 |
199 procedure chBind(var id: shortstring); |
219 procedure chBind(var id: shortstring); |
200 var s: shortstring; |
220 var s: shortstring; |
201 b: LongInt; |
221 b: LongInt; |