author | darkvater |
Tue, 11 Jan 2005 00:54:06 +0000 | |
changeset 983 | 1be852dcdd4c |
parent 970 | 492ca84ecc6c |
child 988 | 2482369a61ff |
permissions | -rw-r--r-- |
0 | 1 |
#include "stdafx.h" |
2 |
#include "ttd.h" |
|
507
8aa8100b0b22
(svn r815) Include strings.h only in the files which need it.
tron
parents:
500
diff
changeset
|
3 |
#include "table/strings.h" |
679
e959706a3e4d
(svn r1117) Move map arrays and some related macros into their own files map.c and map.h
tron
parents:
543
diff
changeset
|
4 |
#include "map.h" |
0 | 5 |
#include "vehicle.h" |
6 |
#include "gfx.h" |
|
7 |
#include "assert.h" |
|
8 |
#include "saveload.h" |
|
543
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
9 |
#include "network.h" |
690
9f449a6b133e
(svn r1131) -Add: [Network] Autoclean_companies (set it with 'set autoclean_companies on/off').
truelight
parents:
679
diff
changeset
|
10 |
#include "network_data.h" |
9f449a6b133e
(svn r1131) -Add: [Network] Autoclean_companies (set it with 'set autoclean_companies on/off').
truelight
parents:
679
diff
changeset
|
11 |
#include "network_server.h" |
842 | 12 |
#include "engine.h" |
0 | 13 |
|
14 |
extern void StartupEconomy(); |
|
15 |
extern void InitNewsItemStructs(); |
|
16 |
||
17 |
byte _name_array[512][32]; |
|
18 |
||
500
ef288590e096
(svn r793) Merge INLINE -> inline replacement (revision 376)
tron
parents:
410
diff
changeset
|
19 |
static inline uint32 ROR(uint32 x, int n) |
0 | 20 |
{ |
21 |
return (x >> n) + (x << ((sizeof(x)*8)-n)); |
|
22 |
} |
|
23 |
||
543
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
24 |
/* XXX - Player-seeds don't seem to be used anymore.. which is a good thing |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
25 |
so I just disabled them for now. If there are no problems, we can remove |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
26 |
it completely! -- TrueLight */ |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
27 |
#undef PLAYER_SEED_RANDOM |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
28 |
|
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
29 |
#ifdef RANDOM_DEBUG |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
30 |
#include "network_data.h" |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
31 |
|
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
32 |
uint32 DoRandom(uint line, char *file) |
260
32fcaaf9f4ef
(svn r266) -Fix: hopefully fixed the desync problem nicely (and reverted the
truelight
parents:
256
diff
changeset
|
33 |
#else |
543
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
34 |
uint32 Random() |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
35 |
#endif |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
36 |
{ |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
37 |
#ifdef RANDOM_DEBUG |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
38 |
if (_networking && (DEREF_CLIENT(0)->status != STATUS_INACTIVE || !_network_server)) |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
39 |
printf("Random [%d/%d] %s:%d\n",_frame_counter, _current_player, file, line); |
260
32fcaaf9f4ef
(svn r266) -Fix: hopefully fixed the desync problem nicely (and reverted the
truelight
parents:
256
diff
changeset
|
40 |
#endif |
32fcaaf9f4ef
(svn r266) -Fix: hopefully fixed the desync problem nicely (and reverted the
truelight
parents:
256
diff
changeset
|
41 |
|
32fcaaf9f4ef
(svn r266) -Fix: hopefully fixed the desync problem nicely (and reverted the
truelight
parents:
256
diff
changeset
|
42 |
#ifdef PLAYER_SEED_RANDOM |
32fcaaf9f4ef
(svn r266) -Fix: hopefully fixed the desync problem nicely (and reverted the
truelight
parents:
256
diff
changeset
|
43 |
if (_current_player>=MAX_PLAYERS || !_networking) { |
206 | 44 |
uint32 s = _random_seeds[0][0]; |
45 |
uint32 t = _random_seeds[0][1]; |
|
46 |
_random_seeds[0][0] = s + ROR(t ^ 0x1234567F, 7); |
|
47 |
return _random_seeds[0][1] = ROR(s, 3); |
|
48 |
} else { |
|
49 |
uint32 s = _player_seeds[_current_player][0]; |
|
50 |
uint32 t = _player_seeds[_current_player][1]; |
|
51 |
_player_seeds[_current_player][0] = s + ROR(t ^ 0x1234567F, 7); |
|
543
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
52 |
DEBUG(net, 1)("[NET-Seeds] Player seed called!"); |
206 | 53 |
return _player_seeds[_current_player][1] = ROR(s, 3); |
54 |
} |
|
256
f7c6267731fb
(svn r261) -Workaround: unplayeable network-game on busy maps because of wrong setup of _current_player. This is only a workaround that can cause desyncs too but not that often
signde
parents:
239
diff
changeset
|
55 |
#else |
f7c6267731fb
(svn r261) -Workaround: unplayeable network-game on busy maps because of wrong setup of _current_player. This is only a workaround that can cause desyncs too but not that often
signde
parents:
239
diff
changeset
|
56 |
uint32 s = _random_seeds[0][0]; |
f7c6267731fb
(svn r261) -Workaround: unplayeable network-game on busy maps because of wrong setup of _current_player. This is only a workaround that can cause desyncs too but not that often
signde
parents:
239
diff
changeset
|
57 |
uint32 t = _random_seeds[0][1]; |
f7c6267731fb
(svn r261) -Workaround: unplayeable network-game on busy maps because of wrong setup of _current_player. This is only a workaround that can cause desyncs too but not that often
signde
parents:
239
diff
changeset
|
58 |
_random_seeds[0][0] = s + ROR(t ^ 0x1234567F, 7); |
f7c6267731fb
(svn r261) -Workaround: unplayeable network-game on busy maps because of wrong setup of _current_player. This is only a workaround that can cause desyncs too but not that often
signde
parents:
239
diff
changeset
|
59 |
return _random_seeds[0][1] = ROR(s, 3); |
f7c6267731fb
(svn r261) -Workaround: unplayeable network-game on busy maps because of wrong setup of _current_player. This is only a workaround that can cause desyncs too but not that often
signde
parents:
239
diff
changeset
|
60 |
#endif |
0 | 61 |
} |
62 |
||
543
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
63 |
#ifdef RANDOM_DEBUG |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
64 |
uint DoRandomRange(uint max, uint line, char *file) |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
65 |
{ |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
66 |
return (uint16)DoRandom(line, file) * max >> 16; |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
67 |
} |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
68 |
#else |
0 | 69 |
uint RandomRange(uint max) |
70 |
{ |
|
71 |
return (uint16)Random() * max >> 16; |
|
72 |
} |
|
543
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
73 |
#endif |
0 | 74 |
|
75 |
uint32 InteractiveRandom() |
|
76 |
{ |
|
206 | 77 |
uint32 t = _random_seeds[1][1]; |
78 |
uint32 s = _random_seeds[1][0]; |
|
79 |
_random_seeds[1][0] = s + ROR(t ^ 0x1234567F, 7); |
|
80 |
return _random_seeds[1][1] = ROR(s, 3); |
|
81 |
} |
|
82 |
||
239 | 83 |
uint InteractiveRandomRange(uint max) |
84 |
{ |
|
85 |
return (uint16)InteractiveRandom() * max >> 16; |
|
86 |
} |
|
87 |
||
206 | 88 |
void InitPlayerRandoms() |
89 |
{ |
|
90 |
int i; |
|
91 |
for (i=0; i<MAX_PLAYERS; i++) { |
|
92 |
_player_seeds[i][0]=InteractiveRandom(); |
|
93 |
_player_seeds[i][1]=InteractiveRandom(); |
|
543
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
94 |
} |
0 | 95 |
} |
96 |
||
97 |
void SetDate(uint date) |
|
98 |
{ |
|
99 |
YearMonthDay ymd; |
|
100 |
ConvertDayToYMD(&ymd, _date = date); |
|
101 |
_cur_year = ymd.year; |
|
102 |
_cur_month = ymd.month; |
|
764
68b398e2b780
(svn r1227) -Add: Ingame Server-list (select Internet, then Find Servers)
truelight
parents:
695
diff
changeset
|
103 |
#ifdef ENABLE_NETWORK |
68b398e2b780
(svn r1227) -Add: Ingame Server-list (select Internet, then Find Servers)
truelight
parents:
695
diff
changeset
|
104 |
_network_last_advertise_date = 0; |
68b398e2b780
(svn r1227) -Add: Ingame Server-list (select Internet, then Find Servers)
truelight
parents:
695
diff
changeset
|
105 |
#endif /* ENABLE_NETWORK */ |
0 | 106 |
} |
107 |
||
543
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
108 |
|
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
109 |
// multi os compatible sleep function |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
110 |
|
770
89dab23f04ca
(svn r1236) MorphOS: added make release like in OSX (tokai)
bjarni
parents:
764
diff
changeset
|
111 |
#ifdef __AMIGA__ |
543
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
112 |
// usleep() implementation |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
113 |
# include <devices/timer.h> |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
114 |
# include <dos/dos.h> |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
115 |
|
770
89dab23f04ca
(svn r1236) MorphOS: added make release like in OSX (tokai)
bjarni
parents:
764
diff
changeset
|
116 |
extern struct Device *TimerBase = NULL; |
89dab23f04ca
(svn r1236) MorphOS: added make release like in OSX (tokai)
bjarni
parents:
764
diff
changeset
|
117 |
extern struct MsgPort *TimerPort = NULL; |
89dab23f04ca
(svn r1236) MorphOS: added make release like in OSX (tokai)
bjarni
parents:
764
diff
changeset
|
118 |
extern struct timerequest *TimerRequest = NULL; |
543
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
119 |
#endif // __AMIGA__ |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
120 |
|
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
121 |
void CSleep(int milliseconds) |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
122 |
{ |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
123 |
#if defined(WIN32) |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
124 |
Sleep(milliseconds); |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
125 |
#endif |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
126 |
#if defined(UNIX) |
770
89dab23f04ca
(svn r1236) MorphOS: added make release like in OSX (tokai)
bjarni
parents:
764
diff
changeset
|
127 |
#if !defined(__BEOS__) && !defined(__AMIGA__) |
543
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
128 |
usleep(milliseconds * 1000); |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
129 |
#endif |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
130 |
#ifdef __BEOS__ |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
131 |
snooze(milliseconds * 1000); |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
132 |
#endif |
785
e9ca2bcc9c8f
(svn r1252) -Add: [Network] With 'set restart_game_date' you can set the date for in
truelight
parents:
770
diff
changeset
|
133 |
#if defined(__AMIGA__) |
543
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
134 |
{ |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
135 |
ULONG signals; |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
136 |
ULONG TimerSigBit = 1 << TimerPort->mp_SigBit; |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
137 |
|
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
138 |
// send IORequest |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
139 |
TimerRequest->tr_node.io_Command = TR_ADDREQUEST; |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
140 |
TimerRequest->tr_time.tv_secs = (milliseconds * 1000) / 1000000; |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
141 |
TimerRequest->tr_time.tv_micro = (milliseconds * 1000) % 1000000; |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
142 |
SendIO((struct IORequest *)TimerRequest); |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
143 |
|
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
144 |
if (!((signals = Wait(TimerSigBit | SIGBREAKF_CTRL_C)) & TimerSigBit) ) { |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
145 |
AbortIO((struct IORequest *)TimerRequest); |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
146 |
} |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
147 |
WaitIO((struct IORequest *)TimerRequest); |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
148 |
} |
785
e9ca2bcc9c8f
(svn r1252) -Add: [Network] With 'set restart_game_date' you can set the date for in
truelight
parents:
770
diff
changeset
|
149 |
#endif // __AMIGA__ |
543
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
150 |
#endif |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
151 |
} |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
152 |
|
0 | 153 |
void InitializeClearLand(); |
154 |
void InitializeRail(); |
|
155 |
void InitializeRailGui(); |
|
156 |
void InitializeRoad(); |
|
157 |
void InitializeRoadGui(); |
|
158 |
void InitializeAirportGui(); |
|
159 |
void InitializeDock(); |
|
160 |
void InitializeDockGui(); |
|
161 |
void InitializeIndustries(); |
|
162 |
void InitializeLandscape(); |
|
163 |
void InitializeTowns(); |
|
164 |
void InitializeTrees(); |
|
165 |
void InitializeStations(); |
|
410 | 166 |
static void InitializeNameMgr(); |
0 | 167 |
void InitializePlayers(); |
410 | 168 |
static void InitializeCheats(); |
0 | 169 |
|
170 |
void GenerateLandscape(); |
|
171 |
void GenerateClearTile(); |
|
172 |
||
173 |
void GenerateIndustries(); |
|
174 |
void GenerateUnmovables(); |
|
175 |
void GenerateTowns(); |
|
176 |
||
177 |
void StartupPlayers(); |
|
178 |
void StartupEngines(); |
|
179 |
void StartupDisasters(); |
|
180 |
void GenerateTrees(); |
|
181 |
||
182 |
void ConvertGroundTilesIntoWaterTiles(); |
|
183 |
||
184 |
void InitializeGame() |
|
185 |
{ |
|
842 | 186 |
// Initialize the autoreplace array. Needs to be cleared between each game |
959
b031d88c76f3
(svn r1451) Fix some of the signed/unsigned comparison warnings
tron
parents:
955
diff
changeset
|
187 |
uint i; |
880
2da0943a36c5
(svn r1365) -Fix: very, very nasty buffer overflow bug introduced with replace vehicles. You CANNOT access the i[255] of an array that only has 255 elements! I will kick the next person that does that so hard...goddammit (I only noticed it because it screwed up my console in the debug build and took me at least an hour to fix)
darkvater
parents:
865
diff
changeset
|
188 |
for (i = 0; i < lengthof(_autoreplace_array); i++) |
842 | 189 |
_autoreplace_array[i] = i; |
880
2da0943a36c5
(svn r1365) -Fix: very, very nasty buffer overflow bug introduced with replace vehicles. You CANNOT access the i[255] of an array that only has 255 elements! I will kick the next person that does that so hard...goddammit (I only noticed it because it screwed up my console in the debug build and took me at least an hour to fix)
darkvater
parents:
865
diff
changeset
|
190 |
|
842 | 191 |
AddTypeToEngines(); // make sure all engines have a type |
915 | 192 |
|
0 | 193 |
SetObjectToPlace(1, 0, 0, 0); |
194 |
||
195 |
_pause = 0; |
|
196 |
_fast_forward = 0; |
|
197 |
_tick_counter = 0; |
|
198 |
_date_fract = 0; |
|
199 |
_cur_tileloop_tile = 0; |
|
200 |
_vehicle_id_ctr_day = 0; |
|
201
c40d343115f8
(svn r202) -Codechange: I missed some files with trailing spaces.. this should be
truelight
parents:
179
diff
changeset
|
201 |
|
0 | 202 |
{ |
203 |
uint starting = ConvertIntDate(_patches.starting_date); |
|
204 |
if ( starting == (uint)-1) starting = 10958; |
|
205 |
SetDate(starting); |
|
206 |
} |
|
207 |
||
208 |
InitializeVehicles(); |
|
209 |
_backup_orders_tile = 0; |
|
210 |
||
211 |
InitNewsItemStructs(); |
|
212 |
InitializeLandscape(); |
|
213 |
InitializeClearLand(); |
|
214 |
InitializeRail(); |
|
215 |
InitializeRailGui(); |
|
216 |
InitializeRoad(); |
|
217 |
InitializeRoadGui(); |
|
218 |
InitializeAirportGui(); |
|
219 |
InitializeDock(); |
|
220 |
InitializeDockGui(); |
|
221 |
InitializeTowns(); |
|
222 |
InitializeTrees(); |
|
223 |
InitializeStations(); |
|
224 |
InitializeIndustries(); |
|
201
c40d343115f8
(svn r202) -Codechange: I missed some files with trailing spaces.. this should be
truelight
parents:
179
diff
changeset
|
225 |
|
0 | 226 |
InitializeNameMgr(); |
164
0cbdf3c9bde1
(svn r165) -Feature: Option to sort vehicles in vehicle-list window by different criteria. Total independent sort for all types and players. Periodic resort of list every 10 TTD days. Thank you for your graphical inspiration follow and buxo (since none of you provided any code).
darkvater
parents:
116
diff
changeset
|
227 |
InitializeVehiclesGuiList(); |
0 | 228 |
InitializeTrains(); |
229 |
||
230 |
InitializePlayers(); |
|
231 |
InitializeCheats(); |
|
232 |
||
233 |
InitTextEffects(); |
|
543
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
234 |
InitTextMessage(); |
0 | 235 |
InitializeAnimatedTiles(); |
236 |
||
237 |
InitializeLandscapeVariables(false); |
|
238 |
||
239 |
ResetObjectToPlace(); |
|
240 |
} |
|
241 |
||
242 |
void GenerateWorld(int mode) |
|
243 |
{ |
|
244 |
int i; |
|
245 |
||
543
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
246 |
// Make sure everything is done via OWNER_NONE |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
247 |
_current_player = OWNER_NONE; |
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
248 |
|
0 | 249 |
_generating_world = true; |
250 |
InitializeGame(); |
|
251 |
SetObjectToPlace(1, 0, 0, 0); |
|
252 |
||
253 |
// Must start economy early because of the costs. |
|
254 |
StartupEconomy(); |
|
255 |
||
256 |
// Don't generate landscape items when in the scenario editor. |
|
257 |
if (mode == 1) { |
|
258 |
// empty world in scenario editor |
|
259 |
ConvertGroundTilesIntoWaterTiles(); |
|
260 |
} else { |
|
261 |
GenerateLandscape(); |
|
262 |
GenerateClearTile(); |
|
201
c40d343115f8
(svn r202) -Codechange: I missed some files with trailing spaces.. this should be
truelight
parents:
179
diff
changeset
|
263 |
|
0 | 264 |
// only generate towns, tree and industries in newgame mode. |
265 |
if (mode == 0) { |
|
266 |
GenerateTowns(); |
|
267 |
GenerateTrees(); |
|
268 |
GenerateIndustries(); |
|
269 |
GenerateUnmovables(); |
|
270 |
} |
|
271 |
} |
|
272 |
||
201
c40d343115f8
(svn r202) -Codechange: I missed some files with trailing spaces.. this should be
truelight
parents:
179
diff
changeset
|
273 |
// These are probably pointless when inside the scenario editor. |
0 | 274 |
StartupPlayers(); |
275 |
StartupEngines(); |
|
276 |
StartupDisasters(); |
|
277 |
_generating_world = false; |
|
278 |
||
279 |
// No need to run the tile loop in the scenario editor. |
|
280 |
if (mode != 1) { |
|
281 |
for(i=0x500; i!=0; i--) |
|
282 |
RunTileLoop(); |
|
283 |
} |
|
284 |
||
285 |
ResetObjectToPlace(); |
|
286 |
} |
|
287 |
||
288 |
void DeleteName(StringID id) |
|
289 |
{ |
|
290 |
if ((id & 0xF800) == 0x7800) { |
|
291 |
memset(_name_array[id & 0x1FF], 0, sizeof(_name_array[id & 0x1FF])); |
|
292 |
} |
|
293 |
} |
|
294 |
||
295 |
byte *GetName(int id, byte *buff) |
|
296 |
{ |
|
297 |
byte *b; |
|
298 |
||
299 |
if (id & 0x600) { |
|
300 |
if (id & 0x200) { |
|
301 |
if (id & 0x400) { |
|
302 |
GetParamInt32(); |
|
303 |
GetParamUint16(); |
|
304 |
} else { |
|
305 |
GetParamUint16(); |
|
306 |
} |
|
307 |
} else { |
|
308 |
GetParamInt32(); |
|
309 |
} |
|
310 |
} |
|
311 |
||
312 |
b = _name_array[(id&~0x600)]; |
|
313 |
while ((*buff++ = *b++) != 0); |
|
314 |
||
315 |
return buff - 1; |
|
316 |
} |
|
317 |
||
318 |
||
410 | 319 |
static void InitializeCheats() |
0 | 320 |
{ |
201
c40d343115f8
(svn r202) -Codechange: I missed some files with trailing spaces.. this should be
truelight
parents:
179
diff
changeset
|
321 |
memset(&_cheats, 0, sizeof(Cheats)); |
0 | 322 |
} |
323 |
||
324 |
||
410 | 325 |
static void InitializeNameMgr() |
0 | 326 |
{ |
327 |
memset(_name_array, 0, sizeof(_name_array)); |
|
328 |
} |
|
329 |
||
543
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
330 |
StringID RealAllocateName(const byte *name, byte skip, bool check_double) |
0 | 331 |
{ |
332 |
int free_item = -1; |
|
333 |
const byte *names; |
|
334 |
byte *dst; |
|
335 |
int i; |
|
336 |
||
337 |
names = &_name_array[0][0]; |
|
338 |
||
339 |
for(i=0; i!=512; i++,names+=sizeof(_name_array[0])) { |
|
340 |
if (names[0] == 0) { |
|
341 |
if (free_item == -1) |
|
342 |
free_item = i; |
|
343 |
} else { |
|
543
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
344 |
if (check_double && str_eq(names, name)) { |
0 | 345 |
_error_message = STR_0132_CHOSEN_NAME_IN_USE_ALREADY; |
346 |
return 0; |
|
347 |
} |
|
348 |
} |
|
349 |
} |
|
350 |
||
351 |
if (free_item < 0) { |
|
352 |
_error_message = STR_0131_TOO_MANY_NAMES_DEFINED; |
|
353 |
return 0; |
|
354 |
} |
|
355 |
||
356 |
dst=_name_array[free_item]; |
|
357 |
||
358 |
for(i=0; (dst[i] = name[i]) != 0 && ++i != 32; ) {} |
|
359 |
dst[31] = 0; |
|
201
c40d343115f8
(svn r202) -Codechange: I missed some files with trailing spaces.. this should be
truelight
parents:
179
diff
changeset
|
360 |
|
0 | 361 |
return free_item | 0x7800 | (skip << 8); |
362 |
} |
|
363 |
||
364 |
||
365 |
#define M(a,b) ((a<<5)|b) |
|
366 |
static const uint16 _month_date_from_year_day[] = { |
|
367 |
M(0,1),M(0,2),M(0,3),M(0,4),M(0,5),M(0,6),M(0,7),M(0,8),M(0,9),M(0,10),M(0,11),M(0,12),M(0,13),M(0,14),M(0,15),M(0,16),M(0,17),M(0,18),M(0,19),M(0,20),M(0,21),M(0,22),M(0,23),M(0,24),M(0,25),M(0,26),M(0,27),M(0,28),M(0,29),M(0,30),M(0,31), |
|
368 |
M(1,1),M(1,2),M(1,3),M(1,4),M(1,5),M(1,6),M(1,7),M(1,8),M(1,9),M(1,10),M(1,11),M(1,12),M(1,13),M(1,14),M(1,15),M(1,16),M(1,17),M(1,18),M(1,19),M(1,20),M(1,21),M(1,22),M(1,23),M(1,24),M(1,25),M(1,26),M(1,27),M(1,28),M(1,29), |
|
369 |
M(2,1),M(2,2),M(2,3),M(2,4),M(2,5),M(2,6),M(2,7),M(2,8),M(2,9),M(2,10),M(2,11),M(2,12),M(2,13),M(2,14),M(2,15),M(2,16),M(2,17),M(2,18),M(2,19),M(2,20),M(2,21),M(2,22),M(2,23),M(2,24),M(2,25),M(2,26),M(2,27),M(2,28),M(2,29),M(2,30),M(2,31), |
|
370 |
M(3,1),M(3,2),M(3,3),M(3,4),M(3,5),M(3,6),M(3,7),M(3,8),M(3,9),M(3,10),M(3,11),M(3,12),M(3,13),M(3,14),M(3,15),M(3,16),M(3,17),M(3,18),M(3,19),M(3,20),M(3,21),M(3,22),M(3,23),M(3,24),M(3,25),M(3,26),M(3,27),M(3,28),M(3,29),M(3,30), |
|
371 |
M(4,1),M(4,2),M(4,3),M(4,4),M(4,5),M(4,6),M(4,7),M(4,8),M(4,9),M(4,10),M(4,11),M(4,12),M(4,13),M(4,14),M(4,15),M(4,16),M(4,17),M(4,18),M(4,19),M(4,20),M(4,21),M(4,22),M(4,23),M(4,24),M(4,25),M(4,26),M(4,27),M(4,28),M(4,29),M(4,30),M(4,31), |
|
372 |
M(5,1),M(5,2),M(5,3),M(5,4),M(5,5),M(5,6),M(5,7),M(5,8),M(5,9),M(5,10),M(5,11),M(5,12),M(5,13),M(5,14),M(5,15),M(5,16),M(5,17),M(5,18),M(5,19),M(5,20),M(5,21),M(5,22),M(5,23),M(5,24),M(5,25),M(5,26),M(5,27),M(5,28),M(5,29),M(5,30), |
|
373 |
M(6,1),M(6,2),M(6,3),M(6,4),M(6,5),M(6,6),M(6,7),M(6,8),M(6,9),M(6,10),M(6,11),M(6,12),M(6,13),M(6,14),M(6,15),M(6,16),M(6,17),M(6,18),M(6,19),M(6,20),M(6,21),M(6,22),M(6,23),M(6,24),M(6,25),M(6,26),M(6,27),M(6,28),M(6,29),M(6,30),M(6,31), |
|
374 |
M(7,1),M(7,2),M(7,3),M(7,4),M(7,5),M(7,6),M(7,7),M(7,8),M(7,9),M(7,10),M(7,11),M(7,12),M(7,13),M(7,14),M(7,15),M(7,16),M(7,17),M(7,18),M(7,19),M(7,20),M(7,21),M(7,22),M(7,23),M(7,24),M(7,25),M(7,26),M(7,27),M(7,28),M(7,29),M(7,30),M(7,31), |
|
375 |
M(8,1),M(8,2),M(8,3),M(8,4),M(8,5),M(8,6),M(8,7),M(8,8),M(8,9),M(8,10),M(8,11),M(8,12),M(8,13),M(8,14),M(8,15),M(8,16),M(8,17),M(8,18),M(8,19),M(8,20),M(8,21),M(8,22),M(8,23),M(8,24),M(8,25),M(8,26),M(8,27),M(8,28),M(8,29),M(8,30), |
|
376 |
M(9,1),M(9,2),M(9,3),M(9,4),M(9,5),M(9,6),M(9,7),M(9,8),M(9,9),M(9,10),M(9,11),M(9,12),M(9,13),M(9,14),M(9,15),M(9,16),M(9,17),M(9,18),M(9,19),M(9,20),M(9,21),M(9,22),M(9,23),M(9,24),M(9,25),M(9,26),M(9,27),M(9,28),M(9,29),M(9,30),M(9,31), |
|
377 |
M(10,1),M(10,2),M(10,3),M(10,4),M(10,5),M(10,6),M(10,7),M(10,8),M(10,9),M(10,10),M(10,11),M(10,12),M(10,13),M(10,14),M(10,15),M(10,16),M(10,17),M(10,18),M(10,19),M(10,20),M(10,21),M(10,22),M(10,23),M(10,24),M(10,25),M(10,26),M(10,27),M(10,28),M(10,29),M(10,30), |
|
378 |
M(11,1),M(11,2),M(11,3),M(11,4),M(11,5),M(11,6),M(11,7),M(11,8),M(11,9),M(11,10),M(11,11),M(11,12),M(11,13),M(11,14),M(11,15),M(11,16),M(11,17),M(11,18),M(11,19),M(11,20),M(11,21),M(11,22),M(11,23),M(11,24),M(11,25),M(11,26),M(11,27),M(11,28),M(11,29),M(11,30),M(11,31), |
|
379 |
}; |
|
380 |
#undef M |
|
381 |
||
382 |
enum { |
|
383 |
ACCUM_JAN = 0, |
|
384 |
ACCUM_FEB = ACCUM_JAN + 31, |
|
385 |
ACCUM_MAR = ACCUM_FEB + 29, |
|
386 |
ACCUM_APR = ACCUM_MAR + 31, |
|
387 |
ACCUM_MAY = ACCUM_APR + 30, |
|
388 |
ACCUM_JUN = ACCUM_MAY + 31, |
|
389 |
ACCUM_JUL = ACCUM_JUN + 30, |
|
390 |
ACCUM_AUG = ACCUM_JUL + 31, |
|
391 |
ACCUM_SEP = ACCUM_AUG + 31, |
|
392 |
ACCUM_OCT = ACCUM_SEP + 30, |
|
393 |
ACCUM_NOV = ACCUM_OCT + 31, |
|
394 |
ACCUM_DEC = ACCUM_NOV + 30, |
|
395 |
}; |
|
396 |
||
397 |
static const uint16 _accum_days_for_month[] = { |
|
398 |
ACCUM_JAN,ACCUM_FEB,ACCUM_MAR,ACCUM_APR, |
|
399 |
ACCUM_MAY,ACCUM_JUN,ACCUM_JUL,ACCUM_AUG, |
|
400 |
ACCUM_SEP,ACCUM_OCT,ACCUM_NOV,ACCUM_DEC, |
|
401 |
}; |
|
402 |
||
403 |
||
404 |
void ConvertDayToYMD(YearMonthDay *ymd, uint16 date) |
|
405 |
{ |
|
406 |
uint yr = date / (365+365+365+366); |
|
407 |
uint rem = date % (365+365+365+366); |
|
408 |
uint x; |
|
409 |
||
410 |
yr *= 4; |
|
411 |
||
412 |
if (rem >= 366) { |
|
413 |
rem--; |
|
414 |
do { |
|
415 |
rem -= 365; |
|
416 |
yr++; |
|
417 |
} while (rem >= 365); |
|
418 |
if (rem >= 31+28) rem++; |
|
419 |
} |
|
420 |
||
421 |
ymd->year = yr; |
|
201
c40d343115f8
(svn r202) -Codechange: I missed some files with trailing spaces.. this should be
truelight
parents:
179
diff
changeset
|
422 |
|
0 | 423 |
x = _month_date_from_year_day[rem]; |
424 |
ymd->month = x >> 5; |
|
425 |
ymd->day = x & 0x1F; |
|
426 |
} |
|
427 |
||
428 |
// year is a number between 0..? |
|
429 |
// month is a number between 0..11 |
|
430 |
// day is a number between 1..31 |
|
431 |
uint ConvertYMDToDay(uint year, uint month, uint day) |
|
432 |
{ |
|
433 |
uint rem; |
|
201
c40d343115f8
(svn r202) -Codechange: I missed some files with trailing spaces.. this should be
truelight
parents:
179
diff
changeset
|
434 |
|
0 | 435 |
// day in the year |
436 |
rem = _accum_days_for_month[month] + day - 1; |
|
437 |
||
438 |
// remove feb 29 from year 1,2,3 |
|
439 |
if (year & 3) rem += (year & 3) * 365 + (rem < 31+29); |
|
440 |
||
441 |
// base date. |
|
442 |
return (year >> 2) * (365+365+365+366) + rem; |
|
443 |
} |
|
444 |
||
445 |
// convert a date on the form |
|
970
492ca84ecc6c
(svn r1465) -Fix: [1099101] starting year patch goes out of range. Clamped year between 1920-2090 as wel as adding defines for it.
darkvater
parents:
959
diff
changeset
|
446 |
// 1920 - 2090 (MAX_YEAR_END_REAL) |
0 | 447 |
// 192001 - 209012 |
448 |
// 19200101 - 20901231 |
|
449 |
// or if > 2090 and below 65536, treat it as a daycount |
|
450 |
// returns -1 if no conversion was possible |
|
451 |
uint ConvertIntDate(uint date) |
|
452 |
{ |
|
453 |
uint year, month = 0, day = 1; |
|
454 |
||
970
492ca84ecc6c
(svn r1465) -Fix: [1099101] starting year patch goes out of range. Clamped year between 1920-2090 as wel as adding defines for it.
darkvater
parents:
959
diff
changeset
|
455 |
if (IS_INT_INSIDE(date, 1920, MAX_YEAR_END_REAL + 1)) { |
0 | 456 |
year = date - 1920; |
457 |
} else if (IS_INT_INSIDE(date, 192001, 209012+1)) { |
|
201
c40d343115f8
(svn r202) -Codechange: I missed some files with trailing spaces.. this should be
truelight
parents:
179
diff
changeset
|
458 |
month = date % 100 - 1; |
0 | 459 |
year = date / 100 - 1920; |
460 |
} else if (IS_INT_INSIDE(date, 19200101, 20901231+1)) { |
|
461 |
day = date % 100; date /= 100; |
|
201
c40d343115f8
(svn r202) -Codechange: I missed some files with trailing spaces.. this should be
truelight
parents:
179
diff
changeset
|
462 |
month = date % 100 - 1; |
0 | 463 |
year = date / 100 - 1920; |
464 |
} else if (IS_INT_INSIDE(date, 2091, 65536)) |
|
465 |
return date; |
|
466 |
else |
|
467 |
return (uint)-1; |
|
468 |
||
469 |
// invalid ranges? |
|
470 |
if (month >= 12 || !IS_INT_INSIDE(day, 1, 31+1)) return (uint)-1; |
|
471 |
||
472 |
return ConvertYMDToDay(year, month, day); |
|
473 |
} |
|
474 |
||
475 |
typedef struct LandscapePredefVar { |
|
476 |
StringID names[NUM_CARGO]; |
|
477 |
byte weights[NUM_CARGO]; |
|
478 |
StringID sprites[NUM_CARGO]; |
|
479 |
||
480 |
uint16 initial_cargo_payment[NUM_CARGO]; |
|
481 |
byte transit_days_table_1[NUM_CARGO]; |
|
482 |
byte transit_days_table_2[NUM_CARGO]; |
|
483 |
||
484 |
byte railwagon_by_cargo[3][NUM_CARGO]; |
|
485 |
||
486 |
byte road_veh_by_cargo_start[NUM_CARGO]; |
|
487 |
byte road_veh_by_cargo_count[NUM_CARGO]; |
|
488 |
} LandscapePredefVar; |
|
489 |
||
490 |
#include "table/landscape_const.h" |
|
491 |
||
492 |
||
493 |
// Calculate constants that depend on the landscape type. |
|
494 |
void InitializeLandscapeVariables(bool only_constants) |
|
495 |
{ |
|
496 |
const LandscapePredefVar *lpd; |
|
497 |
int i; |
|
498 |
StringID str; |
|
499 |
||
500 |
lpd = &_landscape_predef_var[_opt.landscape]; |
|
501 |
||
502 |
memcpy(_cargoc.ai_railwagon, lpd->railwagon_by_cargo, sizeof(lpd->railwagon_by_cargo)); |
|
503 |
memcpy(_cargoc.ai_roadveh_start, lpd->road_veh_by_cargo_start,sizeof(lpd->road_veh_by_cargo_start)); |
|
504 |
memcpy(_cargoc.ai_roadveh_count, lpd->road_veh_by_cargo_count,sizeof(lpd->road_veh_by_cargo_count)); |
|
505 |
||
506 |
for(i=0; i!=NUM_CARGO; i++) { |
|
507 |
_cargoc.sprites[i] = lpd->sprites[i]; |
|
201
c40d343115f8
(svn r202) -Codechange: I missed some files with trailing spaces.. this should be
truelight
parents:
179
diff
changeset
|
508 |
|
0 | 509 |
str = lpd->names[i]; |
510 |
_cargoc.names_s[i] = str; |
|
511 |
_cargoc.names_p[i] = (str += 0x20); |
|
512 |
_cargoc.names_long_s[i] = (str += 0x20); |
|
513 |
_cargoc.names_long_p[i] = (str += 0x20); |
|
514 |
_cargoc.names_short[i] = (str += 0x20); |
|
515 |
_cargoc.weights[i] = lpd->weights[i]; |
|
201
c40d343115f8
(svn r202) -Codechange: I missed some files with trailing spaces.. this should be
truelight
parents:
179
diff
changeset
|
516 |
|
0 | 517 |
if (!only_constants) { |
518 |
_cargo_payment_rates[i] = lpd->initial_cargo_payment[i]; |
|
519 |
_cargo_payment_rates_frac[i] = 0; |
|
520 |
} |
|
521 |
||
522 |
_cargoc.transit_days_1[i] = lpd->transit_days_table_1[i]; |
|
523 |
_cargoc.transit_days_2[i] = lpd->transit_days_table_2[i]; |
|
524 |
} |
|
525 |
} |
|
526 |
||
527 |
// distance in Manhattan metric |
|
528 |
uint GetTileDist(TileIndex xy1, TileIndex xy2) |
|
529 |
{ |
|
926
bd4312619522
(svn r1414) Move TileIndex, TILE_MASK and GET_TILE_[XY] to map.h and turn the latter into inline functions names Tile[XY]
tron
parents:
919
diff
changeset
|
530 |
return myabs(TileX(xy1) - TileX(xy2)) + |
bd4312619522
(svn r1414) Move TileIndex, TILE_MASK and GET_TILE_[XY] to map.h and turn the latter into inline functions names Tile[XY]
tron
parents:
919
diff
changeset
|
531 |
myabs(TileY(xy1) - TileY(xy2)); |
0 | 532 |
} |
533 |
||
534 |
// maximum distance in x _or_ y |
|
535 |
uint GetTileDist1D(TileIndex xy1, TileIndex xy2) |
|
536 |
{ |
|
926
bd4312619522
(svn r1414) Move TileIndex, TILE_MASK and GET_TILE_[XY] to map.h and turn the latter into inline functions names Tile[XY]
tron
parents:
919
diff
changeset
|
537 |
return max(myabs(TileX(xy1) - TileX(xy2)), |
bd4312619522
(svn r1414) Move TileIndex, TILE_MASK and GET_TILE_[XY] to map.h and turn the latter into inline functions names Tile[XY]
tron
parents:
919
diff
changeset
|
538 |
myabs(TileY(xy1) - TileY(xy2))); |
0 | 539 |
} |
540 |
||
541 |
uint GetTileDist1Db(TileIndex xy1, TileIndex xy2) |
|
542 |
{ |
|
926
bd4312619522
(svn r1414) Move TileIndex, TILE_MASK and GET_TILE_[XY] to map.h and turn the latter into inline functions names Tile[XY]
tron
parents:
919
diff
changeset
|
543 |
int a = myabs(TileX(xy1) - TileX(xy2)); |
bd4312619522
(svn r1414) Move TileIndex, TILE_MASK and GET_TILE_[XY] to map.h and turn the latter into inline functions names Tile[XY]
tron
parents:
919
diff
changeset
|
544 |
int b = myabs(TileY(xy1) - TileY(xy2)); |
0 | 545 |
|
546 |
if (a > b) |
|
547 |
return a*2+b; |
|
548 |
else |
|
549 |
return b*2+a; |
|
550 |
} |
|
551 |
||
552 |
uint GetTileDistAdv(TileIndex xy1, TileIndex xy2) |
|
553 |
{ |
|
926
bd4312619522
(svn r1414) Move TileIndex, TILE_MASK and GET_TILE_[XY] to map.h and turn the latter into inline functions names Tile[XY]
tron
parents:
919
diff
changeset
|
554 |
uint a = myabs(TileX(xy1) - TileX(xy2)); |
bd4312619522
(svn r1414) Move TileIndex, TILE_MASK and GET_TILE_[XY] to map.h and turn the latter into inline functions names Tile[XY]
tron
parents:
919
diff
changeset
|
555 |
uint b = myabs(TileY(xy1) - TileY(xy2)); |
0 | 556 |
return a*a+b*b; |
557 |
} |
|
558 |
||
559 |
bool CheckDistanceFromEdge(TileIndex tile, uint distance) |
|
560 |
{ |
|
926
bd4312619522
(svn r1414) Move TileIndex, TILE_MASK and GET_TILE_[XY] to map.h and turn the latter into inline functions names Tile[XY]
tron
parents:
919
diff
changeset
|
561 |
return IS_INT_INSIDE(TileX(tile), distance, MapSizeX() - distance) && |
bd4312619522
(svn r1414) Move TileIndex, TILE_MASK and GET_TILE_[XY] to map.h and turn the latter into inline functions names Tile[XY]
tron
parents:
919
diff
changeset
|
562 |
IS_INT_INSIDE(TileY(tile), distance, MapSizeY() - distance); |
0 | 563 |
} |
564 |
||
565 |
void OnNewDay_Train(Vehicle *v); |
|
566 |
void OnNewDay_RoadVeh(Vehicle *v); |
|
567 |
void OnNewDay_Aircraft(Vehicle *v); |
|
568 |
void OnNewDay_Ship(Vehicle *v); |
|
569 |
void OnNewDay_EffectVehicle(Vehicle *v) { /* empty */ } |
|
570 |
void OnNewDay_DisasterVehicle(Vehicle *v); |
|
571 |
||
572 |
typedef void OnNewVehicleDayProc(Vehicle *v); |
|
573 |
||
574 |
static OnNewVehicleDayProc * _on_new_vehicle_day_proc[] = { |
|
575 |
OnNewDay_Train, |
|
576 |
OnNewDay_RoadVeh, |
|
577 |
OnNewDay_Ship, |
|
578 |
OnNewDay_Aircraft, |
|
579 |
OnNewDay_EffectVehicle, |
|
580 |
OnNewDay_DisasterVehicle, |
|
581 |
}; |
|
582 |
||
583 |
void EnginesDailyLoop(); |
|
584 |
void DisasterDailyLoop(); |
|
585 |
void PlayersMonthlyLoop(); |
|
586 |
void EnginesMonthlyLoop(); |
|
587 |
void TownsMonthlyLoop(); |
|
588 |
void IndustryMonthlyLoop(); |
|
589 |
void StationMonthlyLoop(); |
|
590 |
||
591 |
void PlayersYearlyLoop(); |
|
592 |
void TrainsYearlyLoop(); |
|
593 |
void RoadVehiclesYearlyLoop(); |
|
594 |
void AircraftYearlyLoop(); |
|
595 |
void ShipsYearlyLoop(); |
|
596 |
||
395
4c990f33dab7
(svn r587) -newgrf: Rename all /Checkpoint/i tokens to 'Waypoint's. The name actually makes some sense and is also compatible with TTDPatch (pasky).
darkvater
parents:
387
diff
changeset
|
597 |
void WaypointsDailyLoop(); |
0 | 598 |
|
599 |
||
600 |
static const uint16 _autosave_months[] = { |
|
601 |
0, // never |
|
602 |
0xFFF, // every month |
|
603 |
0x249, // every 3 months |
|
604 |
0x041, // every 6 months |
|
605 |
0x001, // every 12 months |
|
606 |
}; |
|
607 |
||
608 |
void IncreaseDate() |
|
609 |
{ |
|
919
b0d6c7642f99
(svn r1407) -Codechange: changed a lot around _stations, _vehicles, _towns and _industries
truelight
parents:
915
diff
changeset
|
610 |
const int vehicles_per_day = (1 << (sizeof(_date_fract) * 8)) / 885; |
959
b031d88c76f3
(svn r1451) Fix some of the signed/unsigned comparison warnings
tron
parents:
955
diff
changeset
|
611 |
uint i; |
b031d88c76f3
(svn r1451) Fix some of the signed/unsigned comparison warnings
tron
parents:
955
diff
changeset
|
612 |
VehicleID ctr; |
b031d88c76f3
(svn r1451) Fix some of the signed/unsigned comparison warnings
tron
parents:
955
diff
changeset
|
613 |
int t; |
0 | 614 |
YearMonthDay ymd; |
615 |
||
616 |
if (_game_mode == GM_MENU) { |
|
617 |
_tick_counter++; |
|
618 |
return; |
|
619 |
} |
|
620 |
||
621 |
/*if the day changed, call the vehicle event but only update a part of the vehicles |
|
622 |
old max was i!= 12. But with that and a bigger number of vehicles (2560), per day only |
|
623 |
a part of it could be done, namely: function called max_size date_fract (uint16) / 885 x 12 ==> |
|
624 |
65536 / 885 = 74; 74x12 = 888. So max 888. Any vehicles above that were not _on_new_vehicle_day_proc'd |
|
625 |
eg. aged. |
|
626 |
So new code updates it for max vehicles. |
|
919
b0d6c7642f99
(svn r1407) -Codechange: changed a lot around _stations, _vehicles, _towns and _industries
truelight
parents:
915
diff
changeset
|
627 |
(_vehicles_size / maximum number of times ctr is incremented before reset ) + 1 (to get last vehicles too) |
0 | 628 |
max size of _date_fract / 885 (added each tick) is number of times before ctr is reset. |
629 |
Calculation might look complicated, but compiler just replaces it with 35, so that's ok |
|
630 |
*/ |
|
631 |
||
632 |
ctr = _vehicle_id_ctr_day; |
|
919
b0d6c7642f99
(svn r1407) -Codechange: changed a lot around _stations, _vehicles, _towns and _industries
truelight
parents:
915
diff
changeset
|
633 |
for (i = 0; i != (_vehicles_size / vehicles_per_day) + 1 && ctr != _vehicles_size; i++) { |
b0d6c7642f99
(svn r1407) -Codechange: changed a lot around _stations, _vehicles, _towns and _industries
truelight
parents:
915
diff
changeset
|
634 |
Vehicle *v = GetVehicle(ctr++); |
b0d6c7642f99
(svn r1407) -Codechange: changed a lot around _stations, _vehicles, _towns and _industries
truelight
parents:
915
diff
changeset
|
635 |
if ((t = v->type) != 0) |
0 | 636 |
_on_new_vehicle_day_proc[t - 0x10](v); |
637 |
} |
|
638 |
_vehicle_id_ctr_day = ctr; |
|
639 |
||
640 |
/* increase day, and check if a new day is there? */ |
|
641 |
_tick_counter++; |
|
201
c40d343115f8
(svn r202) -Codechange: I missed some files with trailing spaces.. this should be
truelight
parents:
179
diff
changeset
|
642 |
|
919
b0d6c7642f99
(svn r1407) -Codechange: changed a lot around _stations, _vehicles, _towns and _industries
truelight
parents:
915
diff
changeset
|
643 |
_date_fract += 885; |
b0d6c7642f99
(svn r1407) -Codechange: changed a lot around _stations, _vehicles, _towns and _industries
truelight
parents:
915
diff
changeset
|
644 |
if (_date_fract >= 885) |
0 | 645 |
return; |
646 |
||
647 |
/* yeah, increse day counter and call various daily loops */ |
|
648 |
_date++; |
|
649 |
||
543
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
650 |
_vehicle_id_ctr_day = 0; |
105 | 651 |
|
543
e3b43338096b
(svn r942) -Merged branch/network back into the trunk
truelight
parents:
507
diff
changeset
|
652 |
TextMessageDailyLoop(); |
0 | 653 |
|
654 |
DisasterDailyLoop(); |
|
395
4c990f33dab7
(svn r587) -newgrf: Rename all /Checkpoint/i tokens to 'Waypoint's. The name actually makes some sense and is also compatible with TTDPatch (pasky).
darkvater
parents:
387
diff
changeset
|
655 |
WaypointsDailyLoop(); |
0 | 656 |
|
657 |
if (_game_mode != GM_MENU) { |
|
658 |
InvalidateWindowWidget(WC_STATUS_BAR, 0, 0); |
|
659 |
EnginesDailyLoop(); |
|
660 |
} |
|
661 |
||
662 |
/* check if we entered a new month? */ |
|
663 |
ConvertDayToYMD(&ymd, _date); |
|
664 |
if ((byte)ymd.month == _cur_month) |
|
665 |
return; |
|
666 |
_cur_month = ymd.month; |
|
667 |
||
668 |
/* yes, call various monthly loops */ |
|
669 |
if (_game_mode != GM_MENU) { |
|
670 |
if (HASBIT(_autosave_months[_opt.autosave], _cur_month)) { |
|
671 |
_do_autosave = true; |
|
672 |
RedrawAutosave(); |
|
673 |
} |
|
674 |
||
675 |
PlayersMonthlyLoop(); |
|
676 |
EnginesMonthlyLoop(); |
|
677 |
TownsMonthlyLoop(); |
|
678 |
IndustryMonthlyLoop(); |
|
679 |
StationMonthlyLoop(); |
|
690
9f449a6b133e
(svn r1131) -Add: [Network] Autoclean_companies (set it with 'set autoclean_companies on/off').
truelight
parents:
679
diff
changeset
|
680 |
#ifdef ENABLE_NETWORK |
9f449a6b133e
(svn r1131) -Add: [Network] Autoclean_companies (set it with 'set autoclean_companies on/off').
truelight
parents:
679
diff
changeset
|
681 |
if (_network_server) |
9f449a6b133e
(svn r1131) -Add: [Network] Autoclean_companies (set it with 'set autoclean_companies on/off').
truelight
parents:
679
diff
changeset
|
682 |
NetworkServerMonthlyLoop(); |
9f449a6b133e
(svn r1131) -Add: [Network] Autoclean_companies (set it with 'set autoclean_companies on/off').
truelight
parents:
679
diff
changeset
|
683 |
#endif /* ENABLE_NETWORK */ |
0 | 684 |
} |
685 |
||
686 |
/* check if we entered a new year? */ |
|
687 |
if ((byte)ymd.year == _cur_year) |
|
688 |
return; |
|
689 |
_cur_year = ymd.year; |
|
690 |
||
201
c40d343115f8
(svn r202) -Codechange: I missed some files with trailing spaces.. this should be
truelight
parents:
179
diff
changeset
|
691 |
/* yes, call various yearly loops */ |
0 | 692 |
|
693 |
PlayersYearlyLoop(); |
|
694 |
TrainsYearlyLoop(); |
|
695 |
RoadVehiclesYearlyLoop(); |
|
696 |
AircraftYearlyLoop(); |
|
697 |
ShipsYearlyLoop(); |
|
785
e9ca2bcc9c8f
(svn r1252) -Add: [Network] With 'set restart_game_date' you can set the date for in
truelight
parents:
770
diff
changeset
|
698 |
#ifdef ENABLE_NETWORK |
e9ca2bcc9c8f
(svn r1252) -Add: [Network] With 'set restart_game_date' you can set the date for in
truelight
parents:
770
diff
changeset
|
699 |
if (_network_server) |
e9ca2bcc9c8f
(svn r1252) -Add: [Network] With 'set restart_game_date' you can set the date for in
truelight
parents:
770
diff
changeset
|
700 |
NetworkServerYearlyLoop(); |
e9ca2bcc9c8f
(svn r1252) -Add: [Network] With 'set restart_game_date' you can set the date for in
truelight
parents:
770
diff
changeset
|
701 |
#endif /* ENABLE_NETWORK */ |
0 | 702 |
|
983
1be852dcdd4c
(svn r1479) -Added highscore chart (accessible from the difficulty window) with top5 companies for a given difficulty (select the difficulty in the menu)
darkvater
parents:
970
diff
changeset
|
703 |
/* check if we reached 2090, that's the maximum year. */ |
1be852dcdd4c
(svn r1479) -Added highscore chart (accessible from the difficulty window) with top5 companies for a given difficulty (select the difficulty in the menu)
darkvater
parents:
970
diff
changeset
|
704 |
if (_cur_year == 131) { // end of game on 31 dec 2050 |
1be852dcdd4c
(svn r1479) -Added highscore chart (accessible from the difficulty window) with top5 companies for a given difficulty (select the difficulty in the menu)
darkvater
parents:
970
diff
changeset
|
705 |
ShowEndGameChart(); |
970
492ca84ecc6c
(svn r1465) -Fix: [1099101] starting year patch goes out of range. Clamped year between 1920-2090 as wel as adding defines for it.
darkvater
parents:
959
diff
changeset
|
706 |
/* check if we reached 2090 (MAX_YEAR_END_REAL), that's the maximum year. */ |
983
1be852dcdd4c
(svn r1479) -Added highscore chart (accessible from the difficulty window) with top5 companies for a given difficulty (select the difficulty in the menu)
darkvater
parents:
970
diff
changeset
|
707 |
} else if (_cur_year == (MAX_YEAR_END + 1)) { |
286
03a46430df87
(svn r292) -Fix: [1030275] 'Service at' orders ignored after 2090. After 2090 year is reset to 1. Jan 2090, so most of the time, last service was in the future and no service ensured.
darkvater
parents:
271
diff
changeset
|
708 |
Vehicle *v; |
970
492ca84ecc6c
(svn r1465) -Fix: [1099101] starting year patch goes out of range. Clamped year between 1920-2090 as wel as adding defines for it.
darkvater
parents:
959
diff
changeset
|
709 |
_cur_year = MAX_YEAR_END; |
0 | 710 |
_date = 62093; |
286
03a46430df87
(svn r292) -Fix: [1030275] 'Service at' orders ignored after 2090. After 2090 year is reset to 1. Jan 2090, so most of the time, last service was in the future and no service ensured.
darkvater
parents:
271
diff
changeset
|
711 |
FOR_ALL_VEHICLES(v) { |
03a46430df87
(svn r292) -Fix: [1030275] 'Service at' orders ignored after 2090. After 2090 year is reset to 1. Jan 2090, so most of the time, last service was in the future and no service ensured.
darkvater
parents:
271
diff
changeset
|
712 |
v->date_of_last_service -= 365; // 1 year is 365 days long |
03a46430df87
(svn r292) -Fix: [1030275] 'Service at' orders ignored after 2090. After 2090 year is reset to 1. Jan 2090, so most of the time, last service was in the future and no service ensured.
darkvater
parents:
271
diff
changeset
|
713 |
} |
0 | 714 |
} |
715 |
||
716 |
if (_patches.auto_euro) |
|
717 |
CheckSwitchToEuro(); |
|
718 |
||
719 |
/* XXX: check if year 2050 was reached */ |
|
720 |
} |
|
721 |
||
116
ca4332a9ec1d
(svn r117) Feature: Performance details window in company league menu (TrueLight)
dominik
parents:
105
diff
changeset
|
722 |
int FindFirstBit(uint32 value) |
0 | 723 |
{ |
826 | 724 |
// This is much faster than the one that was before here. |
116
ca4332a9ec1d
(svn r117) Feature: Performance details window in company league menu (TrueLight)
dominik
parents:
105
diff
changeset
|
725 |
// Created by Darkvater.. blame him if it is wrong ;) |
ca4332a9ec1d
(svn r117) Feature: Performance details window in company league menu (TrueLight)
dominik
parents:
105
diff
changeset
|
726 |
// Btw, the macro FINDFIRSTBIT is better to use when your value is |
826 | 727 |
// not more than 128. |
116
ca4332a9ec1d
(svn r117) Feature: Performance details window in company league menu (TrueLight)
dominik
parents:
105
diff
changeset
|
728 |
byte i = 0; |
ca4332a9ec1d
(svn r117) Feature: Performance details window in company league menu (TrueLight)
dominik
parents:
105
diff
changeset
|
729 |
if (value & 0xffff0000) { value >>= 16; i += 16; } |
ca4332a9ec1d
(svn r117) Feature: Performance details window in company league menu (TrueLight)
dominik
parents:
105
diff
changeset
|
730 |
if (value & 0x0000ff00) { value >>= 8; i += 8; } |
ca4332a9ec1d
(svn r117) Feature: Performance details window in company league menu (TrueLight)
dominik
parents:
105
diff
changeset
|
731 |
if (value & 0x000000f0) { value >>= 4; i += 4; } |
ca4332a9ec1d
(svn r117) Feature: Performance details window in company league menu (TrueLight)
dominik
parents:
105
diff
changeset
|
732 |
if (value & 0x0000000c) { value >>= 2; i += 2; } |
ca4332a9ec1d
(svn r117) Feature: Performance details window in company league menu (TrueLight)
dominik
parents:
105
diff
changeset
|
733 |
if (value & 0x00000002) { i += 1; } |
0 | 734 |
return i; |
735 |
} |
|
736 |
||
737 |
||
738 |
static void Save_NAME() |
|
739 |
{ |
|
740 |
int i; |
|
741 |
byte *b = _name_array[0]; |
|
742 |
||
743 |
for(i=0; i!=lengthof(_name_array); i++,b+=sizeof(_name_array[0])) { |
|
744 |
if (*b) { |
|
745 |
SlSetArrayIndex(i); |
|
746 |
SlArray(b, strlen(b), SLE_UINT8); |
|
201
c40d343115f8
(svn r202) -Codechange: I missed some files with trailing spaces.. this should be
truelight
parents:
179
diff
changeset
|
747 |
} |
0 | 748 |
} |
749 |
} |
|
750 |
||
751 |
static void Load_NAME() |
|
752 |
{ |
|
753 |
int index; |
|
201
c40d343115f8
(svn r202) -Codechange: I missed some files with trailing spaces.. this should be
truelight
parents:
179
diff
changeset
|
754 |
|
0 | 755 |
while ((index = SlIterateArray()) != -1) { |
756 |
SlArray(_name_array[index],SlGetFieldLength(),SLE_UINT8); |
|
757 |
} |
|
758 |
} |
|
759 |
||
760 |
static const byte _game_opt_desc[] = { |
|
761 |
// added a new difficulty option (town attitude) in version 4 |
|
762 |
SLE_CONDARR(GameOptions,diff, SLE_FILE_I16 | SLE_VAR_I32, 17, 0, 3), |
|
763 |
SLE_CONDARR(GameOptions,diff, SLE_FILE_I16 | SLE_VAR_I32, 18, 4, 255), |
|
764 |
SLE_VAR(GameOptions,diff_level, SLE_UINT8), |
|
765 |
SLE_VAR(GameOptions,currency, SLE_UINT8), |
|
766 |
SLE_VAR(GameOptions,kilometers, SLE_UINT8), |
|
767 |
SLE_VAR(GameOptions,town_name, SLE_UINT8), |
|
768 |
SLE_VAR(GameOptions,landscape, SLE_UINT8), |
|
769 |
SLE_VAR(GameOptions,snow_line, SLE_UINT8), |
|
770 |
SLE_VAR(GameOptions,autosave, SLE_UINT8), |
|
771 |
SLE_VAR(GameOptions,road_side, SLE_UINT8), |
|
772 |
SLE_END() |
|
773 |
}; |
|
774 |
||
775 |
// Save load game options |
|
776 |
static void SaveLoad_OPTS() |
|
777 |
{ |
|
201
c40d343115f8
(svn r202) -Codechange: I missed some files with trailing spaces.. this should be
truelight
parents:
179
diff
changeset
|
778 |
SlObject(&_opt, _game_opt_desc); |
0 | 779 |
} |
780 |
||
781 |
||
782 |
static const SaveLoadGlobVarList _date_desc[] = { |
|
783 |
{&_date, SLE_UINT16, 0, 255}, |
|
784 |
{&_date_fract, SLE_UINT16, 0, 255}, |
|
785 |
{&_tick_counter, SLE_UINT16, 0, 255}, |
|
786 |
{&_vehicle_id_ctr_day, SLE_UINT16, 0, 255}, |
|
787 |
{&_age_cargo_skip_counter, SLE_UINT8, 0, 255}, |
|
788 |
{&_avail_aircraft, SLE_UINT8, 0, 255}, |
|
789 |
{&_cur_tileloop_tile, SLE_UINT16, 0, 255}, |
|
790 |
{&_disaster_delay, SLE_UINT16, 0, 255}, |
|
791 |
{&_station_tick_ctr, SLE_UINT16, 0, 255}, |
|
206 | 792 |
{&_random_seeds[0][0], SLE_UINT32, 0, 255}, |
793 |
{&_random_seeds[0][1], SLE_UINT32, 0, 255}, |
|
0 | 794 |
{&_cur_town_ctr, SLE_UINT8, 0, 255}, |
795 |
{&_cur_player_tick_index, SLE_FILE_U8 | SLE_VAR_UINT, 0, 255}, |
|
796 |
{&_next_competitor_start, SLE_FILE_U16 | SLE_VAR_UINT, 0, 255}, |
|
797 |
{&_trees_tick_ctr, SLE_UINT8, 0, 255}, |
|
798 |
{&_pause, SLE_UINT8, 4, 255}, |
|
179
003096efeb9d
(svn r180) -Fix: some more warning fixes for C99 (Tron)
darkvater
parents:
164
diff
changeset
|
799 |
{NULL, 0, 0, 0} |
0 | 800 |
}; |
801 |
||
802 |
// Save load date related variables as well as persistent tick counters |
|
803 |
// XXX: currently some unrelated stuff is just put here |
|
804 |
static void SaveLoad_DATE() |
|
805 |
{ |
|
806 |
SlGlobList(_date_desc); |
|
807 |
} |
|
808 |
||
809 |
||
810 |
static const SaveLoadGlobVarList _view_desc[] = { |
|
179
003096efeb9d
(svn r180) -Fix: some more warning fixes for C99 (Tron)
darkvater
parents:
164
diff
changeset
|
811 |
{&_saved_scrollpos_x, SLE_FILE_I16 | SLE_VAR_INT, 0, 255}, |
003096efeb9d
(svn r180) -Fix: some more warning fixes for C99 (Tron)
darkvater
parents:
164
diff
changeset
|
812 |
{&_saved_scrollpos_y, SLE_FILE_I16 | SLE_VAR_INT, 0, 255}, |
003096efeb9d
(svn r180) -Fix: some more warning fixes for C99 (Tron)
darkvater
parents:
164
diff
changeset
|
813 |
{&_saved_scrollpos_zoom, SLE_UINT8, 0, 255}, |
003096efeb9d
(svn r180) -Fix: some more warning fixes for C99 (Tron)
darkvater
parents:
164
diff
changeset
|
814 |
{NULL, 0, 0, 0} |
0 | 815 |
}; |
816 |
||
817 |
static void SaveLoad_VIEW() |
|
818 |
{ |
|
819 |
SlGlobList(_view_desc); |
|
820 |
} |
|
821 |
||
822 |
static void SaveLoad_MAPT() { |
|
695
561b806c0477
(svn r1144) Don't rely on sizeof() to determine the map size, use MapSize() instead
tron
parents:
690
diff
changeset
|
823 |
SlArray(_map_type_and_height, MapSize(), SLE_UINT8); |
0 | 824 |
} |
825 |
||
826 |
static void SaveLoad_MAP2() { |
|
817
4f9377b7fd2b
(svn r1288) -Codechange: changed _map2 to an uint16. It is still saved and loaded as
truelight
parents:
785
diff
changeset
|
827 |
if (_sl.version < 5) { |
4f9377b7fd2b
(svn r1288) -Codechange: changed _map2 to an uint16. It is still saved and loaded as
truelight
parents:
785
diff
changeset
|
828 |
/* In those versions the _map2 was 8 bits */ |
4f9377b7fd2b
(svn r1288) -Codechange: changed _map2 to an uint16. It is still saved and loaded as
truelight
parents:
785
diff
changeset
|
829 |
SlArray(_map2, MapSize(), SLE_FILE_U8 | SLE_VAR_U16); |
4f9377b7fd2b
(svn r1288) -Codechange: changed _map2 to an uint16. It is still saved and loaded as
truelight
parents:
785
diff
changeset
|
830 |
} else { |
4f9377b7fd2b
(svn r1288) -Codechange: changed _map2 to an uint16. It is still saved and loaded as
truelight
parents:
785
diff
changeset
|
831 |
SlArray(_map2, MapSize(), SLE_UINT16); |
4f9377b7fd2b
(svn r1288) -Codechange: changed _map2 to an uint16. It is still saved and loaded as
truelight
parents:
785
diff
changeset
|
832 |
} |
0 | 833 |
} |
834 |
||
835 |
static void SaveLoad_M3LO() { |
|
695
561b806c0477
(svn r1144) Don't rely on sizeof() to determine the map size, use MapSize() instead
tron
parents:
690
diff
changeset
|
836 |
SlArray(_map3_lo, MapSize(), SLE_UINT8); |
0 | 837 |
} |
838 |
||
839 |
static void SaveLoad_M3HI() { |
|
695
561b806c0477
(svn r1144) Don't rely on sizeof() to determine the map size, use MapSize() instead
tron
parents:
690
diff
changeset
|
840 |
SlArray(_map3_hi, MapSize(), SLE_UINT8); |
0 | 841 |
} |
842 |
||
843 |
static void SaveLoad_MAPO() { |
|
695
561b806c0477
(svn r1144) Don't rely on sizeof() to determine the map size, use MapSize() instead
tron
parents:
690
diff
changeset
|
844 |
SlArray(_map_owner, MapSize(), SLE_UINT8); |
0 | 845 |
} |
846 |
||
847 |
static void SaveLoad_MAP5() { |
|
695
561b806c0477
(svn r1144) Don't rely on sizeof() to determine the map size, use MapSize() instead
tron
parents:
690
diff
changeset
|
848 |
SlArray(_map5, MapSize(), SLE_UINT8); |
0 | 849 |
} |
850 |
||
851 |
static void SaveLoad_MAPE() { |
|
695
561b806c0477
(svn r1144) Don't rely on sizeof() to determine the map size, use MapSize() instead
tron
parents:
690
diff
changeset
|
852 |
SlArray(_map_extra_bits, MapSize() / 4, SLE_UINT8); |
0 | 853 |
} |
854 |
||
855 |
||
856 |
static void Save_CHTS() |
|
857 |
{ |
|
858 |
byte count = sizeof(_cheats)/sizeof(Cheat); |
|
859 |
Cheat* cht = (Cheat*) &_cheats; |
|
860 |
Cheat* cht_last = &cht[count]; |
|
861 |
||
862 |
SlSetLength(count*2); |
|
863 |
for(; cht != cht_last; cht++) { |
|
864 |
SlWriteByte(cht->been_used); |
|
865 |
SlWriteByte(cht->value); |
|
866 |
} |
|
867 |
} |
|
868 |
||
869 |
static void Load_CHTS() |
|
870 |
{ |
|
871 |
Cheat* cht = (Cheat*) &_cheats; |
|
872 |
||
873 |
uint count = SlGetFieldLength()/2; |
|
874 |
for(; count; count--, cht++) |
|
875 |
{ |
|
876 |
cht->been_used = (byte)SlReadByte(); |
|
877 |
cht->value = (byte)SlReadByte(); |
|
878 |
} |
|
879 |
} |
|
880 |
||
881 |
||
882 |
const ChunkHandler _misc_chunk_handlers[] = { |
|
883 |
{ 'MAPT', SaveLoad_MAPT, SaveLoad_MAPT, CH_RIFF }, |
|
884 |
{ 'MAP2', SaveLoad_MAP2, SaveLoad_MAP2, CH_RIFF }, |
|
885 |
{ 'M3LO', SaveLoad_M3LO, SaveLoad_M3LO, CH_RIFF }, |
|
886 |
{ 'M3HI', SaveLoad_M3HI, SaveLoad_M3HI, CH_RIFF }, |
|
887 |
{ 'MAPO', SaveLoad_MAPO, SaveLoad_MAPO, CH_RIFF }, |
|
888 |
{ 'MAP5', SaveLoad_MAP5, SaveLoad_MAP5, CH_RIFF }, |
|
889 |
{ 'MAPE', SaveLoad_MAPE, SaveLoad_MAPE, CH_RIFF }, |
|
890 |
||
891 |
{ 'NAME', Save_NAME, Load_NAME, CH_ARRAY}, |
|
892 |
{ 'DATE', SaveLoad_DATE, SaveLoad_DATE, CH_RIFF}, |
|
893 |
{ 'VIEW', SaveLoad_VIEW, SaveLoad_VIEW, CH_RIFF}, |
|
894 |
{ 'OPTS', SaveLoad_OPTS, SaveLoad_OPTS, CH_RIFF}, |
|
895 |
{ 'CHTS', Save_CHTS, Load_CHTS, CH_RIFF | CH_LAST} |
|
896 |
}; |