equal
deleted
inserted
replaced
420 end; |
420 end; |
421 gtGasBomb: |
421 gtGasBomb: |
422 begin |
422 begin |
423 doMakeExplosion(hwRound(Gear^.X), hwRound(Gear^.Y), 20, EXPLAutoSound); |
423 doMakeExplosion(hwRound(Gear^.X), hwRound(Gear^.Y), 20, EXPLAutoSound); |
424 for i:= 0 to 2 do |
424 for i:= 0 to 2 do |
425 AddGear(hwRound(Gear^.X) - 30 + GetRandom(60), hwRound(Gear^.Y) - 20 + GetRandom(40), gtPoisonCloud, 0, _0, _0, 0); |
425 AddGear(int64(hwRound(Gear^.X)) - 30 + GetRandom(60), int64(hwRound(Gear^.Y)) - 20 + GetRandom(40), gtPoisonCloud, 0, _0, _0, 0); |
426 end; |
426 end; |
427 end; |
427 end; |
428 DeleteGear(Gear); |
428 DeleteGear(Gear); |
429 exit |
429 exit |
430 end; |
430 end; |