equal
deleted
inserted
replaced
373 if (Gear^.Timer and 15) = 0 then |
373 if (Gear^.Timer and 15) = 0 then |
374 for i:= 0 to Pred(TeamsCount) do |
374 for i:= 0 to Pred(TeamsCount) do |
375 with thexchar[i] do |
375 with thexchar[i] do |
376 begin |
376 begin |
377 {$WARNINGS OFF} |
377 {$WARNINGS OFF} |
378 team^.DrawHealthY:= ny + dy * LongInt(Gear^.Timer div 640); |
378 team^.DrawHealthY:= ny + dy * LongInt(Gear^.Timer) div 640; |
379 team^.TeamHealthBarWidth:= team^.NewTeamHealthBarWidth + dw * LongInt(Gear^.Timer div cSorterWorkTime); |
379 team^.TeamHealthBarWidth:= team^.NewTeamHealthBarWidth + dw * LongInt(Gear^.Timer) div cSorterWorkTime; |
380 {$WARNINGS ON} |
380 {$WARNINGS ON} |
381 end; |
381 end; |
382 |
382 |
383 if (Gear^.Timer = 0) or (currsorter <> Gear) then |
383 if (Gear^.Timer = 0) or (currsorter <> Gear) then |
384 begin |
384 begin |