Actor CrownedOne
{ 
	Health 1775
	Radius 48
	Height 64
	Mass 1536
	Speed 12
	PainChance 36
	Monster
	Scale 1.15
	Species "Infernal"
	SeeSound "Abomination/See"
	PainSound "Abomination/Pain"
	DeathSound "Abomination/Die"
	ActiveSound "Abomination/Act"
	PainChance "SoulToxic", 30
	PainChance "FiendFire", 30
	DamageFactor "HSBFG10KShot", 0.3
	DamageFactor 0.7
	DropItem "BossLifeEssence" 200 1
	DropItem "BossArmorBonusMax" 200 1
	DropItem "NewCellPack" 128
	DropItem "HellstormBFG" 50 
	DropItem "BigHellStorm" 50 
	Species "Infernal"
	+DONTHURTSPECIES
	+DONTRIP
	+DONTBLAST
	Obituary "%o was dethroned by a Crowned One."
	States 
	{
		Spawn:
			TNT1 A 0
			TNT1 A 0 A_SpawnItem("FireburstSpawner",0,0,0,0)
		Idle:
			HFAT AB 15 A_Look
			TNT1 A 0 A_SpawnItem("FireburstSpawner",0,0,0,0)
		Loop
		See:
			HFAT AABBCCDDEEFF 4 A_Chase
			TNT1 A 0 A_SpawnItem("FireburstSpawner",0,0,0,0)
		Loop
		Pain:
			HFAT J 3 A_Jump(128,"Teleport")
			HFAT J 3 A_Pain
		Goto See
		Missile:
			HFAT G 0 A_PlaySound("Abomination/Attack")
			TNT1 A 0 A_SpawnItem("FireburstSpawner",0,0,0,0)
			HFAT G 20 A_FaceTarget
			HFAT H 4 A_CustomMissile("HSBFG10KShot", 30, 30)
			TNT1 A 0 A_CustomMissile("HSBFG10KShot", 30, -30)
			HFAT G 8 A_PlaySound("weapons/Hbfg10kfire")
			HFAT G 0 A_PlaySound("Abomination/Attack")
			HFAT G 4 A_PlaySound("weapons/Hbfg10kfire")
			TNT1 A 0 A_SpawnItem("FireburstSpawner",0,0,0,0)
			HFAT IG 5 A_FaceTarget
			HFAT H 4 A_CustomMissile("HSBFG10KShot", 30, 30)
			TNT1 A 0 A_CustomMissile("HSBFG10KShot", 30, -30)
			HFAT G 8 A_PlaySound("weapons/Hbfg10kfire")
			HFAT G 0 A_PlaySound("Abomination/Attack")
			HFAT G 4 A_PlaySound("weapons/Hbfg10kfire")
			TNT1 A 0 A_SpawnItem("FireburstSpawner",0,0,0,0)
			HFAT IG 5 A_FaceTarget
			HFAT H 4 A_CustomMissile("HSBFG10KShot", 30, 30)
			TNT1 A 0 A_CustomMissile("HSBFG10KShot", 30, -30)
			HFAT G 8 A_PlaySound("weapons/Hbfg10kfire")
			HFAT G 0 A_PlaySound("Abomination/Attack")
			HFAT G 4 A_PlaySound("weapons/Hbfg10kfire")
			TNT1 A 0 A_SpawnItem("FireburstSpawner",0,0,0,0)
			HFAT IG 5 A_FaceTarget
			TNT1 A 0 A_Jump(128,"Coronation")
			TNT1 A 0 A_Jump(192,"Teleport")
			HFAT G 0 A_PlaySound("Abomination/Attack")
			TNT1 A 0 A_SpawnItem("FireburstSpawner",0,0,0,0)
			HFAT G 20 A_FaceTarget
			HFAT H 4 A_CustomMissile("HSBFG10KShot", 30, 30)
			TNT1 A 0 A_CustomMissile("HSBFG10KShot", 30, -30)
			HFAT G 8 A_PlaySound("weapons/Hbfg10kfire")
			HFAT G 0 A_PlaySound("Abomination/Attack")
			HFAT G 4 A_PlaySound("weapons/Hbfg10kfire")
			TNT1 A 0 A_SpawnItem("FireburstSpawner",0,0,0,0)
			HFAT IG 5 A_FaceTarget
			HFAT H 4 A_CustomMissile("HSBFG10KShot", 30, 30)
			TNT1 A 0 A_CustomMissile("HSBFG10KShot", 30, -30)
			HFAT G 8 A_PlaySound("weapons/Hbfg10kfire")
			HFAT G 0 A_PlaySound("Abomination/Attack")
			HFAT G 4 A_PlaySound("weapons/Hbfg10kfire")
			TNT1 A 0 A_SpawnItem("FireburstSpawner",0,0,0,0)
			HFAT IG 5 A_FaceTarget
			HFAT H 4 A_CustomMissile("HSBFG10KShot", 30, 30)
			TNT1 A 0 A_CustomMissile("HSBFG10KShot", 30, -30)
			HFAT G 8 A_PlaySound("weapons/Hbfg10kfire")
			HFAT G 0 A_PlaySound("Abomination/Attack")
			HFAT G 4 A_PlaySound("weapons/Hbfg10kfire")
			TNT1 A 0 A_SpawnItem("FireburstSpawner",0,0,0,0)
			HFAT IG 5 A_FaceTarget
			TNT1 A 0 A_Jump(128,"Coronation")
			TNT1 A 0 A_Jump(192,"Teleport")
			HFAT G 0 A_PlaySound("Abomination/Attack")
			TNT1 A 0 A_SpawnItem("FireburstSpawner",0,0,0,0)
			HFAT G 20 A_FaceTarget
			HFAT H 4 A_CustomMissile("HSBFG10KShot", 30, 30)
			TNT1 A 0 A_CustomMissile("HSBFG10KShot", 30, -30)
			HFAT G 8 A_PlaySound("weapons/Hbfg10kfire")
			HFAT G 0 A_PlaySound("Abomination/Attack")
			HFAT G 4 A_PlaySound("weapons/Hbfg10kfire")
			TNT1 A 0 A_SpawnItem("FireburstSpawner",0,0,0,0)
			HFAT IG 5 A_FaceTarget
			HFAT H 4 A_CustomMissile("HSBFG10KShot", 30, 30)
			TNT1 A 0 A_CustomMissile("HSBFG10KShot", 30, -30)
			HFAT G 8 A_PlaySound("weapons/Hbfg10kfire")
			HFAT G 0 A_PlaySound("Abomination/Attack")
			HFAT G 4 A_PlaySound("weapons/Hbfg10kfire")
			TNT1 A 0 A_SpawnItem("FireburstSpawner",0,0,0,0)
			HFAT IG 5 A_FaceTarget
			HFAT H 4 A_CustomMissile("HSBFG10KShot", 30, 30)
			TNT1 A 0 A_CustomMissile("HSBFG10KShot", 30, -30)
			HFAT G 8 A_PlaySound("weapons/Hbfg10kfire")
			HFAT G 0 A_PlaySound("Abomination/Attack")
			HFAT G 4 A_PlaySound("weapons/Hbfg10kfire")
			TNT1 A 0 A_SpawnItem("FireburstSpawner",0,0,0,0)
			HFAT IG 5 A_FaceTarget
			TNT1 A 0 A_Jump(128,"Coronation")
			TNT1 A 0 A_Jump(192,"Teleport")
			Goto See
		Teleport:
			HFAT A 1 Bright A_UnSetShootable
			HFAT AABB 0 A_SpawnItem("FireburstSpawner",0,0,0,0)
			HFAT CCDD 4 A_FaceTarget
			HFAT EEFF 1  A_FadeOut(0.1,0)
			HFAT AAAA 0 A_SpawnItem("FireburstSpawner",0,0,0,0)
			HFAT A 2 
			HFAT ABBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB 0 A_Wander
			HFAT BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB 0 A_Wander
			HFAT A 1 A_PlayWeaponSound("boss/teleport")
			HFAT AABB 0 A_SpawnItem("FireburstSpawner",0,0,0,0)
			HFAT AABBCCDDEEFF 1 A_FadeIn(0.1)
			HFAT AA 4 A_FaceTarget
			TNT1 A 0 A_SpawnItem("FireburstSpawner",0,0,0,0)
			HFAT A 1 Bright A_SetShootable		
			Goto See
		Coronation:
			HFAT A 0 A_SetInvulnerable
			HFAT A 1 Bright A_UnSetShootable
			HFAT A 15 A_SpawnItem("FireburstSpawner",0,0,0,0)
			HFAT A 0 A_FaceTarget
			HFAT A 0 Bright A_CustomMissile("HellbornFireSpawner", 32, 0, 5)
			HFAT A 2 Bright A_CustomMissile("HellbornFireSpawner", 32, 0, -5)
			HFAT A 0 Bright A_CustomMissile("HellbornFireSpawner", 32, 0, 15)
			HFAT A 2 Bright A_CustomMissile("HellbornFireSpawner", 32, 0, -15)
			HFAT A 0 Bright A_CustomMissile("HellbornFireSpawner", 32, 0, 25)
			HFAT A 2 Bright A_CustomMissile("HellbornFireSpawner", 32, 0, -25)
			HFAT A 0 Bright A_CustomMissile("HellbornFireSpawner", 32, 0, 35)
			HFAT A 2 Bright A_CustomMissile("HellbornFireSpawner", 32, 0, -35)
			HFAT A 0 A_SpawnItem("FireburstSpawner",0,0,0,0)
			HFAT A 10 A_FadeIn(0.1)
			HFAT A 0 A_UnsetInvulnerable
			HFAT A 1 Bright A_SetShootable
			TNT1 A 0 A_Jump(64,"Coronation")
			TNT1 A 0 A_Jump(256,"Teleport")
		Death:
			DA7D ABCED 4
			DA7D F 1 
			DA7D G 1 
			DA7D H 1 
			DA7D I 1 
			DA7D I -1
		Stop
		Raise:
			DA7D IHGFEDCBA 4
		Goto See
   }
}

