/*
 VERY IMPORTANT!
 This file is designed to convert any user maps you have made to combatibility with Vaca+
 This will move the numbers of certain sounds and change the tile numbers of certain sprites.
 
 It has already been run on the maps included with Vaca+ (Life's a Beach, Dukematch, Shark's Cove, Zoo).
 
 To use, open the console in Mapster32 and type:
 include vfix
 enableevent all
 
 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.
 Save your map.  Open your next map, switch to 3D mode, etc.  Repeat.  You do not have to type the commands again.
  
 Not following these directions will fuck up your maps.
 
 ALWAYS MAKE BACKUPS OF YOUR MAPS!
*/

include DEFS.CON
include VacaDefs.con

gamevar i 0 0
gamevar j 0 0
gamevar k 0 0

onevent EVENT_DRAW2DSCREEN
// Fixing sounds.

	for i allsprites, ifactor MUSICANDSFX
	{
		 switch .lotag

// fixing ambient sounds
			case 91
			case 308
			case 501
				set .lotag 944
				break

			case 95 set .lotag 950 break
			case 180 set .lotag 951 break
			case 181 set .lotag 952 break
			case 187 set .lotag 953 break
			case 188 set .lotag 954 break
			case 189 set .lotag 955 break
			case 190 set .lotag 956 break
			case 192 set .lotag 957 break
			case 193 set .lotag 958 break
			case 281 set .lotag 959 break
			
			case 309 set .lotag 900 break
			case 310 set .lotag 901 break
			case 311 set .lotag 902 break
			case 312 set .lotag 903 break
			case 313 set .lotag 904 break
			case 314 set .lotag 905 break
			case 315 set .lotag 906 break
			case 316 set .lotag 907 break
			case 317 set .lotag 908 break
			case 318 set .lotag 909 break
			case 319 set .lotag 910 break
			case 320 set .lotag 911 break
			case 321 set .lotag 912 break
			case 322 set .lotag 913 break
			case 323 set .lotag 914 break
			case 324 set .lotag 915 break
			case 325 set .lotag 916 break
			case 326 set .lotag 917 break
			case 327 set .lotag 918 break
			case 343 set .lotag 919 break
			case 344 set .lotag 920 break
			case 347 set .lotag 921 break
			case 417 set .lotag 922 break
			case 418 set .lotag 923 break
			case 419 set .lotag 924 break
			case 420 set .lotag 925 break
			case 421 set .lotag 926 break
			case 422 set .lotag 927 break
			case 423 set .lotag 928 break
			case 424 set .lotag 929 break
			case 425 set .lotag 930 break
			case 432 set .lotag 931 break
			case 433 set .lotag 932 break
			case 434 set .lotag 933 break
			case 435 set .lotag 934 break
			case 426 set .lotag 935 break
			case 427 set .lotag 936 break
			case 428 set .lotag 937 break
			case 429 set .lotag 938 break
			case 430 set .lotag 939 break
			case 431 set .lotag 940 break
			case 436 set .lotag 941 break
			case 437 set .lotag 942 break
			case 438 set .lotag 943 break
			
		endswitch

// fixing triggered sounds (e.g. elevators)
		sectgetlotag
		ifvarn LOTAG 0
		{
			switch .hitag
				case 95 set .hitag 950 break
				case 180 set .hitag 951 break
				case 181 set .hitag 952 break
				case 187 set .hitag 953 break
				case 188 set .hitag 954 break
				case 189 set .hitag 955 break
				case 190 set .hitag 956 break
				case 192 set .hitag 957 break
				case 193 set .hitag 958 break
				case 281 set .hitag 959 break
				
				case 309 set .hitag 900 break
				case 310 set .hitag 901 break
				case 311 set .hitag 902 break
				case 312 set .hitag 903 break
				case 313 set .hitag 904 break
				case 314 set .hitag 905 break
				case 315 set .hitag 906 break
				case 316 set .hitag 907 break
				case 317 set .hitag 908 break
				case 318 set .hitag 909 break
				case 319 set .hitag 910 break
				case 320 set .hitag 911 break
				case 321 set .hitag 912 break
				case 322 set .hitag 913 break
				case 323 set .hitag 914 break
				case 324 set .hitag 915 break
				case 325 set .hitag 916 break
				case 326 set .hitag 917 break
				case 327 set .hitag 918 break
				case 343 set .hitag 919 break
				case 344 set .hitag 920 break
				case 347 set .hitag 921 break
				case 417 set .hitag 922 break
				case 418 set .hitag 923 break
				case 419 set .hitag 924 break
				case 420 set .hitag 925 break
				case 421 set .hitag 926 break
				case 422 set .hitag 927 break
				case 423 set .hitag 928 break
				case 424 set .hitag 929 break
				case 425 set .hitag 930 break
				case 432 set .hitag 931 break
				case 433 set .hitag 932 break
				case 434 set .hitag 933 break
				case 435 set .hitag 934 break
				case 426 set .hitag 935 break
				case 427 set .hitag 936 break
				case 428 set .hitag 937 break
				case 429 set .hitag 938 break
				case 430 set .hitag 939 break
				case 431 set .hitag 940 break
				case 436 set .hitag 941 break
				case 437 set .hitag 942 break
				case 438 set .hitag 943 break
			endswitch
		}
	}
