equal
deleted
inserted
replaced
921 |
921 |
922 t:= cScreenHeight - 4; |
922 t:= cScreenHeight - 4; |
923 for i:= 0 to Pred(TeamsCount) do |
923 for i:= 0 to Pred(TeamsCount) do |
924 with thexchar[i] do |
924 with thexchar[i] do |
925 begin |
925 begin |
926 dec(t, team^.HealthSurf^.h + 2); |
926 dec(t, team^.HealthTex^.h + 2); |
927 ny:= t; |
927 ny:= t; |
928 dy:= dy - ny |
928 dy:= dy - ny |
929 end; |
929 end; |
930 |
930 |
931 Gear^.Timer:= cSorterWorkTime; |
931 Gear^.Timer:= cSorterWorkTime; |
932 Gear^.doStep:= @doStepTeamHealthSorterWork; |
932 Gear^.doStep:= @doStepTeamHealthSorterWork; |
933 currsorter:= Gear |
933 currsorter:= Gear |
934 end; |
934 end; |
935 |
935 |