ACTOR HellClouds : DaedabusChemSpray
{ 
	Scale 0.6
	Speed 14
	Species "Infernal"
	DamageType "Infernal"
	+DONTHURTSPECIES
	States 
    { 
    Spawn:
        DGAS ABCDEFGDFEG 3 A_Explode(2,68)
    Death: 
		DGAS CCBBAA 1 A_FadeOut(0.15)
        Stop 
		} 
}

Actor BigHellStorm
{
  Speed 20
  Projectile
  radius 4
  height 4
  Damage 2
  +Ripper
  +DoomBounce
  +SeekerMissile
  +DONTHURTSPECIES
  BounceCount 2
  ReactionTime 720
  DamageType "Infernal"
  States
  {
  Spawn:
    TNT1 A 0
    TNT1 A 0 A_CountDown
    TNT1 A 0 A_PlaySoundEx("sandstorm/loop","SoundSlot7",1)
    TNT1 A 0 A_SeekerMissile(30,30,SMF_LOOK)
    TNT1 A 0 A_Explode(5,128,0)
    TNT1 A 2 A_SpawnItemEx("BigHellClouds",0,0,0,random(-4,4),random(-4,4),random(-2,2))
    Loop
  Dearh:
    TNT1 A 0
    TNT1 A 2 A_StopSoundEx("SoundSlot7")
    Stop
  }
}

ACTOR BigHellClouds : HellClouds
{ 
Scale 1.75
Speed 14
Species "Infernal"
DamageType "InfernalComet"
}
