
actor ArmorCaptain : livingarmor
{
    Radius 20
    Height 56
    PainChance 130
 	Painchance "BarrelGrab", 0
	Species "LivingArmor"
	Mass 800
    MeleeRange 80
	Meleethreshold 250
    Speed 14
    Scale 0.95
	bloodtype captainarmorblood
    Monster
    +FLOORCLIP
	+noblooddecals
	translation "128:143=192:199", "144:159=192:207", "64:79=194:206", "232:239=201:207", "160:167=192:196"
	SeeSound "livingarmor/sight"
    PainSound "livingarmor/pain"
    DeathSound "livingarmor/death"
    Obituary "%o has been struck down by a living armor captain."
	HitObituary "%o has been struck down by a living armor captain."
	dropitem "lilchest" 7
    States
    {
    Spawn:
		KNGT E 5 A_Look
		Loop
    See:
		KNGT AA 2 fast A_Chase
		TNT1 A 0 A_playsound ("livingarmor/step", 7, 1, 0, 2.5)
		KNGT BB 2 fast A_chase
		KNGT CC 2 fast A_chase
		TNT1 A 0 A_playsound ("livingarmor/step", 7, 1, 0, 2.5)
		KNGT DD 2 fast A_chase
		TNT1 A 0 a_jump (30,"Sprint")
		Loop
	Sprint:
		KNGT A 1 a_jumpifcloser (250, "see")
		KNGT A 2 a_facetarget
		KNGT A 2 a_facetarget
		KNGT A 2 a_facetarget
		KNGT A 2 a_facetarget
		KNGT AA 2
		TNT1 A 0 A_playsound ("livingarmor/step", 7, 1, 0, 2.5)
		KNGT BB 2
		KNGT CC 2
		TNT1 A 0 A_playsound ("livingarmor/step", 7, 1, 0, 2.5)
		KNGT DD 2
		KNGT A 2
		TNT1 A 0 A_playsound ("livingarmor/step", 7, 1, 0, 2.5)
		KNGT B 2
		KNGT C 2
		TNT1 A 0 A_playsound ("livingarmor/step", 7, 1, 0, 2.5)
		KNGT D 2

		KNGT A 1 fast a_chase ("Melee","")
		TNT1 A 0 A_facetarget
		TNT1 A 0 A_playsound ("livingarmor/step", 7, 1, 0, 2.5)
		TNT1 A 0 ThrustThing(angle*256/360, 3, 0, 0)
		KNGT B 1 fast a_chase ("Melee","")
		TNT1 A 0 A_facetarget
		TNT1 A 0 ThrustThing(angle*256/360, 3, 0, 0)
		KNGT C 1 fast a_chase ("Melee","")
		TNT1 A 0 A_facetarget
		TNT1 A 0 A_playsound ("livingarmor/step", 7, 1, 0, 2.5)
		TNT1 A 0 ThrustThing(angle*256/360, 3, 0, 0)
		KNGT D 1 fast a_chase ("Melee","")
		TNT1 A 0 A_facetarget
		TNT1 A 0 ThrustThing(angle*256/360, 3, 0, 0)
		KNGT A 1 fast a_chase ("Melee","")
		TNT1 A 0 A_facetarget
		TNT1 A 0 A_playsound ("livingarmor/step", 7, 1, 0, 2.5)
		TNT1 A 0 ThrustThing(angle*256/360, 3, 0, 0)
		KNGT B 1 fast a_chase ("Melee","")
		TNT1 A 0 A_facetarget
		TNT1 A 0 ThrustThing(angle*256/360, 3, 0, 0)
		KNGT C 1 fast a_chase ("Melee","")
		TNT1 A 0 A_facetarget
		TNT1 A 0 A_playsound ("livingarmor/step", 7, 1, 0, 2.5)
		TNT1 A 0 ThrustThing(angle*256/360, 3, 0, 0)
		KNGT D 1 fast a_chase ("Melee","")
		TNT1 A 0 A_facetarget
		TNT1 A 0 ThrustThing(angle*256/360, 3, 0, 0)
		KNGT A 1 fast a_chase ("Melee","")
		TNT1 A 0 A_facetarget
		TNT1 A 0 A_playsound ("livingarmor/step", 7, 1, 0, 2.5)
		TNT1 A 0 ThrustThing(angle*256/360, 3, 0, 0)
		KNGT B 1 fast a_chase ("Melee","")
		TNT1 A 0 A_facetarget
		TNT1 A 0 ThrustThing(angle*256/360, 3, 0, 0)
		KNGT C 1 fast a_chase ("Melee","")
		TNT1 A 0 A_facetarget
		TNT1 A 0 A_playsound ("livingarmor/step", 7, 1, 0, 2.5)
		TNT1 A 0 ThrustThing(angle*256/360, 3, 0, 0)
		KNGT D 1 fast a_chase ("Melee","")

		KNGT A 1 fast a_chase ("Melee","")
		TNT1 A 0 A_facetarget
		TNT1 A 0 A_playsound ("livingarmor/step", 7, 1, 0, 2.5)
		TNT1 A 0 ThrustThing(angle*256/360, 3, 0, 0)
		KNGT B 1 fast a_chase ("Melee","")
		TNT1 A 0 A_facetarget
		TNT1 A 0 ThrustThing(angle*256/360, 3, 0, 0)
		KNGT C 1 fast a_chase ("Melee","")
		TNT1 A 0 A_facetarget
		TNT1 A 0 A_playsound ("livingarmor/step", 7, 1, 0, 2.5)
		TNT1 A 0 ThrustThing(angle*256/360, 3, 0, 0)
		KNGT D 1 fast a_chase ("Melee","")
		TNT1 A 0 A_facetarget
		TNT1 A 0 ThrustThing(angle*256/360, 3, 0, 0)
		KNGT A 1 fast a_chase ("Melee","")
		TNT1 A 0 A_facetarget
		TNT1 A 0 A_playsound ("livingarmor/step", 7, 1, 0, 2.5)
		TNT1 A 0 ThrustThing(angle*256/360, 3, 0, 0)
		KNGT B 1 fast a_chase ("Melee","")
		TNT1 A 0 A_facetarget
		TNT1 A 0 ThrustThing(angle*256/360, 3, 0, 0)
		KNGT C 1 fast a_chase ("Melee","")
		TNT1 A 0 A_facetarget
		TNT1 A 0 A_playsound ("livingarmor/step", 7, 1, 0, 2.5)
		TNT1 A 0 ThrustThing(angle*256/360, 3, 0, 0)
		KNGT D 1 fast a_chase ("Melee","")
		TNT1 A 0 A_facetarget
		TNT1 A 0 ThrustThing(angle*256/360, 3, 0, 0)
		KNGT A 1 fast a_chase ("Melee","")
		TNT1 A 0 A_facetarget
		TNT1 A 0 A_playsound ("livingarmor/step", 7, 1, 0, 2.5)
		TNT1 A 0 ThrustThing(angle*256/360, 3, 0, 0)
		KNGT B 1 fast a_chase ("Melee","")
		TNT1 A 0 A_facetarget
		TNT1 A 0 ThrustThing(angle*256/360, 3, 0, 0)
		KNGT C 1 fast a_chase ("Melee","")
		TNT1 A 0 A_facetarget
		TNT1 A 0 A_playsound ("livingarmor/step", 7, 1, 0, 2.5)
		TNT1 A 0 ThrustThing(angle*256/360, 3, 0, 0)
		KNGT D 1 fast a_chase ("Melee","")

		goto see
    Melee:
		TNT1 A 0 a_playsound ("livingarmor/warn",0)
		KNGT E 3 A_FaceTarget 
		KNGT F 2 A_FaceTarget
		TNT1 A 0 a_playsound ("livingarmor/grunt",0)
		KNGT FGH 3
		KNGT I 3 a_custommeleeattack (20, "mace/hit","livingarmor/attack", "POWdrainer")
		KNGT J 4
		KNGT E 2
		Goto See
		
   Death:
		KNGT K 6 A_Scream
		KNGT LM 3
		TNT1 A 0 a_playsound ("Livingarmor/fall",0)
		KNGT NO 5
		KNGT R 1 A_NoBlocking
		TNT1 A 0 a_jump (6,"DarkPortal")
		KNGT R -1
		Stop
	DarkPortal:
		TNT1 A 0
		KNGT R random(50,180) 
		TNT1 A 0 a_playsound ("Darkportal/form",0)
		KNGT R 3 Thing_SetTranslation(0, 4242)
		HWRP ABCD 1
		TNT1 A 1 a_spawnitemex ("WeakPortal")
		stop		
	Xdeath:
		TNT1 A 1 a_fall
		TNT1 A 0 a_scream
		TNT1 AAAAAAAAAA 0 a_spawnitemex ("captainarmorblood",0,0,0,random(-15,15),random(-15,15),15) 
		TNT1 A 0 a_spawnitemex ("armorexplode",0,0,30)
		TNT1 A 0 a_spawnitemex ("captainarmorgib1",0,0,0,random(-15,15),random(-15,15),15) 
		TNT1 AA 0 a_spawnitemex ("captainarmorgib2",0,0,0,random(-15,15),random(-15,15),15) 
		TNT1 AA 0 a_spawnitemex ("captainarmorgib3",0,0,0,random(-15,15),random(-15,15),15) 
		TNT1 A 0 a_spawnitemex ("captainarmorgib4",0,0,0,random(-15,15),random(-15,15),15) 
		TNT1 AA 0 a_spawnitemex ("captainarmorgib5",0,0,0,random(-15,15),random(-15,15),15) 
		TNT1 AA 0 a_spawnitemex ("captainarmorgib6",0,0,0,random(-15,15),random(-15,15),15)
		TNT1 A 0 thrustthingz (0,30,0,1)
		TNT1 A 0 ThrustThing(angle*256/360+128, 4, 0, 0)		
		LGB4 ABCD 3
		TNT1 A 0 a_jump (6, "GibbedDarkPortal")
		LGB4 A -1
		stop
	GibbedDarkPortal:
		TNT1 A 0
		LGB4 A random(50,180) 
		TNT1 A 0 a_playsound ("Darkportal/form",0)
		LGB4 A 3 Thing_SetTranslation(0, 4242)
		HWRP ABCD 1
		TNT1 A 1 a_spawnitemex ("WeakPortal")
		stop		
   }
}
