equal
deleted
inserted
replaced
172 ap.ExplX:= EX; |
172 ap.ExplX:= EX; |
173 ap.ExplY:= EY; |
173 ap.ExplY:= EY; |
174 valueResult:= value |
174 valueResult:= value |
175 end; |
175 end; |
176 end |
176 end |
177 until (value > 204800) or (rTime > 4250); |
177 //until (value > 204800) or (rTime > 4250); not so useful since adding score to the drowning |
|
178 until rTime > 4250; |
178 TestBazooka:= valueResult |
179 TestBazooka:= valueResult |
179 end; |
180 end; |
180 |
181 |
181 function TestSnowball(Me: PGear; Targ: TPoint; Level: LongInt; var ap: TAttackParams): LongInt; |
182 function TestSnowball(Me: PGear; Targ: TPoint; Level: LongInt; var ap: TAttackParams): LongInt; |
182 var Vx, Vy, r: hwFloat; |
183 var Vx, Vy, r: hwFloat; |
326 ap.ExplX:= EX; |
327 ap.ExplX:= EX; |
327 ap.ExplY:= EY; |
328 ap.ExplY:= EY; |
328 valueResult:= Score |
329 valueResult:= Score |
329 end; |
330 end; |
330 end |
331 end |
331 until (Score > 204800) or (TestTime > 4000); |
332 //until (Score > 204800) or (TestTime > 4000); |
|
333 until TestTime > 4000; |
332 TestGrenade:= valueResult |
334 TestGrenade:= valueResult |
333 end; |
335 end; |
334 |
336 |
335 function TestClusterBomb(Me: PGear; Targ: TPoint; Level: LongInt; var ap: TAttackParams): LongInt; |
337 function TestClusterBomb(Me: PGear; Targ: TPoint; Level: LongInt; var ap: TAttackParams): LongInt; |
336 const tDelta = 24; |
338 const tDelta = 24; |