equal
deleted
inserted
replaced
328 end; |
328 end; |
329 |
329 |
330 function TestMolotov(Me: PGear; Targ: TTarget; Level: LongInt; var ap: TAttackParams): LongInt; |
330 function TestMolotov(Me: PGear; Targ: TTarget; Level: LongInt; var ap: TAttackParams): LongInt; |
331 var Vx, Vy, r: real; |
331 var Vx, Vy, r: real; |
332 Score, EX, EY, valueResult: LongInt; |
332 Score, EX, EY, valueResult: LongInt; |
333 TestTime: Longword; |
333 TestTime: LongInt; |
334 x, y, dY, meX, meY: real; |
334 x, y, dY, meX, meY: real; |
335 t: LongInt; |
335 t: LongInt; |
336 begin |
336 begin |
337 meX:= hwFloat2Float(Me^.X); |
337 meX:= hwFloat2Float(Me^.X); |
338 meY:= hwFloat2Float(Me^.Y); |
338 meY:= hwFloat2Float(Me^.Y); |
380 |
380 |
381 function TestGrenade(Me: PGear; Targ: TTarget; Level: LongInt; var ap: TAttackParams): LongInt; |
381 function TestGrenade(Me: PGear; Targ: TTarget; Level: LongInt; var ap: TAttackParams): LongInt; |
382 const tDelta = 24; |
382 const tDelta = 24; |
383 var Vx, Vy, r: real; |
383 var Vx, Vy, r: real; |
384 Score, EX, EY, valueResult: LongInt; |
384 Score, EX, EY, valueResult: LongInt; |
385 TestTime: Longword; |
385 TestTime: LongInt; |
386 x, y, meX, meY, dY: real; |
386 x, y, meX, meY, dY: real; |
387 t: LongInt; |
387 t: LongInt; |
388 begin |
388 begin |
389 valueResult:= BadTurn; |
389 valueResult:= BadTurn; |
390 TestTime:= 0; |
390 TestTime:= 0; |