| changeset 9656 | 18422d205080 |
| parent 9283 | 76e68c136a11 |
| child 9720 | 453a1c29b7e4 |
| 9655:e154ccca4dad | 9656:18422d205080 |
|---|---|
549 t:= - 4; |
549 t:= - 4; |
550 for i:= 0 to Pred(TeamsCount) do |
550 for i:= 0 to Pred(TeamsCount) do |
551 with thexchar[i] do |
551 with thexchar[i] do |
552 if team^.TeamHealth > 0 then |
552 if team^.TeamHealth > 0 then |
553 begin |
553 begin |
554 dec(t, team^.HealthTex^.h + 2); |
554 dec(t, team^.Clan^.HealthTex^.h + 2); |
555 ny:= t; |
555 ny:= t; |
556 dy:= dy - ny |
556 dy:= dy - ny |
557 end; |
557 end; |
558 |
558 |
559 Gear^.Timer:= cSorterWorkTime; |
559 Gear^.Timer:= cSorterWorkTime; |