hedgewars-draft: comparison hedgewars/uGears.pas

equal deleted inserted replaced

-:8e2dedaa01b4
+:e4d1fb310a66
 if bShowFinger and ((Gear^.State and gstHHDriven) <> 0) then
 DrawSprite(sprFinger, hwRound(Gear^.X) - 16 + WorldDx, hwRound(Gear^.Y) - 64 + WorldDy,
 GameTicks div 32 mod 16, Surface);
 if (Gear^.State and (gstMoving or gstDrowning)) = 0 then
 if (Gear^.State and gstHHThinking) <> 0 then
-DrawGear(sQuestion, hwRound(Gear^.X) - 10 + WorldDx, hwRound(Gear^.Y) - cHHRadius - 34 + WorldDy, Surface)
+DrawSprite(sprQuestion, hwRound(Gear^.X) - 10 + WorldDx, hwRound(Gear^.Y) - cHHRadius - 34 + WorldDy, 0, Surface)
 else
 if ShowCrosshair and ((Gear^.State and gstAttacked) = 0) then
 DrawSurfSprite(Round(hwRound(Gear^.X) + hwSign(Gear^.dX) * Sin(Gear^.Angle*pi/cMaxAngle)*60) + WorldDx - 11,
 Round(hwRound(Gear^.Y) - Cos(Gear^.Angle*pi/cMaxAngle)*60) + WorldDy - 12,
 24, (18 + hwSign(Gear^.dX) * LongInt(((Gear^.Angle * 72 div cMaxAngle) + 1) div 2) mod 18) mod 18,
 b:= true
 end;
 if b then
 begin
 inc(roplen);
-if (roplen mod 4) = 0 then DrawGear(sRopeNode, x - 2, y - 2, Surface)
+if (roplen mod 4) = 0 then DrawSprite(sprRopeNode, x - 2, y - 2, 0, Surface)
 end
 end
 end;
 begin