
ACTOR RLChaingunGuyBase : RLMonster
{
  Health 70
  Radius 20
  Height 56
  Speed 8
  Mass 100
  
  PainChance 170
  
  DamageFactor "Purifying", 2.0 // Final Doomer Damagetype
  DamageFactor "Exorcist", 3.0 // LegenDoom Damagetype
  
  SeeSound "chainguy/sight"
  PainSound "chainguy/pain"
  DeathSound "chainguy/death"
  ActiveSound "chainguy/active"
  
  +AVOIDMELEE
  -DONTHARMSPECIES
  
  Obituary "%o was finished off by a Former Human Commando."
  Species "RLFormerHuman"
  Tag "Former Human Commando"
  
	//Guncaster extras
   
	//Resists & Weaknesses
	DamageFactor UndeadGoHome, 2.0
 
	//Chance Effects
	PainChance Lightning, 192
	PainChance LightningBlue, 24
	PainChance Manuel, 170
	PainChance Fire, 170
  States
  {
  ArsenalMissileCheck:
	"####" "#" 0 A_JumpIf(CallACS("DRLA_specialstarts") == 2, "Duke2LaserAttack")
    "####" "#" 0 A_JumpIfInventory("DRPGShadowAuraToken", 1, "ShadowAuraMissileAttack") // DRPG Shadow Aura
    "####" "#" 0 A_JumpIfInventory("LDLegendaryMonsterTransformed", 1, "LegendaryMissileAttack") // LegenDoom legendary monster
    "####" "#" 0 A_JumpIf(1, "MissileProper")
	Goto MissileProper
  ArsenalRepeatCheck:
	"####" "#" 0 A_JumpIf(CallACS("DRLA_specialstarts") == 2, "Duke2LaserRepeat")
    "####" "#" 0 A_JumpIfInventory("DRPGShadowAuraToken", 1, "ShadowAuraRepeatAttack") // DRPG Shadow Aura
    "####" "#" 0 A_JumpIfInventory("LDLegendaryMonsterTransformed", 1, "LegendaryRepeatAttack") // LegenDoom legendary monster
    "####" "#" 0 A_JumpIf(1, "RepeatProper")
	Goto RepeatProper
//==============================================================================
//					--	GunCaster Compatibility Stuff  --
//==============================================================================

			//Corpseblast
	CorpseBlastA:
		"####" "#" 0 A_SpawnItemEx("ChaingunGuyBlast",0,0,0,0,0,0,0,SXF_TRANSFERPOINTERS)
		Stop
	CorpseBlastB:
		"####" "#" 0 A_SpawnItemEx("ChaingunGuyBlast",0,0,0,0,0,0,0,SXF_TRANSFERPOINTERS)
		"####" "#" 0 A_TakeInventory("CorpseTrigger2",1)
		"####" "#" 0 A_JumpIf(1,"DeathEnd")
		Goto DeathEnd
	CorpseBlastC:
		"####" "#" 0 A_SpawnItemEx("ChaingunGuyBlast",0,0,0,0,0,0,0,SXF_TRANSFERPOINTERS)
		"####" "#" 0 A_TakeInventory("CorpseTrigger2",1)
		"####" "#" 0 A_JumpIf(1,"XDeathEnd")
		Goto XDeathEnd
  }
}
