//----------------------------MODIFIED CLASSES
Actor NewFighterPlayer : FighterPlayer Replaces FighterPlayer
{	
	+DONTBLAST
	//+GHOST
	Species "Player"
	+THRUSPECIES
	Player.HexenArmor 0, 0, 0, 0, 0
	Player.DisplayName "Fighter"
	Player.MaxHealth 9999
	Health 130
	Player.StartItem "CurrentMaxHealth", 130
	Player.StartItem "CurrentMaxArmor", 120
	Player.StartItem "ImAFighter"
	Player.StartItem "SpikedGauntlets",1
	Player.StartItem "Level",1
	Player.StartItem "MP",22
	Player.StartItem "Rolling", 6
	Player.StartItem "Strength",15
	Player.StartItem "Agility",12
	Player.StartItem "Constitution",15
	Player.StartItem "Wisdom",5
	Player.StartItem "Intellect",5
	Player.StartItem "Charisma",10
	Player.StartItem "LvlUp",1
	Player.ForwardMove 2.0,1.0
	Player.SideMove 2.0,1.0
	DamageFactor AcolyteHealing, 0
	//Damagefactor "Falling", 1000
	Damagefactor "Suicide", 1000
	Damagefactor "Telefrag", 1000
	Player.DamageScreenColor "Black", 0
	PainChance 256
	+DONTHARMSPECIES
	+NOICEDEATH
	+NODAMAGETHRUST
	+QUICKTORETALIATE
	States
	{
	Spawn:
		FIGH A -1
		Loop
	See:
		FIGH A 0 A_JumpIfInventory("IsVanguard",1,"SeeVanguard")
		FIGH ABCD 4
		Goto Spawn
	SeeVanguard:
		FIGH A 0 A_GiveInventory("PresenceItem")
		FIGH ABCD 4
		Goto Spawn
	Missile:
	Melee:
		FIGH E 0 A_GiveInventory("BracersOfForceActivate")
		FIGH EF 8
		Goto Spawn
	Pain:
	Pain.Physical:
		TNT1 A 0 A_SetBlend("Red",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.Fire:
		TNT1 A 0 A_SetBlend("Orange",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.Ice:
		TNT1 A 0 A_SetBlend("Blue",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.Lightning:
		TNT1 A 0 A_SetBlend("SkyBlue",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.Poison: Pain.PoisonCloud: Pain.Slime: Pain.Nature:
		TNT1 A 0 A_SetBlend("Green",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.Holy:
		TNT1 A 0 A_SetBlend("Goldenrod",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.Shadow:
		TNT1 A 0 A_SetBlend("Purple",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.Arcane:
		TNT1 A 0 A_SetBlend("LightSlateBlue",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.PoisonTrue:
		TNT1 A 0 A_SetBlend("Green",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH2)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH2,1))
		Goto PainAnim
	PainAnim:
		FIGH G 0 A_GiveInventory("ConcentrationItem", 1)
		FIGH G 0 A_JumpIfInventory("IsVanguard",1,"PainAnimVanguard")
		FIGH G 4
		FIGH G 4 A_Pain
		Goto Spawn
	PainAnimVanguard:
		FIGH G 4 A_GiveInventory("TemperanceItem", 1)
		FIGH G 4 A_Pain
		Goto Spawn
	Pain.ManaDrain:
		FIGH G 0 A_TakeInventory("Mana1", 5)
		FIGH G 0 A_TakeInventory("Mana2", 5)
		Goto Pain.Holy
	Death:
	Death.Physical:
	Death.TeleFrag:
	Death.Suicide:
		TNT1 A 0 A_SetBlend("Red",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto DeathAnim
	Death.Lightning:
		TNT1 A 0 A_SetBlend("SkyBlue",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto DeathAnim
	Death.Poison: Death.PoisonCloud: Death.Slime: Death.Nature: Death.PoisonTrue:
		TNT1 A 0 A_SetBlend("Green",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto DeathAnim
	Death.Holy: Death.ManaDrain:
		TNT1 A 0 A_SetBlend("Goldenrod",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto DeathAnim
	Death.Shadow:
		TNT1 A 0 A_SetBlend("Purple",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto DeathAnim
	Death.Arcane:
		TNT1 A 0 A_SetBlend("LightSlateBlue",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto DeathAnim
	DeathAnim:
		TNT1 A 0 A_JumpIfHealthLower(-ACS_ExecuteWithResult(WOC_DECORATE,STATS,MAXHEALTH)/2,"XDeathAnim")
		FIGH H 6
		FIGH I 6 A_PlayerScream
		FIGH JK 6
		FIGH L 6 A_NoBlocking
		FIGH M 6
		FIGH N -1
		Stop
	XDeath:
		TNT1 A 0 A_SetBlend("Red",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
	XDeathAnim:
		FIGH O 0 A_SpawnItem("GIBBER")
		FIGH O 5 A_PlayerScream
		FIGH P 5 //A_SkullPop
		FIGH R 5 A_NoBlocking
		FIGH STUV 5
		FIGH W -1
		Stop
	Ice:
		NULL A 0 A_NoBlocking
		NULL A 0 A_SetBlend("Blue",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		NULL A 0 A_PlaySound("misc/freeze")
		NULL A 1 A_SpawnItemEx("BarbarianIceCorpse",0,0,0,0,0,0,0,SXF_NOCHECKPOSITION)
		NULL AA -1
		Stop
	Burn:
		TNT1 A 0 A_SetBlend("Orange",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		FDTH A 5 BRIGHT A_PlaySound("*burndeath")
		FDTH B 4 BRIGHT
		FDTH G 5 BRIGHT
		FDTH H 4 BRIGHT A_PlayerScream
		FDTH I 5 BRIGHT
		FDTH J 4 BRIGHT
		FDTH K 5 BRIGHT
		FDTH L 4 BRIGHT
		FDTH M 5 BRIGHT
		FDTH N 4 BRIGHT
		FDTH O 5 BRIGHT
		FDTH P 4 BRIGHT
		FDTH Q 5 BRIGHT
		FDTH R 4 BRIGHT
		FDTH S 5 BRIGHT A_NoBlocking
		FDTH T 4 BRIGHT
		FDTH U 5 BRIGHT
		FDTH V 4 BRIGHT
		ACLO E 35 A_CheckPlayerDone
		Wait
		ACLO E 8
		Stop
	}
}

Actor BarbarianIceCorpse
{
	Radius 16
	Height 64
	Health 1
	+SHOOTABLE
	+SOLID
	+CANPASS
	States 
	{
	Spawn:
		FIGH G 0
		FIGH G 0 A_Die("Ice")
		FIGH G 1 A_IceGuyDie
		FIGH G -1
		Stop
	Ice:
		FIGH G 5 A_GenericFreezeDeath
		FIGH G 1 A_FreezeDeathChunks
		wait
	}
}

Actor NewClericPlayer : ClericPlayer Replaces ClericPlayer
{

	+NOICEDEATH
	+DONTBLAST
	//+GHOST
	+QUICKTORETALIATE
	+THRUSPECIES
	Species "Player"
	Player.MaxHealth 9999
	Player.DisplayName "Cleric"
	Player.StartItem "CurrentMaxHealth", 100
	Player.StartItem "CurrentMaxArmor", 100
	Health 100
	Player.HexenArmor 0, 0, 0, 0, 0
	Player.ForwardMove 2.0,1.0
	Player.SideMove 2.0,1.0
	Player.StartItem "ImACleric"
	Player.StartItem "MaceOfContrition",1
	Player.StartItem "Level",1
	Player.StartItem "MP",37
	Player.StartItem "Strength",12
	Player.StartItem "Agility",8
	Player.StartItem "Constitution",13
	Player.StartItem "Wisdom",8
	Player.StartItem "Intellect",7
	Player.StartItem "Charisma",14
	Player.StartItem "LvlUp",1
	DamageFactor AcolyteHealing, 0
	//Damagefactor "Falling", 1000
	Damagefactor "Suicide", 1000
	Damagefactor "Telefrag", 1000
	+NODAMAGETHRUST
	Player.DamageScreenColor "Black", 0
	PainChance 256
	+DONTHARMSPECIES
	+QUICKTORETALIATE
	states
	{
	Spawn:
		CLER A -1
		Loop
	Ice:
		NULL A 0 A_NoBlocking
		NULL A 0 A_PlaySound("misc/freeze")
		NULL A 0 A_SetBlend("Blue",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		NULL A 1 A_SpawnItemEx("CrusaderIceCorpse",0,0,0,0,0,0,0,SXF_NOCHECKPOSITION)
		NULL AA -1
		Stop
	Pain.ManaDrain:
		CLER G 0 A_TakeInventory("Mana1", 5)
  		CLER G 0 A_TakeInventory("Mana2", 5)
    Goto Pain.Holy
	Pain:
	Pain.Physical:
		TNT1 A 0 A_SetBlend("Red",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.Fire:
		TNT1 A 0 A_SetBlend("Orange",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.Ice:
		TNT1 A 0 A_SetBlend("Blue",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.Lightning:
		TNT1 A 0 A_SetBlend("SkyBlue",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.Poison: Pain.PoisonCloud: Pain.Slime: Pain.Nature:
		TNT1 A 0 A_SetBlend("Green",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.Holy:
		TNT1 A 0 A_SetBlend("Goldenrod",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.Shadow:
		TNT1 A 0 A_SetBlend("Purple",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.Arcane:
		TNT1 A 0 A_SetBlend("LightSlateBlue",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.PoisonTrue:
		TNT1 A 0 A_SetBlend("Green",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH2)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH2,1))
		Goto PainAnim
	PainAnim:
		CLER H 0 A_JumpIfInventory("Retribution", random(1,10), 2)
		CLER H 0 A_Jump(256,2)
		CLER H 0 A_CustomMissile("RetributionBall")//A_TakeInventory("ClericArmorBonus", 1)
		CLER H 4
		CLER H 4 A_Pain
		Goto Spawn 
	See:
		CLER ABCD 4
		Goto Spawn
	Missile:
	Melee:
		CLER E 0 A_GiveInventory("BracersOfForceActivate")
		CLER EF 5
		CLER G 6
		Goto Spawn
	Death:
	Death.Physical:
	Death.TeleFrag:
	Death.Suicide:
		TNT1 A 0 A_SetBlend("Red",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto DeathAnim
	Death.Lightning:
		TNT1 A 0 A_SetBlend("SkyBlue",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto DeathAnim
	Death.Poison: Death.PoisonCloud: Death.Slime: Death.Nature: Death.PoisonTrue:
		TNT1 A 0 A_SetBlend("Green",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto DeathAnim
	Death.Holy: Death.ManaDrain:
		TNT1 A 0 A_SetBlend("Goldenrod",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto DeathAnim
	Death.Shadow:
		TNT1 A 0 A_SetBlend("Purple",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto DeathAnim
	Death.Arcane:
		TNT1 A 0 A_SetBlend("LightSlateBlue",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto DeathAnim
	DeathAnim:
		TNT1 A 0 A_JumpIfHealthLower(-ACS_ExecuteWithResult(WOC_DECORATE,STATS,MAXHEALTH)/2,"XDeathAnim")
		CLER I 6
		CLER J 6 A_PlayerScream
		CLER KL 6
		CLER M 6 A_NoBlocking
		CLER NOP 6
		CLER Q -1
		Stop
	XDeath:
		TNT1 A 0 A_SetBlend("Red",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
	XDeathAnim:
		CLER R 0 A_SpawnItem("GIBBER")
		CLER R 5 A_PlayerScream
		CLER S 5
		CLER T 5 A_NoBlocking
		CLER UVWXYZ 5
		CLER [ -1
		Stop
	Burn:
		TNT1 A 0 A_SetBlend("Orange",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		FDTH C 5 Bright A_PlaySound("*burndeath")
		FDTH D 4 Bright
		FDTH G 5 Bright
		FDTH H 4 Bright A_PlayerScream
		FDTH I 5 Bright
		FDTH J 4 Bright
		FDTH K 5 Bright
		FDTH L 4 Bright
		FDTH M 5 Bright
		FDTH N 4 Bright
		FDTH O 5 Bright
		FDTH P 4 Bright
		FDTH Q 5 Bright
		FDTH R 4 Bright
		FDTH S 5 Bright A_NoBlocking
		FDTH T 4 Bright
		FDTH U 5 Bright
		FDTH V 4 Bright
		ACLO E 35 A_CheckPlayerDone
		Wait
		ACLO E 8
		Stop
	}
}

Actor CrusaderIceCorpse
{
	Radius 16
	Height 64
	Health 1
	+SHOOTABLE
	+SOLID
	+CANPASS
	States 
	{
	Spawn:
		CLER H 0
		CLER H 0 A_Die("Ice")
		CLER H 1 A_IceGuyDie
		CLER H -1
		Stop
	Ice:
		CLER H 5 A_GenericFreezeDeath
		CLER H 1 A_FreezeDeathChunks
		wait
	}
}

Actor NewMagePlayer : MagePlayer Replaces MagePlayer
{

	+NOICEDEATH
	+DONTBLAST
	//+GHOST
	Species "Player"
	Player.HexenArmor 0, 0, 0, 0, 0
	Player.DisplayName "Mage"
	Player.MaxHealth 9999
	Player.StartItem "CurrentMaxHealth", 55
	Player.StartItem "CurrentMaxArmor", 40
	Health 55
	Player.StartItem "ImAMage"
	Player.StartItem "SapphireWand",1
	Player.StartItem "Level",1
	Player.StartItem "MP",100
	Player.ForwardMove 2.0,1.0
	Player.SideMove 2.0,1.0
	Player.StartItem "Strength",7
	Player.StartItem "Agility",7
	Player.StartItem "Constitution",7
	Player.StartItem "Wisdom",14
	Player.StartItem "Intellect",15
	Player.StartItem "Charisma",10
	Player.StartItem "LvlUp",1
	+THRUSPECIES
	DamageFactor AcolyteHealing, 0
	//Damagefactor "Falling", 1000
	Damagefactor "Suicide", 1000
	Damagefactor "Telefrag", 1000
	+NODAMAGETHRUST
	Player.DamageScreenColor "Black", 0
	PainChance 256
	+DONTHARMSPECIES
	+QUICKTORETALIATE
	states
	{
	Ice:
		NULL A 0 A_NoBlocking
		NULL A 0 A_SetBlend("Blue",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		NULL A 0 A_PlaySound("misc/freeze")
		NULL A 1 A_SpawnItemEx("MageIceCorpse",0,0,0,0,0,0,0,SXF_NOCHECKPOSITION)
		NULL AA -1
		Stop
	Spawn:
		MAGE A -1
		Loop
	See:
		MAGE ABCD 4
		Goto Spawn
	Missile:
	Melee:
		MAGE E 0 A_GiveInventory("BracersOfForceActivate")
		MAGE EF 8
		Goto Spawn
	Pain.ManaDrain:
		MAGE G 0 A_TakeInventory("Mana1", 5)
  		MAGE G 0 A_TakeInventory("Mana2", 5)
    	Goto Pain.Holy
	Pain:
	Pain.Physical:
		TNT1 A 0 A_SetBlend("Red",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.Fire:
		TNT1 A 0 A_SetBlend("Orange",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.Ice:
		TNT1 A 0 A_SetBlend("Blue",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.Lightning:
		TNT1 A 0 A_SetBlend("SkyBlue",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.Poison: Pain.PoisonCloud: Pain.Slime: Pain.Nature:
		TNT1 A 0 A_SetBlend("Green",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.Holy:
		TNT1 A 0 A_SetBlend("Goldenrod",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.Shadow:
		TNT1 A 0 A_SetBlend("Purple",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.Arcane:
		TNT1 A 0 A_SetBlend("LightSlateBlue",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.PoisonTrue:
		TNT1 A 0 A_SetBlend("Green",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH2)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH2,1))
		Goto PainAnim
	PainAnim:
		MAGE G 0 A_JumpIfInventory("IsPyro",1,"Pyro")
		MAGE G 0 A_JumpIfInventory("IsArchon",1,"Archon")
		MAGE G 4
		MAGE G 4 A_Pain
		Goto Spawn
	Pyro:
		MAGE G 4 A_CustomMissile("PyroArmorBullet")
		MAGE G 4 A_Pain
		Goto Spawn
	Archon:
		MAGE G 4 A_GiveInventory("MP", ACS_ExecuteWithResult(WOC_DECORATE,STATS,MAXMAGICK,ACTIVATOR)/40)
		MAGE G 4 A_Pain
		Goto Spawn
	Death:
	Death.Physical:
	Death.TeleFrag:
	Death.Suicide:
		TNT1 A 0 A_SetBlend("Red",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto DeathAnim
	Death.Lightning:
		TNT1 A 0 A_SetBlend("SkyBlue",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto DeathAnim
	Death.Poison: Death.PoisonCloud: Death.Slime: Death.Nature: Death.PoisonTrue:
		TNT1 A 0 A_SetBlend("Green",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto DeathAnim
	Death.Holy: Death.ManaDrain:
		TNT1 A 0 A_SetBlend("Goldenrod",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto DeathAnim
	Death.Shadow:
		TNT1 A 0 A_SetBlend("Purple",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto DeathAnim
	Death.Arcane:
		TNT1 A 0 A_SetBlend("LightSlateBlue",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto DeathAnim
	DeathAnim:
		TNT1 A 0 A_JumpIfHealthLower(-ACS_ExecuteWithResult(WOC_DECORATE,STATS,MAXHEALTH)/2,"XDeathAnim")
		MAGE H 6
		MAGE I 6 A_PlayerScream
		MAGE JK 6
		MAGE L 6 A_NoBlocking
		MAGE M 6
		MAGE N -1
		Stop
	XDeath:
		TNT1 A 0 A_SetBlend("Red",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
	XDeathAnim:
		MAGE O 0 A_SpawnItem("GIBBER")
		MAGE O 5 A_PlayerScream
		MAGE P 5
		MAGE R 5 A_NoBlocking
		MAGE STUVW 5
		MAGE X -1
		Stop
	Burn:
		TNT1 A 0 A_SetBlend("Orange",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		FDTH E 5 Bright A_PlaySound("*burndeath")
		FDTH F 4 Bright
		FDTH G 5 Bright
		FDTH H 4 Bright A_PlayerScream
		FDTH I 5 Bright
		FDTH J 4 Bright
		FDTH K 5 Bright
		FDTH L 4 Bright
		FDTH M 5 Bright
		FDTH N 4 Bright
		FDTH O 5 Bright
		FDTH P 4 Bright
		FDTH Q 5 Bright
		FDTH R 4 Bright
		FDTH S 5 Bright A_NoBlocking
		FDTH T 4 Bright
		FDTH U 5 Bright
		FDTH V 4 Bright
		ACLO E 35 A_CheckPlayerDone
		Wait
		ACLO E 8
		Stop
	}
}

Actor MageIceCorpse
{
	Radius 16
	Height 64
	Health 1
	+SHOOTABLE
	+SOLID
	+CANPASS
	States 
	{
	Spawn:
		MAGE G 0
		MAGE G 0 A_Die("Ice")
		MAGE G 1 A_IceGuyDie
		MAGE G -1
		Stop
	Ice:
		MAGE G 5 A_GenericFreezeDeath
		MAGE G 1 A_FreezeDeathChunks
		wait
	}
}

Actor NewHunterPlayer : PlayerPawn
{

	+NOICEDEATH
	+DONTBLAST
	//+GHOST
	Species "Player"
	Player.MaxHealth 9999
	Player.DisplayName "Hunter"
	Player.StartItem "CurrentMaxHealth", 85
	Player.StartItem "CurrentMaxArmor", 80
	Health 85
	Radius 16
	Player.HexenArmor 0, 0, 0, 0, 0
	Height 64
	Speed 1
	+NOSKIN
	RadiusDamageFactor 0.25
	Player.JumpZ 9.75
	Player.Viewheight 48
	Player.SoundClass "Hunter"
	PainSound "HUNTPN2"
	Player.SpawnClass "Cleric"
	Player.InvulnerabilityMode "Ghost"
	Player.ForwardMove 2.0,1.0
	Player.SideMove 2.0,1.0
	Player.StartItem "ImAHunter"
	Player.StartItem "Machete",1
	Player.StartItem "Level",1
	Player.StartItem "MP",54
	Player.StartItem "Strength",10
	Player.StartItem "Agility",14
	Player.StartItem "Constitution",10
	Player.StartItem "Wisdom",10
	Player.StartItem "Intellect",8
	Player.StartItem "Charisma",10
	Player.StartItem "LvlUp",1
	+THRUSPECIES
	DamageFactor AcolyteHealing, 0
	//Damagefactor "Falling", 1000
	Damagefactor "Suicide", 1000
	Damagefactor "Telefrag", 1000
	+NODAMAGETHRUST
	Player.ColorRange 51, 66
	Player.Portrait P_HWALK1
	Player.DamageScreenColor "Black", 0
	PainChance 256
	+DONTHARMSPECIES
	+QUICKTORETALIATE
	states
	{
	Ice:
		NULL A 0 A_NoBlocking
		NULL A 0 A_SetBlend("Blue",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		NULL A 0 A_PlaySound("misc/freeze")
		NULL A 1 A_SpawnItemEx("HunterIceCorpse",0,0,0,0,0,0,0,SXF_NOCHECKPOSITION)
		NULL AA -1
		Stop
	Pain.ManaDrain:
		HUNT G 0 A_TakeInventory("Mana1", 5)
  		HUNT G 0 A_TakeInventory("Mana2", 5)
    Goto Pain.Holy
	Spawn:
		HUNT A -1
		Loop
	See:
		HUNT ABCD 4 
		Goto Spawn
	Missile:
	Melee:
		HUNT E 0 A_GiveInventory("BracersOfForceActivate")
		HUNT EE 8
		Goto Spawn
	Pain:
	Pain.Physical:
		TNT1 A 0 A_SetBlend("Red",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.Fire:
		TNT1 A 0 A_SetBlend("Orange",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.Ice:
		TNT1 A 0 A_SetBlend("Blue",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.Lightning:
		TNT1 A 0 A_SetBlend("SkyBlue",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.Poison: Pain.PoisonCloud: Pain.Slime: Pain.Nature:
		TNT1 A 0 A_SetBlend("Green",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.Holy:
		TNT1 A 0 A_SetBlend("Goldenrod",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.Shadow:
		TNT1 A 0 A_SetBlend("Purple",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.Arcane:
		TNT1 A 0 A_SetBlend("LightSlateBlue",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.PoisonTrue:
		TNT1 A 0 A_SetBlend("Green",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH2)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH2,1))
		Goto PainAnim
	PainAnim:
		HUNT F 4 A_GiveInventory("DuelistSpeed")
		HUNT F 4 A_Pain
		Goto Spawn
	Death:
	Death.Physical:
	Death.TeleFrag:
	Death.Suicide:
		TNT1 A 0 A_SetBlend("Red",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto DeathAnim
	Death.Lightning:
		TNT1 A 0 A_SetBlend("SkyBlue",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto DeathAnim
	Death.Poison: Death.PoisonCloud: Death.Slime: Death.Nature: Death.PoisonTrue:
		TNT1 A 0 A_SetBlend("Green",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto DeathAnim
	Death.Holy: Death.ManaDrain:
		TNT1 A 0 A_SetBlend("Goldenrod",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto DeathAnim
	Death.Shadow:
		TNT1 A 0 A_SetBlend("Purple",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto DeathAnim
	Death.Arcane:
		TNT1 A 0 A_SetBlend("LightSlateBlue",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto DeathAnim
	DeathAnim:
		TNT1 A 0 A_JumpIfHealthLower(-ACS_ExecuteWithResult(WOC_DECORATE,STATS,MAXHEALTH)/2,"XDeathAnim")
		HUNT H 6
        HUNT I 6 A_PlayerScream
        HUNT JK 6
        HUNT L 6 A_NoBlocking
        HUNT MN 6
        HUNT O -1
        Stop
	XDeath:
		TNT1 A 0 A_SetBlend("Red",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
	XDeathAnim:
		HUNT O 0 A_SpawnItem("GIBBER")
        HUNT Q 5 A_XScream
        HUNT R 0 A_NoBlocking
        HUNT R 5
        HUNT STUVW 5
        HUNT Y -1
        Stop
	Burn:
		TNT1 A 0 A_SetBlend("Orange",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		HUNT X 5 Bright A_PlaySound("*burndeath")
		FDTH G 5 Bright
		FDTH H 4 Bright A_PlayerScream
		FDTH I 5 Bright
		FDTH J 4 Bright
		FDTH K 5 Bright
		FDTH L 4 Bright
		FDTH M 5 Bright
		FDTH N 4 Bright
		FDTH O 5 Bright
		FDTH P 4 Bright
		FDTH Q 5 Bright
		FDTH R 4 Bright
		FDTH S 5 Bright A_NoBlocking
		FDTH T 4 Bright
		FDTH U 5 Bright
		FDTH V 4 Bright
		ACLO E 35 A_CheckPlayerDone
		Wait
		ACLO E 8
		Stop
	}
}

Actor HunterIceCorpse
{
	Radius 16
	Height 64
	Health 1
	+SHOOTABLE
	+SOLID
	+CANPASS
	States 
	{
	Spawn:
		HUNT F 0
		HUNT F 0 A_Die("Ice")
		HUNT F 1 A_IceGuyDie
		HUNT F -1
		Stop
	Ice:
		HUNT F 5 A_GenericFreezeDeath
		HUNT F 1 A_FreezeDeathChunks
		wait
	}
}

Actor NewNecromancerPlayer : PlayerPawn
{

	+NOICEDEATH
	+DONTBLAST
	//+GHOST
	Species "Player"
	Player.MaxHealth 9999
	Player.DisplayName "Necromancer"
	Player.StartItem "CurrentMaxHealth", 70
	Player.StartItem "CurrentMaxArmor", 60
	Health 70
	Radius 16
	Player.HexenArmor 0, 0, 0, 0, 0
	Height 64
	Speed 1
	+NOSKIN
	RadiusDamageFactor 0.25
	Player.JumpZ 9.75
	Player.Viewheight 48
	Player.SoundClass "Mage"
	PainSound "PlayerMagePain"
	Player.SpawnClass "Mage"
	Player.InvulnerabilityMode "Reflective"
	Player.ForwardMove 2.0,1.0
	Player.SideMove 2.0,1.0
	Player.StartItem "ImAWarlock"
	Player.StartItem "Sickle",1
	Player.StartItem "Level",1
	Player.StartItem "MP",75
	Player.StartItem "Strength",8
	Player.StartItem "Agility",10
	Player.StartItem "Constitution",8
	Player.StartItem "Wisdom",12
	Player.StartItem "Intellect",14
	Player.StartItem "Charisma",10
	Player.StartItem "LvlUp",1
	+THRUSPECIES
	DamageFactor AcolyteHealing, 0
	//Damagefactor "Falling", 1000
	Damagefactor "Suicide", 1000
	Damagefactor "Telefrag", 1000
	+NODAMAGETHRUST
	Player.ColorRange 146, 163
	Player.Portrait P_NWALK1
	Player.DamageScreenColor "Black", 0
	PainChance 256
	+DONTHARMSPECIES
	+QUICKTORETALIATE
	states
	{
	Ice:
		NULL A 0 A_NoBlocking
		NULL A 0 A_SetBlend("Blue",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		NULL A 0 A_PlaySound("misc/freeze")
		NULL A 1 A_SpawnItemEx("NecromancerIceCorpse",0,0,0,0,0,0,0,SXF_NOCHECKPOSITION)
		NULL AA -1
		Stop
	Pain.ManaDrain:
		NECR G 0 A_TakeInventory("Mana1", 5)
  		NECR G 0 A_TakeInventory("Mana2", 5)
    Goto Pain.Holy
	Spawn: 
		NECR A -1
		Loop
	See: 
		NECR ABCD 4
		Goto Spawn
	Melee:
	Missile:
		NECR E 8 A_GiveInventory("BracersOfForceActivate")
		NECR F 8 Bright
		Goto Spawn
	Pain:
	Pain.Physical:
		TNT1 A 0 A_SetBlend("Red",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.Fire:
		TNT1 A 0 A_SetBlend("Orange",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.Ice:
		TNT1 A 0 A_SetBlend("Blue",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.Lightning:
		TNT1 A 0 A_SetBlend("SkyBlue",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.Poison: Pain.PoisonCloud: Pain.Slime: Pain.Nature:
		TNT1 A 0 A_SetBlend("Green",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.Holy:
		TNT1 A 0 A_SetBlend("Goldenrod",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.Shadow:
		TNT1 A 0 A_SetBlend("Purple",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.Arcane:
		TNT1 A 0 A_SetBlend("LightSlateBlue",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.PoisonTrue:
		TNT1 A 0 A_SetBlend("Green",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH2)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH2,1))
		Goto PainAnim
	PainAnim:
		NECR G 4 
		NECR G 4 A_Pain 
		Goto Spawn
	Death:
	Death.Physical:
	Death.TeleFrag:
	Death.Suicide:
		TNT1 A 0 A_SetBlend("Red",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto DeathAnim
	Death.Lightning:
		TNT1 A 0 A_SetBlend("SkyBlue",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto DeathAnim
	Death.Poison: Death.PoisonCloud: Death.Slime: Death.Nature: Death.PoisonTrue:
		TNT1 A 0 A_SetBlend("Green",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto DeathAnim
	Death.Holy: Death.ManaDrain:
		TNT1 A 0 A_SetBlend("Goldenrod",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto DeathAnim
	Death.Shadow:
		TNT1 A 0 A_SetBlend("Purple",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto DeathAnim
	Death.Arcane:
		TNT1 A 0 A_SetBlend("LightSlateBlue",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto DeathAnim
	DeathAnim:
		TNT1 A 0 A_JumpIfHealthLower(-ACS_ExecuteWithResult(WOC_DECORATE,STATS,MAXHEALTH)/2,"XDeathAnim")
		NECR H 8 
		NECR I 8 A_PlayerScream  
		NECR J 4 
		NECR K 4 A_NoBlocking 
		NECR L 4 
		NECR M -1 
		Stop
	XDeath:
		TNT1 A 0 A_SetBlend("Red",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
	XDeathAnim:
		NECR N 5 A_SpawnItem("GIBBER")
		NECR O 5 A_PlayerScream 
		NECR P 5 A_NoBlocking 
		NECR QR 5
		NECR S 5
		NECR TUV 5 
		NECR W -1
		Stop
	Burn:
		TNT1 A 0 A_SetBlend("Orange",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		FDTH G 5 Bright A_PlaySound("*burndeath")
		FDTH H 4 Bright A_PlayerScream
		FDTH I 5 Bright
		FDTH J 4 Bright
		FDTH K 5 Bright
		FDTH L 4 Bright
		FDTH M 5 Bright
		FDTH N 4 Bright
		FDTH O 5 Bright
		FDTH P 4 Bright
		FDTH Q 5 Bright
		FDTH R 4 Bright
		FDTH S 5 Bright A_NoBlocking
		FDTH T 4 Bright
		FDTH U 5 Bright
		FDTH V 4 Bright
		ACLO E 35 A_CheckPlayerDone
		Wait
		ACLO E 8
		Stop
	}
}

ACTOR NewMetamorphesisPlayer : PlayerPawn
{
	Speed 0.4
	Health 1500
	Radius 16
	Height 64
	Mass 2000
	RadiusDamageFactor 0.25
	Player.JumpZ 9.75
	Player.Viewheight 48
	Player.ColorRange 0, 0
	Player.DisplayName "Bruiser"
	player.damagescreencolor "Green",0
	PainChance 256
	+DONTHARMSPECIES
	player.morphweapon "BruiserWeapon"
	DamageFactor "BruiserAttack",0
	Player.SoundClass "Mage"
	+NOSKIN
	-TELESTOMP
	+THRUSPECIES
	Species "Player"
	DamageFactor AcolyteHealing, 0
	//Damagefactor "Falling", 1000
	DamageFactor "Normal", 0.5
	Damagefactor "Suicide", 1000
	Damagefactor "Telefrag", 1000
	+NODAMAGETHRUST
	States
	{
	Spawn:
		BOS4 A -1
		Loop
	See:
		BOS4 ABCD 4
		Goto Spawn
	Missile:
	Melee:
		BOS4 E 0 A_GiveInventory("BracersOfForceActivate")
		BOS4 EFG 6
		Goto Spawn
	Pain:
	Pain.Physical:
		TNT1 A 0 A_SetBlend("Red",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.Fire:
		TNT1 A 0 A_SetBlend("Orange",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.Ice:
		TNT1 A 0 A_SetBlend("Blue",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.Lightning:
		TNT1 A 0 A_SetBlend("SkyBlue",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.Poison: Pain.PoisonCloud: Pain.Slime: Pain.Nature:
		TNT1 A 0 A_SetBlend("Green",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.Holy:
		TNT1 A 0 A_SetBlend("Goldenrod",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.Shadow:
		TNT1 A 0 A_SetBlend("Purple",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.Arcane:
		TNT1 A 0 A_SetBlend("LightSlateBlue",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto PainAnim
	Pain.PoisonTrue:
		TNT1 A 0 A_SetBlend("Green",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH2)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH2,1))
		Goto PainAnim
	PainAnim:
		BOS4 Q 4
		BOS4 Q 4 A_Pain 
		Goto Spawn
	Death:
	Death.Physical:
	Death.TeleFrag:
	Death.Suicide:
		TNT1 A 0 A_SetBlend("Red",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto DeathAnim
	Death.Fire:
		TNT1 A 0 A_SetBlend("Orange",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto DeathAnim
	Death.Ice:
		TNT1 A 0 A_SetBlend("Blue",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto DeathAnim
	Death.Lightning:
		TNT1 A 0 A_SetBlend("SkyBlue",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto DeathAnim
	Death.Poison: Death.PoisonCloud: Death.Slime: Death.Nature: Death.PoisonTrue:
		TNT1 A 0 A_SetBlend("Green",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto DeathAnim
	Death.Holy: Death.ManaDrain:
		TNT1 A 0 A_SetBlend("Goldenrod",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto DeathAnim
	Death.Shadow:
		TNT1 A 0 A_SetBlend("Purple",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto DeathAnim
	Death.Arcane:
		TNT1 A 0 A_SetBlend("LightSlateBlue",ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH)/100.0,ACS_ExecuteWithResult(WOC_DECORATE,MONSTERACS,PREVHEALTH,1))
		Goto DeathAnim
	DeathAnim:
		BOS4 R 6 Bright
		BOS4 S 6 Bright A_Scream 
		BOS4 T 6 Bright 
		BOS4 U 6 Bright
		BOS4 VW 6 Bright 
		BOS4 X 6 Bright A_SpawnItemEx("ArchonSoul",0,0,86,0,0,3,0,128)
		BOS4 YZ 6 Bright 
		BOZ4 Z -1 Bright
		Stop
	}
}

Actor NecromancerIceCorpse
{
	Radius 16
	Height 64
	Health 1
	+SHOOTABLE
	+SOLID
	+CANPASS
	States 
	{
	Spawn:
		NECR G 0
		NECR G 0 A_Die("Ice")
		NECR G 1 A_IceGuyDie
		NECR G -1
		Stop
	Ice:
		NECR G 5 A_GenericFreezeDeath
		NECR G 1 A_FreezeDeathChunks
		wait
	}
}

