equal
deleted
inserted
replaced
702 for i:= 0 to Pred(TeamsCount) do |
702 for i:= 0 to Pred(TeamsCount) do |
703 with TeamsArray[i]^ do |
703 with TeamsArray[i]^ do |
704 begin |
704 begin |
705 if (not hasGone) and isGoneFlagPendingToBeSet then |
705 if (not hasGone) and isGoneFlagPendingToBeSet then |
706 begin |
706 begin |
707 AddChatString(#7 + '* '+ TeamName + ' is gone'); // TODO: localize |
707 AddChatString(#7 + '* '+ FormatA(trmsg[sidTeamGone], TeamName)); |
708 if not CurrentTeam^.ExtDriven then SendIPC(_S'f' + s); |
708 if not CurrentTeam^.ExtDriven then SendIPC(_S'f' + s); |
709 hasGone:= true; |
709 hasGone:= true; |
710 skippedTurns:= 0; |
710 skippedTurns:= 0; |
711 isGoneFlagPendingToBeSet:= false; |
711 isGoneFlagPendingToBeSet:= false; |
712 RecountTeamHealth(TeamsArray[i]) |
712 RecountTeamHealth(TeamsArray[i]) |
741 if isSynced then |
741 if isSynced then |
742 begin |
742 begin |
743 with TeamsArray[t]^ do |
743 with TeamsArray[t]^ do |
744 if hasGone then |
744 if hasGone then |
745 begin |
745 begin |
746 AddChatString(#8 + '* '+ TeamName + ' is back'); |
746 AddChatString(#8 + '* '+ FormatA(trmsg[sidTeamBack], TeamName)); |
747 if not CurrentTeam^.ExtDriven then SendIPC(_S'g' + s); |
747 if not CurrentTeam^.ExtDriven then SendIPC(_S'g' + s); |
748 hasGone:= false; |
748 hasGone:= false; |
749 |
749 |
750 RecountTeamHealth(TeamsArray[t]); |
750 RecountTeamHealth(TeamsArray[t]); |
751 |
751 |