equal
deleted
inserted
replaced
45 TryDo(i >= cNetProtoVersion, 'Protocol version mismatch: engine is too new', true) |
45 TryDo(i >= cNetProtoVersion, 'Protocol version mismatch: engine is too new', true) |
46 end |
46 end |
47 end; |
47 end; |
48 |
48 |
49 procedure chAddTeam(var s: shortstring); |
49 procedure chAddTeam(var s: shortstring); |
|
50 var Color: Longword; |
50 begin |
51 begin |
51 if isDeveloperMode then |
52 if isDeveloperMode then |
52 begin |
53 begin |
53 ParseCommand('ammstore 93919294221912103323', true); |
54 ParseCommand('ammstore 93919294221912103323', true); |
54 AddTeam; |
55 val(s, Color); |
55 |
56 TryDo(Color <> 0, 'Error: black team color', true); |
56 |
57 |
57 if GameType in [gmtDemo, gmtSave] then CurrentTeam^.ExtDriven:= true; |
58 AddTeam(Color); |
58 val(s, CurrentTeam^.Color); |
59 |
59 TryDo(CurrentTeam^.Color <> 0, 'Error: black team color', true); |
60 if GameType in [gmtDemo, gmtSave] then CurrentTeam^.ExtDriven:= true |
60 CurrentTeam^.AdjColor:= CurrentTeam^.Color; |
|
61 AdjustColor(CurrentTeam^.AdjColor) |
|
62 end |
61 end |
63 end; |
62 end; |
64 |
63 |
65 procedure chTeamLocal(var s: shortstring); |
64 procedure chTeamLocal(var s: shortstring); |
66 begin |
65 begin |