Subversion Repositories vaca_plus

Rev

Rev 20 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
1 h266 1
/*
2
 VERY IMPORTANT!
3
 This file is designed to convert any user maps you have made to combatibility with Vaca+
4
 This will move the numbers of certain sounds and change the tile numbers of certain sprites.
5
 
6
 It has already been run on the maps included with Vaca+ (Life's a Beach, Dukematch, Shark's Cove, Zoo).
7
 
8
 To use, open the console in Mapster32 and type:
9
 include vfix
10
 enableevent all
11
 
12
 Then change to 3D mode and back to 2D mode.  Wait for about five seconds for the script to run through all the sprites and sectors.
13
 Save your map.  Open your next map, switch to 3D mode, etc.  Repeat.  You do not have to type the commands again.
14
 
15
 Not following these directions will fuck up your maps.
16
 
17
 ALWAYS MAKE BACKUPS OF YOUR MAPS!
18
*/
19
 
20
include DEFS.CON
19 h266 21
include VacaDefs.con
1 h266 22
 
23
gamevar i 0 0
24
gamevar j 0 0
25
gamevar k 0 0
26
 
27
onevent EVENT_DRAW2DSCREEN
28
// Fixing sounds.
29
 
20 h266 30
	for i allsprites, ifactor MUSICANDSFX
31
	{
32
		 switch .lotag
1 h266 33
 
34
// fixing ambient sounds
20 h266 35
			case 91
36
			case 308
37
			case 501
38
				set .lotag 944
39
				break
1 h266 40
 
20 h266 41
			case 95 set .lotag 950 break
42
			case 180 set .lotag 951 break
43
			case 181 set .lotag 952 break
44
			case 187 set .lotag 953 break
45
			case 188 set .lotag 954 break
46
			case 189 set .lotag 955 break
47
			case 190 set .lotag 956 break
48
			case 192 set .lotag 957 break
49
			case 193 set .lotag 958 break
50
			case 281 set .lotag 959 break
51
 
52
			case 309 set .lotag 900 break
53
			case 310 set .lotag 901 break
54
			case 311 set .lotag 902 break
55
			case 312 set .lotag 903 break
56
			case 313 set .lotag 904 break
57
			case 314 set .lotag 905 break
58
			case 315 set .lotag 906 break
59
			case 316 set .lotag 907 break
60
			case 317 set .lotag 908 break
61
			case 318 set .lotag 909 break
62
			case 319 set .lotag 910 break
63
			case 320 set .lotag 911 break
64
			case 321 set .lotag 912 break
65
			case 322 set .lotag 913 break
66
			case 323 set .lotag 914 break
67
			case 324 set .lotag 915 break
68
			case 325 set .lotag 916 break
69
			case 326 set .lotag 917 break
70
			case 327 set .lotag 918 break
71
			case 343 set .lotag 919 break
72
			case 344 set .lotag 920 break
73
			case 347 set .lotag 921 break
74
			case 417 set .lotag 922 break
75
			case 418 set .lotag 923 break
76
			case 419 set .lotag 924 break
77
			case 420 set .lotag 925 break
78
			case 421 set .lotag 926 break
79
			case 422 set .lotag 927 break
80
			case 423 set .lotag 928 break
81
			case 424 set .lotag 929 break
82
			case 425 set .lotag 930 break
83
			case 432 set .lotag 931 break
84
			case 433 set .lotag 932 break
85
			case 434 set .lotag 933 break
86
			case 435 set .lotag 934 break
87
			case 426 set .lotag 935 break
88
			case 427 set .lotag 936 break
89
			case 428 set .lotag 937 break
90
			case 429 set .lotag 938 break
91
			case 430 set .lotag 939 break
92
			case 431 set .lotag 940 break
93
			case 436 set .lotag 941 break
94
			case 437 set .lotag 942 break
95
			case 438 set .lotag 943 break
96
 
97
		endswitch
1 h266 98
 
99
// fixing triggered sounds (e.g. elevators)
20 h266 100
		sectgetlotag
101
		ifvarn LOTAG 0
102
		{
103
			switch .hitag
104
				case 95 set .hitag 950 break
105
				case 180 set .hitag 951 break
106
				case 181 set .hitag 952 break
107
				case 187 set .hitag 953 break
108
				case 188 set .hitag 954 break
109
				case 189 set .hitag 955 break
110
				case 190 set .hitag 956 break
111
				case 192 set .hitag 957 break
112
				case 193 set .hitag 958 break
113
				case 281 set .hitag 959 break
114
 
115
				case 309 set .hitag 900 break
116
				case 310 set .hitag 901 break
117
				case 311 set .hitag 902 break
118
				case 312 set .hitag 903 break
119
				case 313 set .hitag 904 break
120
				case 314 set .hitag 905 break
121
				case 315 set .hitag 906 break
122
				case 316 set .hitag 907 break
123
				case 317 set .hitag 908 break
124
				case 318 set .hitag 909 break
125
				case 319 set .hitag 910 break
126
				case 320 set .hitag 911 break
127
				case 321 set .hitag 912 break
128
				case 322 set .hitag 913 break
129
				case 323 set .hitag 914 break
130
				case 324 set .hitag 915 break
131
				case 325 set .hitag 916 break
132
				case 326 set .hitag 917 break
133
				case 327 set .hitag 918 break
134
				case 343 set .hitag 919 break
135
				case 344 set .hitag 920 break
136
				case 347 set .hitag 921 break
137
				case 417 set .hitag 922 break
138
				case 418 set .hitag 923 break
139
				case 419 set .hitag 924 break
140
				case 420 set .hitag 925 break
141
				case 421 set .hitag 926 break
142
				case 422 set .hitag 927 break
143
				case 423 set .hitag 928 break
144
				case 424 set .hitag 929 break
145
				case 425 set .hitag 930 break
146
				case 432 set .hitag 931 break
147
				case 433 set .hitag 932 break
148
				case 434 set .hitag 933 break
149
				case 435 set .hitag 934 break
150
				case 426 set .hitag 935 break
151
				case 427 set .hitag 936 break
152
				case 428 set .hitag 937 break
153
				case 429 set .hitag 938 break
154
				case 430 set .hitag 939 break
155
				case 431 set .hitag 940 break
156
				case 436 set .hitag 941 break
157
				case 437 set .hitag 942 break
158
				case 438 set .hitag 943 break
159
			endswitch
160
		}
161
	}
