ACTOR BFGCacodemon 7014
{
	DamageFactor "WeakenerBall" , 0.0
	Health 700
	Radius 24
	Height 44
	Mass 400
	Meleedamage 8
	Speed 10
	PainChance 128
	Monster
	+FLOAT
	+NOGRAVITY
	+MISSILEEVENMORE
	+MISSILEMORE
	+QUICKTORETALIATE
	SeeSound "caco/sight"
	PainSound "caco/pain"
	DeathSound "caco/death"
	ActiveSound "caco/active"
	MeleeSound "caco/melee"
	Obituary "%o was eradicated by a BFG Cacodemon."
	DropItem "BFG9500" 90 1
	DropItem "BossLifeEssence" 150
    DropItem "BossArmorBonusMax" 150
	DropItem "NewCellPack" 255 
	bloodcolor "Purple"
	States
	{
	Spawn:
		BFCD A 10 A_Look
		Loop
	See:
		TNT1 A 0 A_Jump(20,"FastChase")
		BFCD A 3 A_Chase
		TNT1 A 0 A_Jump(62,"Rush")
		Loop
	Rush:
	   TNT1 A 0 A_SpawnItemEx("BFGCacodemonGhostA")	
	   BFCD A 1 A_Chase
	   TNT1 A 0 A_SpawnItemEx("BFGCacodemonGhostA")	
	   BFCD A 1 A_Chase
	   TNT1 A 0 A_SpawnItemEx("BFGCacodemonGhostA")	
	   BFCD A 1 A_Chase
	   TNT1 A 0 A_SpawnItemEx("BFGCacodemonGhostA")	
	   BFCD A 1 A_Chase
	   TNT1 A 0 A_SpawnItemEx("BFGCacodemonGhostA")	
	   BFCD A 1 A_Chase
	   TNT1 A 0 A_SpawnItemEx("BFGCacodemonGhostA")	
	   BFCD A 1 A_Chase
	   TNT1 A 0 A_SpawnItemEx("BFGCacodemonGhostA")	
	   BFCD A 1 A_Chase
	   TNT1 A 0 A_SpawnItemEx("BFGCacodemonGhostA")	
	   BFCD A 1 A_Chase
	   TNT1 A 0 A_Jump(87,"See")
	   Loop
	FastChase:
		 BFCD A 3 A_FastChase
		 BFCD A 3 A_FastChase
		 Goto See
	Missile:
        TNT1 A 0 A_SetShootable
        TNT1 A 0 A_UnsetInvulnerable
        TNT1 A 0 A_SetTranslucent(1)
		TNT1 A 0 A_PlaySound("weapons/bfgf")
		BFCD B 15 A_FaceTarget
		BFCD C 10 Bright A_FaceTarget
		BFCD D 10 Bright A_CustomMissile("CacoBFG9500Ball", 15)
		BFCD CB 15 A_FaceTarget
		Goto See
	Melee:
         BFCD BC 5 A_FaceTarget
		 BFCD D 5 A_MeleeAttack
		 BFCD CB 5 A_FaceTarget
		 Goto See
	Pain:
		BFCD E 3
		BFCD E 3 A_Pain
		BFCD F 6
		Goto See
	Death:
		BFCD G 8
		TNT1 A 0 A_SpawnItemEx("MutantGibbedGenerator",0,0,0,0,0,0,0,128,0)
		BFCD H 8 A_Scream
		BFCD I 8
		BFCD J 8
		BFCD K 8 A_NoBlocking
		BFCD L -1 A_SetFloorClip
		Stop
	}
}

ACTOR BFGCacodemonGhostA
{
Radius 2
Height 2
Speed 0
Alpha 0.85
Scale 1.0
PROJECTILE
RENDERSTYLE Translucent
+CLIENTSIDEONLY
States
{
Spawn:
    TNT1 A 0
    TNT1 A 0 A_JumpIf(ACS_ExecuteWithResult(304) == 1, "Toaster")
Fade:
    TNT1 A 1
	BFCD A 2 A_FadeOut(0.15)
	Goto Fade+1
Toaster:
    TNT1 A 0
    Stop
    }
}

ACTOR CacoBFG9500Ball : BFG9500Ball
{
FastSpeed 30
-THRUSPECIES
DamageType "WeakenerBall"
Decal BFG9500Lightning
}