diff -r d47122a0e4b4 -r 6b7d92fa4912 hedgewars/uGearsList.pas --- a/hedgewars/uGearsList.pas Sat Jun 15 12:10:42 2019 +0200 +++ b/hedgewars/uGearsList.pas Sat Jun 15 12:58:01 2019 +0200 @@ -330,7 +330,10 @@ ((GetRandom(90)+128) shl 16) or (($d5+c) shl 8) or $ff} end; - gtParachute: gear^.Z:= cCurrHHZ; + gtParachute: begin + gear^.Tag:= 1; // hog face dir. 1 = right, -1 = left + gear^.Z:= cCurrHHZ; + end; gtShell: begin gear^.Elasticity:= _0_8; gear^.Friction:= _0_8;