equal
deleted
inserted
replaced
562 x, y: LongInt; |
562 x, y: LongInt; |
563 begin |
563 begin |
564 Gear:= GearsList; |
564 Gear:= GearsList; |
565 while Gear <> nil do |
565 while Gear <> nil do |
566 begin |
566 begin |
567 if Gear^.State and gstInvisible = 0 then |
567 if (Gear^.State and gstInvisible = 0) and (Gear^.Message and gmRemoveFromList = 0) then |
568 begin |
568 begin |
569 x:= hwRound(Gear^.X) + WorldDx; |
569 x:= hwRound(Gear^.X) + WorldDx; |
570 y:= hwRound(Gear^.Y) + WorldDy; |
570 y:= hwRound(Gear^.Y) + WorldDy; |
571 RenderGear(Gear, x, y); |
571 RenderGear(Gear, x, y); |
572 end; |
572 end; |