equal
deleted
inserted
replaced
80 cStereo_Water_distant = 0.0125; |
80 cStereo_Water_distant = 0.0125; |
81 cStereo_Land = 0.0075; |
81 cStereo_Land = 0.0075; |
82 cStereo_Water_near = 0.0025; |
82 cStereo_Water_near = 0.0025; |
83 cStereo_Outside = -0.0400; |
83 cStereo_Outside = -0.0400; |
84 |
84 |
|
85 |
|
86 // helper functions to create the goal/game mode string |
|
87 function AddGoal(s: ansistring; gf: longword; si: TGoalStrId; i: LongInt): ansistring; |
|
88 var t: ansistring; |
|
89 begin |
|
90 if (GameFlags and gf) <> 0 then |
|
91 begin |
|
92 t:= inttostr(i); |
|
93 s:= s + format(trgoal[si], t) + '|' |
|
94 end; |
|
95 AddGoal:= s; |
|
96 end; |
|
97 |
|
98 function AddGoal(s: ansistring; gf: longword; si: TGoalStrId): ansistring; |
|
99 begin |
|
100 if (GameFlags and gf) <> 0 then |
|
101 s:= s + trgoal[si] + '|'; |
|
102 AddGoal:= s; |
|
103 end; |
|
104 |
85 procedure InitWorld; |
105 procedure InitWorld; |
86 var i, t: LongInt; |
106 var i, t: LongInt; |
87 cp: PClan; |
107 cp: PClan; |
88 g: ansistring; |
108 g: ansistring; |
89 |
|
90 // helper functions to create the goal/game mode string |
|
91 function AddGoal(s: ansistring; gf: longword; si: TGoalStrId; i: LongInt): ansistring; |
|
92 var t: ansistring; |
|
93 begin |
|
94 if (GameFlags and gf) <> 0 then |
|
95 begin |
|
96 t:= inttostr(i); |
|
97 s:= s + format(trgoal[si], t) + '|' |
|
98 end; |
|
99 AddGoal:= s; |
|
100 end; |
|
101 |
|
102 function AddGoal(s: ansistring; gf: longword; si: TGoalStrId): ansistring; |
|
103 begin |
|
104 if (GameFlags and gf) <> 0 then |
|
105 s:= s + trgoal[si] + '|'; |
|
106 AddGoal:= s; |
|
107 end; |
|
108 begin |
109 begin |
109 missionTimer:= 0; |
110 missionTimer:= 0; |
110 |
111 |
111 if (GameFlags and gfRandomOrder) <> 0 then // shuffle them up a bit |
112 if (GameFlags and gfRandomOrder) <> 0 then // shuffle them up a bit |
112 begin |
113 begin |