--- a/hedgewars/uGears.pas	Wed May 30 20:48:57 2007 +0000
+++ b/hedgewars/uGears.pas	Sun Jun 03 17:21:57 2007 +0000
@@ -129,7 +129,8 @@
                                                                @doStepBlowTorch,
                                                                @doStepGirder,
                                                                @doStepTeleport,
-                                                               @doStepHealthTag
+                                                               @doStepHealthTag,
+                                                               @doStepSwitcher
                                                                );
 
 procedure InsertGearToList(Gear: PGear);
@@ -590,7 +591,8 @@
            gtFlame: DrawSprite(sprFlame, hwRound(Gear^.X) - 8 + WorldDx, hwRound(Gear^.Y) - 8 + WorldDy,(GameTicks div 128 + Gear^.Angle) mod 8, Surface);
          gtAirBomb: DrawSprite(sprAirBomb , hwRound(Gear^.X) - 16 + WorldDx, hwRound(Gear^.Y) - 16 + WorldDy, DxDy2Angle32(Gear^.dY, Gear^.dX), Surface);
        gtAirAttack: if Gear^.Tag > 0 then DrawSprite(sprAirplane, hwRound(Gear^.X) - 60 + WorldDx, hwRound(Gear^.Y) - 25 + WorldDy, 0, Surface)
-                                     else DrawSprite(sprAirplane, hwRound(Gear^.X) - 60 + WorldDx, hwRound(Gear^.Y) - 25 + WorldDy, 1, Surface)
+                                     else DrawSprite(sprAirplane, hwRound(Gear^.X) - 60 + WorldDx, hwRound(Gear^.Y) - 25 + WorldDy, 1, Surface);
+        gtSwitcher: DrawSprite(sprSwitch, hwRound(Gear^.X) - 16 + WorldDx, hwRound(Gear^.Y) - 56 + WorldDy, 0, Surface);
               end;
       Gear:= Gear^.NextGear
       end;