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(int64(hwRound(Gear^.X)) - 30 + GetRandom(60), int64(hwRound(Gear^.Y)) - 20 + GetRandom(40), gtPoisonCloud, 0, _0, _0, 0); |
425 begin |
|
426 x:= GetRandom(60); |
|
427 y:= GetRandom(40); |
|
428 AddGear(hwRound(Gear^.X) - 30 + x, hwRound(Gear^.Y) - 20 + y, gtPoisonCloud, 0, _0, _0, 0); |
|
429 end |
426 end; |
430 end; |
427 end; |
431 end; |
428 DeleteGear(Gear); |
432 DeleteGear(Gear); |
429 exit |
433 exit |
430 end; |
434 end; |