Mercurial Mercurial > hedgewars / diff
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
hedgewars/uGearsHandlersMess.pas
changeset 15228 1dd99fc2a0e8
parent 15226 eb61cf77b365
child 15229 b96868956514 
--- a/hedgewars/uGearsHandlersMess.pas	Thu Jul 11 04:42:50 2019 +0200
+++ b/hedgewars/uGearsHandlersMess.pas	Thu Jul 11 05:07:55 2019 +0200
@@ -3099,7 +3099,10 @@
         end;
 
     if (GameTicks and $3F) = 0 then
-        AddVisualGear(hwRound(Gear^.X), hwRound(Gear^.Y), vgtSmokeTrace);
+        if CheckCoordInWater(hwRound(Gear^.X), hwRound(Gear^.Y)) then
+            AddVisualGear(hwRound(Gear^.X), hwRound(Gear^.Y), vgtBubble)
+        else
+            AddVisualGear(hwRound(Gear^.X), hwRound(Gear^.Y), vgtSmokeTrace);
 
     if (hwRound(Gear^.X) > (max(LAND_WIDTH,4096)+2048)) or (hwRound(Gear^.X) < -2048) or ((Gear^.Message and gmDestroy) > 0) then
         begin
hedgewars