// fixing one-time sector sounds
	for k allsectors
	{
		switch sector[k].lotag

			case 10091
			case 10308
				set sector[k].lotag 10944
				break
			
			case 10095 set sector[k].lotag 10950 break
			case 10180 set sector[k].lotag 10951 break
			case 10181 set sector[k].lotag 10952 break
			case 10187 set sector[k].lotag 10953 break
			case 10188 set sector[k].lotag 10954 break
			case 10189 set sector[k].lotag 10955 break
			case 10190 set sector[k].lotag 10956 break
			case 10192 set sector[k].lotag 10957 break
			case 10193 set sector[k].lotag 10958 break
			case 10281 set sector[k].lotag 10959 break
			
			case 10309 set sector[k].lotag 10900 break
			case 10310 set sector[k].lotag 10901 break
			case 10311 set sector[k].lotag 10902 break
			case 10312 set sector[k].lotag 10903 break
			case 10313 set sector[k].lotag 10904 break
			case 10314 set sector[k].lotag 10905 break
			case 10315 set sector[k].lotag 10906 break
			case 10316 set sector[k].lotag 10907 break
			case 10317 set sector[k].lotag 10908 break
			case 10318 set sector[k].lotag 10909 break
			case 10319 set sector[k].lotag 10910 break
			case 10320 set sector[k].lotag 10911 break
			case 10321 set sector[k].lotag 10912 break
			case 10322 set sector[k].lotag 10913 break
			case 10323 set sector[k].lotag 10914 break
			case 10324 set sector[k].lotag 10915 break
			case 10325 set sector[k].lotag 10916 break
			case 10326 set sector[k].lotag 10917 break
			case 10327 set sector[k].lotag 10918 break
			case 10343 set sector[k].lotag 10919 break
			case 10344 set sector[k].lotag 10920 break
			case 10347 set sector[k].lotag 10921 break
			case 10417 set sector[k].lotag 10922 break
			case 10418 set sector[k].lotag 10923 break
			case 10419 set sector[k].lotag 10924 break
			case 10420 set sector[k].lotag 10925 break
			case 10421 set sector[k].lotag 10926 break
			case 10422 set sector[k].lotag 10927 break
			case 10423 set sector[k].lotag 10928 break
			case 10424 set sector[k].lotag 10929 break
			case 10425 set sector[k].lotag 10930 break
			case 10432 set sector[k].lotag 10931 break
			case 10433 set sector[k].lotag 10932 break
			case 10434 set sector[k].lotag 10933 break
			case 10435 set sector[k].lotag 10934 break
			case 10426 set sector[k].lotag 10935 break
			case 10427 set sector[k].lotag 10936 break
			case 10428 set sector[k].lotag 10937 break
			case 10429 set sector[k].lotag 10938 break
			case 10430 set sector[k].lotag 10939 break
			case 10431 set sector[k].lotag 10940 break
			case 10436 set sector[k].lotag 10941 break
			case 10437 set sector[k].lotag 10942 break
			case 10438 set sector[k].lotag 10943 break
			
		endswitch

// regain Atomic hitscan wall functionality, sacrificing v1.3D compatibility:
		switch sector[k].floorpicnum
			case 3737 set sector[k].floorpicnum 4180 break
			case 3738 set sector[k].floorpicnum 4181 break
			case 3739 set sector[k].floorpicnum 4182 break
			case 3740 set sector[k].floorpicnum 4183 break
			case 3741 set sector[k].floorpicnum 4184 break
			case 3742 set sector[k].floorpicnum 4185 break
			case 3743 set sector[k].floorpicnum 4186 break
			case 3744 set sector[k].floorpicnum 4187 break
			case 3745 set sector[k].floorpicnum 4188 break
			case 3746 set sector[k].floorpicnum 4189 break
			case 3747 set sector[k].floorpicnum 4191 break
			case 3748 set sector[k].floorpicnum 4192 break
			case 3749 set sector[k].floorpicnum 4193 break
			case 3750 set sector[k].floorpicnum 4194 break
			case 3751 set sector[k].floorpicnum 4195 break
			case 3752 set sector[k].floorpicnum 4196 break
			case 3753 set sector[k].floorpicnum 4197 break
			case 3754 set sector[k].floorpicnum 4198 break
			case 3755 set sector[k].floorpicnum 4199 break
		endswitch

		switch sector[k].ceilingpicnum
			case 3737 set sector[k].ceilingpicnum 4180 break
			case 3738 set sector[k].ceilingpicnum 4181 break
			case 3739 set sector[k].ceilingpicnum 4182 break
			case 3740 set sector[k].ceilingpicnum 4183 break
			case 3741 set sector[k].ceilingpicnum 4184 break
			case 3742 set sector[k].ceilingpicnum 4185 break
			case 3743 set sector[k].ceilingpicnum 4186 break
			case 3744 set sector[k].ceilingpicnum 4187 break
			case 3745 set sector[k].ceilingpicnum 4188 break
			case 3746 set sector[k].ceilingpicnum 4189 break
			case 3747 set sector[k].ceilingpicnum 4191 break
			case 3748 set sector[k].ceilingpicnum 4192 break
			case 3749 set sector[k].ceilingpicnum 4193 break
			case 3750 set sector[k].ceilingpicnum 4194 break
			case 3751 set sector[k].ceilingpicnum 4195 break
			case 3752 set sector[k].ceilingpicnum 4196 break
			case 3753 set sector[k].ceilingpicnum 4197 break
			case 3754 set sector[k].ceilingpicnum 4198 break
			case 3755 set sector[k].ceilingpicnum 4199 break
		endswitch
	}
	for k allwalls
	{
		switch wall[k].picnum
			case 3737 set wall[k].picnum 4180 break
			case 3738 set wall[k].picnum 4181 break
			case 3739 set wall[k].picnum 4182 break
			case 3740 set wall[k].picnum 4183 break
			case 3741 set wall[k].picnum 4184 break
			case 3742 set wall[k].picnum 4185 break
			case 3743 set wall[k].picnum 4186 break
			case 3744 set wall[k].picnum 4187 break
			case 3745 set wall[k].picnum 4188 break
			case 3746 set wall[k].picnum 4189 break
			case 3747 set wall[k].picnum 4191 break
			case 3748 set wall[k].picnum 4192 break
			case 3749 set wall[k].picnum 4193 break
			case 3750 set wall[k].picnum 4194 break
			case 3751 set wall[k].picnum 4195 break
			case 3752 set wall[k].picnum 4196 break
			case 3753 set wall[k].picnum 4197 break
			case 3754 set wall[k].picnum 4198 break
			case 3755 set wall[k].picnum 4199 break
		endswitch
		switch wall[k].overpicnum
			case 3737 set wall[k].overpicnum 4180 break
			case 3738 set wall[k].overpicnum 4181 break
			case 3739 set wall[k].overpicnum 4182 break
			case 3740 set wall[k].overpicnum 4183 break
			case 3741 set wall[k].overpicnum 4184 break
			case 3742 set wall[k].overpicnum 4185 break
			case 3743 set wall[k].overpicnum 4186 break
			case 3744 set wall[k].overpicnum 4187 break
			case 3745 set wall[k].overpicnum 4188 break
			case 3746 set wall[k].overpicnum 4189 break
			case 3747 set wall[k].overpicnum 4191 break
			case 3748 set wall[k].overpicnum 4192 break
			case 3749 set wall[k].overpicnum 4193 break
			case 3750 set wall[k].overpicnum 4194 break
			case 3751 set wall[k].overpicnum 4195 break
			case 3752 set wall[k].overpicnum 4196 break
			case 3753 set wall[k].overpicnum 4197 break
			case 3754 set wall[k].overpicnum 4198 break
			case 3755 set wall[k].overpicnum 4199 break
		endswitch
	}

// Fixing actors.

// fixing actors already in the map
	for j allsprites
	{
		switch .picnum
			
			case 1312 set .picnum 3650 break
			case 2120 set .picnum 3585 break
			case 2150 set .picnum 3646 break
			case 2165 set .picnum 3670 break
			case 3400 set .picnum 3660 break

		endswitch
	}
// fixing actors which spawn on triggers
	for i allsprites, ifactor RESPAWN
 	{
		switch .hitag
			
			case 1312 set .hitag 3650 addlogvar .x addlogvar .y break
			case 2120 set .hitag 3585 addlogvar .x addlogvar .y break
			case 2150 set .hitag 3646 addlogvar .x addlogvar .y break
			case 2165 set .hitag 3670 addlogvar .x addlogvar .y break
			case 3400 set .hitag 3660 addlogvar .x addlogvar .y break
			
		endswitch
	}
endevent