1 h266 162
// fixing one-time sector sounds
20 h266 163
	for k allsectors
164
	{
165
		switch sector[k].lotag
1 h266 166
 
20 h266 167
			case 10091
168
			case 10308
169
				set sector[k].lotag 10944
170
				break
171
 
172
			case 10095 set sector[k].lotag 10950 break
173
			case 10180 set sector[k].lotag 10951 break
174
			case 10181 set sector[k].lotag 10952 break
175
			case 10187 set sector[k].lotag 10953 break
176
			case 10188 set sector[k].lotag 10954 break
177
			case 10189 set sector[k].lotag 10955 break
178
			case 10190 set sector[k].lotag 10956 break
179
			case 10192 set sector[k].lotag 10957 break
180
			case 10193 set sector[k].lotag 10958 break
181
			case 10281 set sector[k].lotag 10959 break
182
 
183
			case 10309 set sector[k].lotag 10900 break
184
			case 10310 set sector[k].lotag 10901 break
185
			case 10311 set sector[k].lotag 10902 break
186
			case 10312 set sector[k].lotag 10903 break
187
			case 10313 set sector[k].lotag 10904 break
188
			case 10314 set sector[k].lotag 10905 break
189
			case 10315 set sector[k].lotag 10906 break
190
			case 10316 set sector[k].lotag 10907 break
191
			case 10317 set sector[k].lotag 10908 break
192
			case 10318 set sector[k].lotag 10909 break
193
			case 10319 set sector[k].lotag 10910 break
194
			case 10320 set sector[k].lotag 10911 break
195
			case 10321 set sector[k].lotag 10912 break
196
			case 10322 set sector[k].lotag 10913 break
197
			case 10323 set sector[k].lotag 10914 break
198
			case 10324 set sector[k].lotag 10915 break
199
			case 10325 set sector[k].lotag 10916 break
200
			case 10326 set sector[k].lotag 10917 break
201
			case 10327 set sector[k].lotag 10918 break
202
			case 10343 set sector[k].lotag 10919 break
203
			case 10344 set sector[k].lotag 10920 break
204
			case 10347 set sector[k].lotag 10921 break
205
			case 10417 set sector[k].lotag 10922 break
206
			case 10418 set sector[k].lotag 10923 break
207
			case 10419 set sector[k].lotag 10924 break
208
			case 10420 set sector[k].lotag 10925 break
209
			case 10421 set sector[k].lotag 10926 break
210
			case 10422 set sector[k].lotag 10927 break
211
			case 10423 set sector[k].lotag 10928 break
212
			case 10424 set sector[k].lotag 10929 break
213
			case 10425 set sector[k].lotag 10930 break
214
			case 10432 set sector[k].lotag 10931 break
215
			case 10433 set sector[k].lotag 10932 break
216
			case 10434 set sector[k].lotag 10933 break
217
			case 10435 set sector[k].lotag 10934 break
218
			case 10426 set sector[k].lotag 10935 break
219
			case 10427 set sector[k].lotag 10936 break
220
			case 10428 set sector[k].lotag 10937 break
221
			case 10429 set sector[k].lotag 10938 break
222
			case 10430 set sector[k].lotag 10939 break
223
			case 10431 set sector[k].lotag 10940 break
224
			case 10436 set sector[k].lotag 10941 break
225
			case 10437 set sector[k].lotag 10942 break
226
			case 10438 set sector[k].lotag 10943 break
227
 
228
		endswitch
22 h266 229
 
230
// regain Atomic hitscan wall functionality, sacrificing v1.3D compatibility:
231
		switch sector[k].floorpicnum
232
			case 3737 set sector[k].floorpicnum 4180 break
233
			case 3738 set sector[k].floorpicnum 4181 break
234
			case 3739 set sector[k].floorpicnum 4182 break
235
			case 3740 set sector[k].floorpicnum 4183 break
236
			case 3741 set sector[k].floorpicnum 4184 break
237
			case 3742 set sector[k].floorpicnum 4185 break
238
			case 3743 set sector[k].floorpicnum 4186 break
239
			case 3744 set sector[k].floorpicnum 4187 break
240
			case 3745 set sector[k].floorpicnum 4188 break
241
			case 3746 set sector[k].floorpicnum 4189 break
242
			case 3747 set sector[k].floorpicnum 4191 break
243
			case 3748 set sector[k].floorpicnum 4192 break
244
			case 3749 set sector[k].floorpicnum 4193 break
245
			case 3750 set sector[k].floorpicnum 4194 break
246
			case 3751 set sector[k].floorpicnum 4195 break
247
			case 3752 set sector[k].floorpicnum 4196 break
248
			case 3753 set sector[k].floorpicnum 4197 break
249
			case 3754 set sector[k].floorpicnum 4198 break
250
			case 3755 set sector[k].floorpicnum 4199 break
251
		endswitch
252
 
253
		switch sector[k].ceilingpicnum
254
			case 3737 set sector[k].ceilingpicnum 4180 break
255
			case 3738 set sector[k].ceilingpicnum 4181 break
256
			case 3739 set sector[k].ceilingpicnum 4182 break
257
			case 3740 set sector[k].ceilingpicnum 4183 break
258
			case 3741 set sector[k].ceilingpicnum 4184 break
259
			case 3742 set sector[k].ceilingpicnum 4185 break
260
			case 3743 set sector[k].ceilingpicnum 4186 break
261
			case 3744 set sector[k].ceilingpicnum 4187 break
262
			case 3745 set sector[k].ceilingpicnum 4188 break
263
			case 3746 set sector[k].ceilingpicnum 4189 break
264
			case 3747 set sector[k].ceilingpicnum 4191 break
265
			case 3748 set sector[k].ceilingpicnum 4192 break
266
			case 3749 set sector[k].ceilingpicnum 4193 break
267
			case 3750 set sector[k].ceilingpicnum 4194 break
268
			case 3751 set sector[k].ceilingpicnum 4195 break
269
			case 3752 set sector[k].ceilingpicnum 4196 break
270
			case 3753 set sector[k].ceilingpicnum 4197 break
271
			case 3754 set sector[k].ceilingpicnum 4198 break
272
			case 3755 set sector[k].ceilingpicnum 4199 break
273
		endswitch
20 h266 274
	}
