Actor CrownedOne
{ 
	Health 1500
	Radius 48
	Height 64
	Mass 1536
	Speed 12
	PainChance 36
	Monster
	Scale 1.15
	SeeSound "Abomination/See"
	PainSound "Abomination/Pain"
	DeathSound "Abomination/Die"
	ActiveSound "Abomination/Act"
	PainChance "SoulToxic", 30
	PainChance "FiendFire", 30
	DamageFactor "BeheComet", 0.0
	DamageFactor "FatFlamer", 0.0
	DropItem "BossLifeEssence" 250
	DropItem "BossArmorBonusMax" 250
	DropItem "BossLifeEssence" 180
	DropItem "BossArmorBonusMax" 180
	DropItem "DemonAmmoBox" 128 200
	DropItem "HellstormBFG" 50
	Species "Fatsos"
	+DONTHURTSPECIES
	+DONTRIP
	+DONTBLAST
	Obituary "%o was dethroned by a Crowned One."
    Tag "\c[e8]Crowned One\c-"
	States 
	{
	Spawn:
		HFAT AB 15 A_Look
		Loop
	See:
		HFAT AABBCCDDEEFF 4 A_Chase
		Loop
	Pain:
		HFAT J 3 A_Jump(32,"Teleport")
		HFAT J 3 A_Pain
		Goto See
	Missile:
		TNT1 A 0 A_PlaySound("Abomination/Attack")
		TNT1 A 0 A_PlaySound("weapons/Hcharge10k",7)
		HFAT GGGGGGG 5 A_FaceTarget
		TNT1 A 0 A_PlaySound("weapons/Hbfg10kfire",6)
		HFAT H 4 A_CustomMissile("HSBFG10kShotCrowned", 30, 30)
		TNT1 A 0 A_PlaySound("weapons/Hbfg10kfire",6)
		HFAT H 4 A_CustomMissile("HSBFG10kShotCrowned", 30, -30)
		HFAT IG 5 A_FaceTarget
		TNT1 A 0 A_PlaySound("weapons/Hbfg10kfire",6)
		HFAT H 4 A_CustomMissile("HSBFG10kShotCrowned", 30, 30)
		TNT1 A 0 A_PlaySound("weapons/Hbfg10kfire",6)
		HFAT H 4 A_CustomMissile("HSBFG10kShotCrowned", 30, -30)
		HFAT IG 5 A_FaceTarget
		TNT1 A 0 A_PlaySound("weapons/Hbfg10kfire",6)
		HFAT H 4 A_CustomMissile("HSBFG10kShotCrowned", 30, 30)
		TNT1 A 0 A_PlaySound("weapons/Hbfg10kfire",6)
		HFAT H 4 A_CustomMissile("HSBFG10kShotCrowned", 30, -30)
		HFAT I 5 A_FaceTarget
		HFAT G 35 A_PlaySound("weapons/Hbfg10kcooldown",7)
		TNT1 A 0 A_Jump(128,"Coronation")
		TNT1 A 0 A_Jump(192,"Teleport")
		TNT1 A 0 A_PlaySound("Abomination/Attack")
		TNT1 A 0 A_PlaySound("weapons/Hcharge10k",7)
		HFAT GGGGGGG 5 A_FaceTarget
		TNT1 A 0 A_PlaySound("weapons/Hbfg10kfire",6)
		HFAT H 4 A_CustomMissile("HSBFG10kShotCrowned", 30, 30)
		TNT1 A 0 A_PlaySound("weapons/Hbfg10kfire",6)
		HFAT H 4 A_CustomMissile("HSBFG10kShotCrowned", 30, -30)
		HFAT IG 5 A_FaceTarget
		TNT1 A 0 A_PlaySound("weapons/Hbfg10kfire",6)
		HFAT H 4 A_CustomMissile("HSBFG10kShotCrowned", 30, 30)
		TNT1 A 0 A_PlaySound("weapons/Hbfg10kfire",6)
		HFAT H 4 A_CustomMissile("HSBFG10kShotCrowned", 30, -30)
		HFAT IG 5 A_FaceTarget
		TNT1 A 0 A_PlaySound("weapons/Hbfg10kfire",6)
		HFAT H 4 A_CustomMissile("HSBFG10kShotCrowned", 30, 30)
		TNT1 A 0 A_PlaySound("weapons/Hbfg10kfire",6)
		HFAT H 4 A_CustomMissile("HSBFG10kShotCrowned", 30, -30)
		HFAT I 5 A_FaceTarget
		HFAT G 35 A_PlaySound("weapons/Hbfg10kcooldown",7)
		TNT1 A 0 A_Jump(128,"Coronation")
		TNT1 A 0 A_Jump(192,"Teleport")
		TNT1 A 0 A_PlaySound("Abomination/Attack")
		TNT1 A 0 A_PlaySound("weapons/Hcharge10k",7)
		HFAT GGGGGGG 5 A_FaceTarget
		TNT1 A 0 A_PlaySound("weapons/Hbfg10kfire",6)
		HFAT H 4 A_CustomMissile("HSBFG10kShotCrowned", 30, 30)
		TNT1 A 0 A_PlaySound("weapons/Hbfg10kfire",6)
		HFAT H 4 A_CustomMissile("HSBFG10kShotCrowned", 30, -30)
		HFAT IG 5 A_FaceTarget
		TNT1 A 0 A_PlaySound("weapons/Hbfg10kfire",6)
		HFAT H 4 A_CustomMissile("HSBFG10kShotCrowned", 30, 30)
		TNT1 A 0 A_PlaySound("weapons/Hbfg10kfire",6)
		HFAT H 4 A_CustomMissile("HSBFG10kShotCrowned", 30, -30)
		HFAT IG 5 A_FaceTarget
		TNT1 A 0 A_PlaySound("weapons/Hbfg10kfire",6)
		HFAT H 4 A_CustomMissile("HSBFG10kShotCrowned", 30, 30)
		TNT1 A 0 A_PlaySound("weapons/Hbfg10kfire",6)
		HFAT H 4 A_CustomMissile("HSBFG10kShotCrowned", 30, -30)
		HFAT I 5 A_FaceTarget
		HFAT G 35 A_PlaySound("weapons/Hbfg10kcooldown",7)
		TNT1 A 0 A_Jump(128,"Coronation")
		TNT1 A 0 A_Jump(192,"Teleport")
		Goto See
	Teleport:
		TNT1 A 0 A_UnSetShootable
		HFAT JJJJJJJJJJ 1 A_FadeOut(0.1,0)
		HFAT AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA 0 A_Wander
		HFAT AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA 0 A_Wander
		TNT1 A 0 A_PlayWeaponSound("boss/teleport")
		HFAT JJJJJJJJJJ 1 A_FadeIn(0.1)
		TNT1 A 0 Bright A_SetShootable		
		Goto See
	Coronation:
		HFAT A 0 A_SetInvulnerable
		HFAT A 1 Bright A_UnSetShootable
		HFAT A 15
		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 10 A_FadeIn(0.1)
		HFAT A 0 A_UnsetInvulnerable
		HFAT A 1 Bright A_SetShootable
		TNT1 A 0 A_Jump(64,"Coronation")
		Goto Teleport
	Death:
		DA7D ABCED 4
		DA7D F 1 A_Scream
		DA7D G 1 A_SpawnItemEx("GibbedGenerator",0,0,0,0,0,0,0,128,0)
		DA7D H 1 A_NoBlocking
		DA7D I 1 
		DA7D I -1 A_KillMaster
		Stop
	Raise:
		DA7D IHGFEDCBA 4
		Goto See
   }
}