
ACTOR NecroCasted : Inventory { Inventory.MaxAmount 2 }

ACTOR NecroGhost
{
PROJECTILE
Height 10
Radius 10
Speed 60
BounceType "Hexen"
BounceFactor 0.1
WallBounceFactor 0.1
RenderStyle "Translucent"
Alpha 0.75
Damage (1)
+SEEKERMISSILE
+FORCEPAIN
+MTHRUSPECIES
+BOUNCEONACTORS
Species "Player"
SeeSound "weapons/spirit1"
ActiveSound "necghost/active"
var int user_delay;
States
	{
	Spawn:
        TNT1 A 0
	   	TNT1 A 0 A_JumpIf(user_delay >= 26,"Vanish")
        TNT1 A 0 A_SetUserVar("user_delay",user_delay+1)
		TNT1 A 0 A_LoopActiveSound
		SPI2 ABABABABAB 1 Bright A_SeekerMissile(25,35,SMF_LOOK)
		TNT1 A 0 Bright A_SpawnItemEx("NecroGhostEffect",0,0,0,0,0,0,0,SXF_CLIENTSIDE|SXF_NOCHECKPOSITION,0)
		TNT1 A 0 A_SetTranslucent(0)
		SPI2 B 5 Bright ACS_ExecuteAlways(22330,0)
		SPI2 B 1 Bright A_RearrangePointers(AAPTR_DEFAULT,AAPTR_DEFAULT,AAPTR_NULL)
		Loop
	Vanish:
		TNT1 A 0 A_Stop
		SPI2 EFGHIJ 3
		Stop
	}
}

ACTOR NecroGhostEffect : RedParticleSpawner
{
States
	{
	Spawn:
		TNT1 A 0
		TNT1 AAAAAAAAAAAAAAAA 0 A_SpawnItemEx("GHellionSmoke",random(48,-48),random(48,-48),random(12,64),0,0,random(1,3),0,SXF_CLIENTSIDE|SXF_NOCHECKPOSITION,0)
		TNT1 A 1
		Stop
	}
}

Actor LcaCursedMonster : Inventory { Inventory.MaxAmount 1 }

ACTOR CursedMark
{
Height 0
Radius 0
Speed 0
RenderStyle "Translucent"
Alpha 0.8
+DORMANT
+NOTIMEFREEZE
+NOINTERACTION
var int user_cursedTID;
var int user_curseTimer;
var int user_cursedState;
var int user_cursedDefSpeed;
States
	{
	Spawn:
		CMRK A 1 Bright ACS_ExecuteAlways(22332, 0, user_cursedTID,  user_curseTimer, user_cursedState)
		Loop
	Death:
		TNT1 A 1
		Stop
	}	
}

ACTOR FriendMark
{
Radius 0
Height 0
Speed 0
RenderStyle "Translucent"
Alpha 0.9
+DORMANT
+NOTIMEFREEZE
+NOINTERACTION
var int user_friendTID;
States
	{
	Spawn:
		FMRK A 1 Bright ACS_ExecuteAlways(22334, 0, user_friendTID)
		Loop
	Death:
		TNT1 A 1
		Stop
	}
}

ACTOR NecroDMG
{
RenderStyle Translucent
DefaultAlpha
+NOCLIP
+NOGRAVITY
+NOBLOCKMAP
+NOTELEPORT
+DONTSPLASH
States
	{
	Spawn:
		TNT1 A 0 Bright
		HFIR ABCDEFGH 3 Bright
		Stop
	}
}