equal
deleted
inserted
replaced
606 Color:= StrToInt(cs); |
606 Color:= StrToInt(cs); |
607 |
607 |
608 // color is always little endian so the mask must be constant also in big endian archs |
608 // color is always little endian so the mask must be constant also in big endian archs |
609 Color:= Color or $FF000000; |
609 Color:= Color or $FF000000; |
610 AddTeam(Color); |
610 AddTeam(Color); |
611 CurrentTeam^.TeamName:= ts; |
611 |
612 CurrentTeam^.PlayerHash:= s; |
612 if CurrentTeam <> nil then |
613 loadTeamBinds(ts); |
613 begin |
614 |
614 CurrentTeam^.TeamName:= ts; |
615 if GameType in [gmtDemo, gmtSave, gmtRecord] then |
615 CurrentTeam^.PlayerHash:= s; |
616 CurrentTeam^.ExtDriven:= true; |
616 loadTeamBinds(ts); |
617 |
617 |
618 CurrentTeam^.voicepack:= AskForVoicepack('Default') |
618 if GameType in [gmtDemo, gmtSave, gmtRecord] then |
|
619 CurrentTeam^.ExtDriven:= true; |
|
620 |
|
621 CurrentTeam^.voicepack:= AskForVoicepack('Default') |
|
622 end |
619 end |
623 end |
620 end; |
624 end; |
621 |
625 |
622 procedure chSetHHCoords(var x: shortstring); |
626 procedure chSetHHCoords(var x: shortstring); |
623 var y: shortstring; |
627 var y: shortstring; |