equal
deleted
inserted
replaced
554 x, y: LongInt; |
554 x, y: LongInt; |
555 begin |
555 begin |
556 Gear:= GearsList; |
556 Gear:= GearsList; |
557 while Gear <> nil do |
557 while Gear <> nil do |
558 begin |
558 begin |
559 if Gear^.State and gstInvisible = 0 then |
559 if (Gear^.State and gstInvisible = 0) and (Gear^.Message and gmRemoveFromList = 0) then |
560 begin |
560 begin |
561 x:= hwRound(Gear^.X) + WorldDx; |
561 x:= hwRound(Gear^.X) + WorldDx; |
562 y:= hwRound(Gear^.Y) + WorldDy; |
562 y:= hwRound(Gear^.Y) + WorldDy; |
563 RenderGear(Gear, x, y); |
563 RenderGear(Gear, x, y); |
564 end; |
564 end; |