equal
deleted
inserted
replaced
322 x := hwRound(Gear^.X); |
322 x := hwRound(Gear^.X); |
323 y := hwRound(Gear^.Y); |
323 y := hwRound(Gear^.Y); |
324 doMakeExplosion(x, y, 20, EXPLAutoSound); |
324 doMakeExplosion(x, y, 20, EXPLAutoSound); |
325 for i:= 0 to 4 do |
325 for i:= 0 to 4 do |
326 begin |
326 begin |
327 dX := rndSign(GetRandom * _0_1); |
327 dX := rndSign(GetRandom * _0_1) + Gear^.dX / 5; |
328 dY := (GetRandom - _3) * _0_08; |
328 dY := (GetRandom - _3) * _0_08; |
329 AddGear(x, y, gtCluster, 0, dX, dY, 25); |
329 AddGear(x, y, gtCluster, 0, dX, dY, 25); |
330 end |
330 end |
331 end; |
331 end; |
332 gtWatermelon: |
332 gtWatermelon: |
334 x := hwRound(Gear^.X); |
334 x := hwRound(Gear^.X); |
335 y := hwRound(Gear^.Y); |
335 y := hwRound(Gear^.Y); |
336 doMakeExplosion(x, y, 75, EXPLAutoSound); |
336 doMakeExplosion(x, y, 75, EXPLAutoSound); |
337 for i:= 0 to 5 do |
337 for i:= 0 to 5 do |
338 begin |
338 begin |
339 dX := rndSign(GetRandom * _0_1); |
339 dX := rndSign(GetRandom * _0_1) + Gear^.dX / 5; |
340 dY := (GetRandom - _1_5) * _0_3; |
340 dY := (GetRandom - _1_5) * _0_3; |
341 AddGear(x, y, gtMelonPiece, 0, dX, dY, 75)^.DirAngle := i * 60; |
341 AddGear(x, y, gtMelonPiece, 0, dX, dY, 75)^.DirAngle := i * 60; |
342 end |
342 end |
343 end; |
343 end; |
344 gtHellishBomb: |
344 gtHellishBomb: |