22 h266 275
	for k allwalls
276
	{
277
		switch wall[k].picnum
278
			case 3737 set wall[k].picnum 4180 break
279
			case 3738 set wall[k].picnum 4181 break
280
			case 3739 set wall[k].picnum 4182 break
281
			case 3740 set wall[k].picnum 4183 break
282
			case 3741 set wall[k].picnum 4184 break
283
			case 3742 set wall[k].picnum 4185 break
284
			case 3743 set wall[k].picnum 4186 break
285
			case 3744 set wall[k].picnum 4187 break
286
			case 3745 set wall[k].picnum 4188 break
287
			case 3746 set wall[k].picnum 4189 break
288
			case 3747 set wall[k].picnum 4191 break
289
			case 3748 set wall[k].picnum 4192 break
290
			case 3749 set wall[k].picnum 4193 break
291
			case 3750 set wall[k].picnum 4194 break
292
			case 3751 set wall[k].picnum 4195 break
293
			case 3752 set wall[k].picnum 4196 break
294
			case 3753 set wall[k].picnum 4197 break
295
			case 3754 set wall[k].picnum 4198 break
296
			case 3755 set wall[k].picnum 4199 break
297
		endswitch
298
		switch wall[k].overpicnum
299
			case 3737 set wall[k].overpicnum 4180 break
300
			case 3738 set wall[k].overpicnum 4181 break
301
			case 3739 set wall[k].overpicnum 4182 break
302
			case 3740 set wall[k].overpicnum 4183 break
303
			case 3741 set wall[k].overpicnum 4184 break
304
			case 3742 set wall[k].overpicnum 4185 break
305
			case 3743 set wall[k].overpicnum 4186 break
306
			case 3744 set wall[k].overpicnum 4187 break
307
			case 3745 set wall[k].overpicnum 4188 break
308
			case 3746 set wall[k].overpicnum 4189 break
309
			case 3747 set wall[k].overpicnum 4191 break
310
			case 3748 set wall[k].overpicnum 4192 break
311
			case 3749 set wall[k].overpicnum 4193 break
312
			case 3750 set wall[k].overpicnum 4194 break
313
			case 3751 set wall[k].overpicnum 4195 break
314
			case 3752 set wall[k].overpicnum 4196 break
315
			case 3753 set wall[k].overpicnum 4197 break
316
			case 3754 set wall[k].overpicnum 4198 break
317
			case 3755 set wall[k].overpicnum 4199 break
318
		endswitch
319
	}
1 h266 320
 
321
// Fixing actors.
322
 
323
// fixing actors already in the map
20 h266 324
	for j allsprites
325
	{
326
		switch .picnum
327
 
328
			case 1312 set .picnum 3650 break
329
			case 2120 set .picnum 3585 break
330
			case 2150 set .picnum 3646 break
331
			case 2165 set .picnum 3670 break
332
			case 3400 set .picnum 3660 break
1 h266 333
 
20 h266 334
		endswitch
335
	}
1 h266 336
// fixing actors which spawn on triggers
20 h266 337
	for i allsprites, ifactor RESPAWN
338
 	{
339
		switch .hitag
340
 
341
			case 1312 set .hitag 3650 addlogvar .x addlogvar .y break
342
			case 2120 set .hitag 3585 addlogvar .x addlogvar .y break
343
			case 2150 set .hitag 3646 addlogvar .x addlogvar .y break
344
			case 2165 set .hitag 3670 addlogvar .x addlogvar .y break
345
			case 3400 set .hitag 3660 addlogvar .x addlogvar .y break
346
 
347
		endswitch
348
	}
1 h266 349
endevent