WebSVN – vaca_plus – Blame – /vaca_plus/vfix.m32

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

Subversion Repositories vaca_plus

(root)/vaca_plus/vfix.m32 @ 84 – Rev 22