ACTOR Arachnotron1: Arachnotron replaces Arachnotron
{
	Monster
    GibHealth 20
	Radius 64
	Height 55

	Damagefactor "Avoid", 0.0	Damagefactor "BHFTOnBarrel", 0.0	Damagefactor "Blood", 0.0
	Damagefactor "CancelTeleportFog", 0.0	Damagefactor "CauseWaterSplash", 0.0	DamageFactor "Crush", 7.0
	Damagefactor "GibRemoving", 0.0	Damagefactor "HangingHook", 0.0
	Damagefactor "Head", 0.0	Damagefactor "PussyGrab", 0.0	Damagefactor "Repair", 0.0
	Damagefactor "RevenantHitStomach", 0.0	Damagefactor "SpawnMarine", 0.0	Damagefactor "Stealth", 0.0
	Damagefactor "TeleportRemover", 0.0	Damagefactor "Use", 0.0	Damagefactor "ExtremePunches", 2.5
	Damagefactor "Fatality", 2.5	Damagefactor "HeadKick", 0.5	Damagefactor "HelperMarineFatallity", 2.5
	Damagefactor "Kick", 0.5	Damagefactor "Slide", 0.5
	Damagefactor "Melee", 0.5	Damagefactor "MonsterKnocked", 0.5	Damagefactor "Stomp", 0.5
	Damagefactor "Trample", 0.5	Damagefactor "Slide", 0.5	Damagefactor "SSG", 2.5
	DamageFactor "TankWeakSpot", 0.0

	PainChance "Head", 255	PainChance "Taunt", 255	PainChance "Extremepunches", 16
	PainChance "Fatality", 16	PainChance "HelperMarineFatallity", 16	PainChance "Kick", 16
	PainChance "LowKick", 16	PainChance "Melee", 16	PainChance "MonsterKnocked", 16
	PainChance "Slide", 16	PainChance "Trample", 16

	SeeSound "baby/sight"
	PainSound "SPIPAIN2"
	DeathSound "baby/death"
	ActiveSound "baby/active"
	Obituary "$OB_BABY"
    BloodType "ArachnotronBlood", "ArachnotronSawBlood", "ArachnotronBlood"
	MaxStepHeight 24
	DropItem "CellSpawner", 16
	MaxDropOffHeight 32
	Speed 4
	Species "Arachnotron"
    Scale 1.1
	Health 750
	DeathHeight 4
	BurnHeight 0
	Tag "Arachnotron"
	States
	{
	Death.KillMe:
	Death.Taunt:
		Goto Death

	Spawn:
		BSPI A 0
		TNT1 A 0 ACS_NamedExecuteAlways("BDCheckStuff")//Check if new monsters are disabled
		BSPI A 2
		TNT1 A 0 ACS_NamedExecuteAlways("BDCHeckClassicMonsters", 0, 0, 0, 0)//Check if Vanilla Mode is activated
		BSPI A 2
		TNT1 A 0 A_RadiusGive("SlaughterToken", 128, RGF_GIVESELF | RGF_MONSTERS |RGF_CUBE | RGF_NOSIGHT, 1)
		BSPI A 2
		TNT1 A 0 A_JumpIfInventory("nonewenemies", 1, "Stand")
		TNT1 A 0 A_JumpIfInventory("SlaughterToken",15,"ReplaceVanilla")
		TNT1 A 0 A_Jump(4, "ReplaceSpiders2")
		Goto Stand

	ReplaceVanilla:
		TNT1 A 0 A_ChangeFlag("COUNTKILL", 0)
		TNT1 A 2 A_ChangeFlag("NOINTERACTION", 1)
		TNT1 A 0 A_SpawnItemEx("VanillaArachnotron",0,0,0,0,0,0,0,SXF_NOCHECKPOSITION | SXF_TRANSFERAMBUSHFLAG,0, tid)
		TNT1 A 2 ACS_NamedExecuteAlways("Tag667VArachnotron", 0, 0, 0, 0)
		TNT1 A -1
		Stop

	ReplaceSpiders2:
		TNT1 A 0
		TNT1 A 0 A_JumpIf((CeilingZ - FloorZ) < 73,"Stand")
		TNT1 A 0 A_ChangeFlag("COUNTKILL", 0)
		TNT1 A 2 A_ChangeFlag("NOINTERACTION", 1)
		TNT1 A 0 A_SpawnItemEx("Arachnotron2",0,0,0,0,0,0,0,SXF_NOCHECKPOSITION | SXF_TRANSFERAMBUSHFLAG,0, tid)
		TNT1 A 2 ACS_NamedExecuteAlways("Tag667Arachnotron2", 0, 0, 0, 0)
		TNT1 A -1
		Stop

	Special667:
		TNT1 A 0
		TNT1 A 2 A_Die("Vanish")
	Death.Vanish:
		TNT1 A 35
		TNT1 A -1 A_BossDeath
		Stop

	Stand:
		BSPI A 13 A_Look
		Loop
	Pain.Killme:
	Pain.Taunt:
		TNT1 A 0
		TNT1 A 0 HealThing(2)
		Goto Missile
	See:
	See2:
		BSPI A 20 A_FaceTarget
		TNT1 A 0 A_PlaySound("baby/walk", 1)
		BSPI AAABBBCCCDDDEEEFFF 1 A_Chase
		Goto See+1

	SeeNeverSeen:
		TNT1 A 0 A_PlaySound("baby/walk", 1)
		BSPI AAABBBCCCDDDEEEFFF 1 A_Chase
		Loop

	SearchPlayer:
	Idle:
		BSPI AA 10 A_Look
		TNT1 A 0 A_SetAngle(angle - 40)
		BSPI AA 10 A_Look
		TNT1 A 0 A_SetAngle(angle + 40)
		BSPI AA 10 A_Look

		BSPI A 0 A_PlaySound("baby/walk", 1)
		BSPI AAABBBCCCDDDEEEFFF 1 A_Wander
		BSPI A 3 A_Look

		BSPI A 0 A_PlaySound("baby/walk", 1)
		BSPI AAABBBCCCDDDEEEFFF 1 A_Wander
		BSPI A 3 A_Look

		BSPI A 0 A_PlaySound("baby/walk", 1)
		BSPI AAABBBCCCDDDEEEFFF 1 A_Wander
		BSPI A 3 A_Look

		BSPI A 0 A_PlaySound("baby/walk", 1)
		BSPI AAABBBCCCDDDEEEFFF 1 A_Wander
		BSPI A 3 A_Look

		TNT1 A 0 A_Jump(128, "SearchPlayer")

		BSPI A 0 A_PlaySound("baby/walk", 1)
		BSPI AAABBBCCCDDDEEEFFF 1 A_Wander
		BSPI A 3 A_Look

		BSPI A 0 A_PlaySound("baby/walk", 1)
		BSPI AAABBBCCCDDDEEEFFF 1 A_Wander
		BSPI A 3 A_Look

		BSPI A 0 A_PlaySound("baby/walk", 1)
		BSPI AAABBBCCCDDDEEEFFF 1 A_Wander
		BSPI A 3 A_Look

		BSPI A 0 A_PlaySound("baby/walk", 1)
		BSPI AAABBBCCCDDDEEEFFF 1 A_Wander
		BSPI A 3 A_Look
		Goto Stand

	Missile:
		BSPI A 20 A_FaceTarget
		BSPI G 6
		BSPI H 2 A_CustomMissile("EnemyPlasmaBall",25,0,0,0)
		TNT1 A 0 A_CustomMissile("Alerter",25)
		BSPI H 1 A_FaceTarget
		BSPI G 6
		BSPI H 2 A_CustomMissile("EnemyPlasmaBall",25,0,0,0)
		TNT1 A 0 A_CustomMissile("Alerter",25)
		BSPI H 1 A_FaceTarget
		BSPI G 6
		BSPI H 2 A_CustomMissile("EnemyPlasmaBall",25,0,0,0)
		TNT1 A 0 A_CustomMissile("Alerter",25)
		BSPI H 1 A_FaceTarget
		BSPI G 6
		BSPI H 2 A_CustomMissile("EnemyPlasmaBall",25,0,0,0)
		TNT1 A 0 A_CustomMissile("Alerter",25)
		BSPI H 1 A_FaceTarget
		BSPI G 6
		BSPI H 2 A_CustomMissile("EnemyPlasmaBall",25,0,0,0)
		TNT1 A 0 A_CustomMissile("Alerter",25)
		BSPI H 1 A_SpidRefire
		Goto Missile+1

	Pain:
		BSPI I 3
		BSPI I 3 A_Pain
		TNT1 A 0 A_TakeInventory("ArachnotronChasisLastHit")
		Goto See2

	Pain.Kick:
        TNT1 A 0 A_FaceTarget
		BSPI I 6
		BSPI I 6 A_Pain
		Goto See2
	Death:
		BSPI I 4 A_Scream
		TNT1 A 0 A_JumpIfInventory("ArachnotronChasisHits", 4, "CheckXDeath")
       Goto NormalDeath

	CheckXDeath:
		TNT1 A 0
		TNT1 A 0 A_JumpIfInventory("ArachnotronChasisLastHit", 2, "dEATH.stOMP")
	NormalDeath:
		TNT1 AAAAAAAAA 0 A_CustomMissile ("CeilBloodLauncherLong", 0, 0, random (0, 360), 2, random (50, 130))
		TNT1 AAAA 0 A_CustomMissile ("Guts", 32, 0, random (0, 360), 2, random (0, 160))
		TNT1 AAAAA 0 A_CustomMissile ("SmallBrainPiece", 32, 0, random (0, 360), 2, random (0, 160))
		TNT1 AAAAAAAA 0 A_CustomMissile ("BloodMist", 50, 0, random (0, 360), 2, random (40, 90))
        TNT1 AAA 0 A_CustomMissile ("XDeathSpiderNew1", 42, 0, random (0, 360), 2, random (40, 90))
        TNT1 AA 0 A_CustomMissile ("XDeathSpiderNew2", 42, 0, random (0, 360), 2, random (40, 90))
		TNT1 A 0 A_SpawnItem("BigBloodSpot")
		BSPI K 6
		BSPI LMNO 8
		BSPI P 1 A_NoBlocking
		TNT1 A 0 A_SpawnItem ("GrowingBloodPool")
        TNT1 A 0 A_SpawnItem ("DeadSpider", 1)
	    TNT1 A -1 A_BossDeath
		Stop

	Death.SuperPlasma:
    Death.Plasma: Death.Plasma2:
        TNT1 A 0
        TNT1 A 0 A_Scream
        TNT1 A 0 A_NoBlocking
        TNT1 AAA 0 A_CustomMissile ("Brutal_FlyingBlood", 50, 0, random (0, 360), 2, random (0, 160))
	    TNT1 AA 0 A_CustomMissile ("XDeathBurnedMeat3", 32, 0, random (0, 360), 2, random (0, 160))
		EXPL AAAAAA 0 A_CustomMissile ("ExplosionSmoke", 32, 0, random (0, 360), 2, random (0, 360))
        CARB KKKKKKKKKKKKKKK 7 A_CustomMissile ("PlasmaSmoke", 15, 0, random (0, 360), 2, random (70, 110))
        CARB K -1 A_BossDeath
        Stop

	Death.Fire:
        TNT1 A 0
		TNT1 A 0 A_Scream
        TNT1 A 0 A_NoBlocking
		TNT1 AAA 0 A_CustomMissile ("PEPart2", 32, 0, random (0, 360), 2, random (0, 160))
		BSPI LLLL 2 A_CustomMissile ("FlameTrails", 45, 0, random (0, 360), 2, random (50, 130))
		BSPI MMMM 2 A_CustomMissile ("FlameTrails", 30, 0, random (0, 360), 2, random (50, 130))
		BSPI NNNN 2 A_CustomMissile ("FlameTrails", 25, 0, random (0, 360), 2, random (50, 130))
		BSPI OOOO 2 A_CustomMissile ("FlameTrails", 25, 0, random (0, 360), 2, random (50, 130))
        TNT1 A 0 A_Playsound("props/redfire")
	    CARB KKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKK 2 A_CustomMissile ("FlameTrails", 20, 0, random (0, 360), 2, random (70, 110))
	    CARB KKKKKKKKKK 10 A_CustomMissile ("PlasmaSmoke", 30, 0, random (0, 360), 2, random (70, 110))
		CARB K -1 A_BossDeath
        Stop

    Death.Fatality:
	    TNT1 A 0
		TNT1 A 0 A_Pain
		TNT1 A 0 A_JumpIfIntargetInventory("FistsSelected", 1, 1)
		Goto Death
		TNT1 A 0 A_FaceTarget
		TNT1 A 0 A_SpawnItemEx("Cell", 0, 0, 40, 0, 0, 0, 0, 0, 128)
		TNT1 AA 0 A_SpawnItemEx("HealthCrueltyBonus2", 0, 0, 32, frandom (-2.5, 2.5), frandom (-2.5, 2.5), 5)
		TNT1 AA 0 A_SpawnItemEx("ArmorCrueltyBonus2", 0, 0, 32, frandom (-2.5, 2.5), frandom (-2.5, 2.5), 5)
	    TNT1 A 0 A_Jump(128, "Death.Fatality2")
	    TNT1 A 0 A_GiveToTarget("GoFatality", 1)
	Death.HelperMarineFatallity:
        TNT1 A 0 A_GiveToTarget("ArachnotronFatality", 1)
        TNT1 A -1 A_BossDeath
		Stop
	Death.Fatality2:
		TNT1 A 0 A_GiveToTarget("GoFatality", 1)
        TNT1 A 0 A_GiveToTarget("ArachnotronFatality2", 1)
        TNT1 A -1 A_BossDeath
		Stop

	Death.Stomp:
		TNT1 A 0
		ARXD ABCD 4
	XDeath:
		TNT1 A 0
		TNT1 A 0 A_SpawnItemEx ("DetectFloorCrater",0,0,0,0,0,0,0,SXF_NOCHECKPOSITION,0)
        TNT1 AAA 0 A_CustomMissile ("BDExplosionparticles", 0, 0, random (0, 360), 2, random (40, 90))
		TNT1 AA 0 A_CustomMissile ("BDExplosionparticles2", 0, 0, random (0, 360), 2, random (40, 90))
		TNT1 AA 0 A_CustomMissile ("BDExplosionparticles3", 10, 0, random (0, 360), 2, random (40, 90))
		TNT1 AAA 0 A_CustomMissile ("MediumExplosionFlames", 0, 0, random (0, 360), 2, random (0, 360))
        EXPL A 0 A_CustomMissile ("BigNeoSmoke", 0, 0, random (0, 360), 2, random (0, 360))
		TNT1 A 0 A_SpawnItem ("SplatteredLarge")
		TNT1 A 0 A_NoBlocking
        TNT1 AA 0 A_CustomMissile ("SpiderLeg", 32, 0, random (0, 360), 2, random (0, 160))
        ARXD AAAAAAAAA 0 A_CustomMissile ("CeilBloodLauncherLong", 0, 0, random (0, 360), 2, random (50, 130))
		TNT1 AAAA 0 A_CustomMissile ("Guts", 32, 0, random (0, 360), 2, random (0, 160))
		ARXD IIII 2 A_CustomMissile ("SmallBrainPiece", 32, 0, random (0, 360), 2, random (0, 160))
        ARXD JJJJ 2 A_CustomMissile ("SpiderPart1", 32, 0, random (0, 360), 2, random (0, 160))
        ARXD KKKK 2 A_CustomMissile ("XDeathSpiderNew1", 32, 0, random (0, 360), 2, random (60, 90))
        ARXD AAA 0 A_CustomMissile ("XDeathSpiderNew2", 32, 0, random (0, 360), 2, random (60, 90))
        ARXD AAA 0 A_CustomMissile ("PEPart2", 32, 0, random (0, 360), 2, random (0, 160))
		ARXD LLLL 2 A_CustomMissile ("BloodMistExtraBig", 50, 0, random (0, 360), 2, random (40, 90))
	    ARXD LLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLL 2 A_CustomMissile ("FlameTrails", 20, 0, random (0, 360), 2, random (70, 110))
	    ARXD LLLLLLLLLL 10 A_CustomMissile ("PlasmaSmoke", 30, 0, random (0, 360), 2, random (70, 110))
		ARXD L -1 A_BossDeath
        Stop

	Death.Ice:
	Death.Freeze:
	Death.Frost:
		TNT1 A 0
		TNT1 A 0 A_SpawnItem("FrozenArachnotron")
		TNT1 A -1 A_BossDeath
		Stop

	Death.Massacre:
	Goto Death

	Raise:
	TNT1 A 0 A_SpawnItem("PentagramSpawnerBig")
    BSPI P 5
    BSPI ONMLKJ 5
    Goto See
	}
}

Actor EnemyPlasmaBall : PlasmaBall75 Replaces PlasmaBall2
{
	Damage (random(26,26))
	Speed 30
	-THRUSPECIES
	Species "Arachnotron"
	States
	{
	Death:
		PLSN A 0 A_CustomMissile ("BluePlasmaFire", 0, 0, random (0, 360), 2, random (0, 360))
		TNT1 AAAAA 0 A_CustomMissile ("BluePlasmaParticle", 0, 0, random (0, 360), 2, random (0, 360))
		PLSE ABC 2 BRIGHT A_SpawnItem("BlueFlare")
		PLSE DE 2 Bright A_SpawnItem("BlueFlareSmall")
		TNT2 AAA 9 A_CustomMissile ("PlasmaSmoke", 1, 0, random (0, 360), 2, random (0, 160))
		Stop

	XDeath:
		PLSN A 0 A_CustomMissile ("BluePlasmaFire", 0, 0, random (0, 360), 2, random (0, 360))
		TNT1 AAAAA 0 A_CustomMissile ("BluePlasmaParticle", 0, 0, random (0, 360), 2, random (0, 360))
		PLSE ABC 2 BRIGHT A_SpawnItem("BlueFlare")
		PLSE DE 2 Bright A_SpawnItem("BlueFlareSmall")
		Stop
	}
}

ACTOR EvilPlasmaBall : EnemyPlasmaBall
{
	Species "EvilMarines"
}

Actor DeadSpider: CurbstompedMarine
{
    Scale 1.1
	damagefactor "Crush", 50.0
    Mass 1000
	Radius 32
    Health 100
	+NOBLOOD
    damagefactor "Blood", 0.0
    damagefactor "Trample", 0.0
	States
    {
    Spawn:
		BSPI P -1
        Stop

	Death.Cut:
	Death.Minigun:
    Death:
  	    TNT1 A 0 A_SpawnItemEx ("DetectFloorCrater",0,0,0,0,0,0,0,SXF_NOCHECKPOSITION,0)
        TNT1 AAA 0 A_CustomMissile ("BDExplosionparticles", 0, 0, random (0, 360), 2, random (40, 90))
		TNT1 AA 0 A_CustomMissile ("BDExplosionparticles2", 0, 0, random (0, 360), 2, random (40, 90))
		TNT1 AA 0 A_CustomMissile ("BDExplosionparticles3", 10, 0, random (0, 360), 2, random (40, 90))
		TNT1 AAA 0 A_CustomMissile ("MediumExplosionFlames", 0, 0, random (0, 360), 2, random (0, 360))
        EXPL A 0 A_CustomMissile ("BigNeoSmoke", 0, 0, random (0, 360), 2, random (0, 360))
		TNT1 A 0 A_SpawnItem ("SplatteredLarge")
        TNT1 AA 0 A_CustomMissile ("SpiderLeg", 32, 0, random (0, 360), 2, random (0, 160))
        TNT1 AAAAAAAAA 0 A_CustomMissile ("CeilBloodLauncherLong", 0, 0, random (0, 360), 2, random (50, 130))
		TNT1 AAAA 0 A_CustomMissile ("Guts", 32, 0, random (0, 360), 2, random (0, 160))
		TNT1 AAAAAAAAAA 0 A_CustomMissile ("SmallBrainPiece", 32, 0, random (0, 360), 2, random (0, 160))
        TNT1 AAAAA 0 A_CustomMissile ("SpiderPart1", 32, 0, random (0, 360), 2, random (0, 160))
        TNT1 AA 0 A_CustomMissile ("XDeath5", 32, 0, random (0, 360), 2, random (60, 90))
		TNT1 AA 0 A_CustomMissile ("XDeath6", 32, 0, random (0, 360), 2, random (60, 90))
		TNT1 AAAAAA 0 A_CustomMissile ("BloodMistExtraBig", 50, 0, random (0, 360), 2, random (40, 90))
		Stop

	Raise:
		TNT1 A 0 A_SpawnItem("PentagramSpawnerBig")
		BSPI P 5
		BSPI ONMLKJ 5
		TNT1 A 0 A_Noblocking
		TNT1 A 0 A_SpawnitemEx("Arachnotron1",0,0,0,0,0,0,0,SXF_NOCHECKPOSITION)
		Stop
	}
}

Actor XDeadSpider: DeadSpider
{Scale 1.1
Health 100 States{Spawn:
        ARXD L -1
        Stop
      }}

Actor RapedArachnotron: DeadSpider

{Scale 1.1
Health 100 States{Spawn:
        ARF1 O -1
        Stop
       Death.Cut:        Death.Minigun:	        Death:
  	    		 TNT1 AAA 0 A_CustomMissile ("XDeath1", 5, 0, random (0, 360), 2, random (0, 160))
		 TNT1 AAA 0 A_CustomMissile ("XDeath2", 5, 0, random (0, 360), 2, random (0, 160))
		 TNT1 AAA 0 A_CustomMissile ("XDeath3", 5, 0, random (0, 360), 2, random (0, 160))
		 TNT1 AAA 0 A_CustomMissile ("XDeath4", 5, 0, random (0, 360), 2, random (0, 160))
		Stop}}

Actor NoLegsSpider: DeadSpider

{Scale 1.1
+NOBLOOD
Health 100
States{Spawn:
        ARF2 H -1
        Stop
     }}

ACTOR SpiderPart1
{
    Radius 1
    Height 8
    Speed 12
    Scale 1.3
	Mass 1
    +NOBLOCKMAP
	+MISSILE
    +NOTELEPORT
    +MOVEWITHSECTOR
    +CLIENTSIDEONLY
    +RIPPER
    +BLOODLESSIMPACT
damagetype Blood
    SeeSound "misc/xdeath4"
    DeathSound "misc/xdeath1"
	Decal BloodSuper
    States
    {
    Spawn:
	    TNT1 A 0 A_JumpIf(waterlevel > 1, "Splash")
        ID22 ABCD 2 A_CustomMissile("BloodTrails",0,0,180,2)
        Loop
    Death:
        ID22 E 1 A_SpawnItem("Brutal_BloodSpot",0,0,0,1)
        ID22 E -1
        Stop
        TNT1 A 1
     Splash:
        TNT1 A 0
        Stop
    }
}

ACTOR SpiderPart2
{
    Radius 1
    Height 8
    Speed 12
    Scale 2.0
	Mass 1
    +NOBLOCKMAP
	+MISSILE
    +NOTELEPORT
    +MOVEWITHSECTOR
    +CLIENTSIDEONLY
    +RIPPER
    +BLOODLESSIMPACT
    +DOOMBOUNCE
    BounceFactor 0.5
damagetype Blood
    SeeSound "misc/xdeath4"
    DeathSound "misc/xdeath1"
	Decal BloodSuper
    States
    {
    Spawn:
	    TNT1 A 0 A_JumpIf(waterlevel > 1, "Splash")
        ID22 ABCD 2 A_CustomMissile("BloodTrails",0,0,180,2)
        Loop
    Death:
        ID22 F 1 A_SpawnItem("Brutal_BloodSpot",0,0,0,1)
        ID22 F -1
        Stop
        TNT1 A 1
     Splash:
        TNT1 A 0
        Stop
    }
}

ACTOR CrawlingDyingSpider
{
    Radius 25
    Height 27
    Speed 9
	Health 100
	PainSound "grunt/pain"
	Damagefactor "Avoid", 0.0	Damagefactor "BHFTOnBarrel", 0.0	Damagefactor "Blood", 0.0
	Damagefactor "CancelTeleportFog", 0.0	Damagefactor "CauseWaterSplash", 0.0
	Damagefactor "GibRemoving", 0.0	Damagefactor "HangingHook", 0.0
	Damagefactor "Head", 0.0	Damagefactor "PussyGrab", 0.0	Damagefactor "Repair", 0.0
	Damagefactor "RevenantHitStomach", 0.0	Damagefactor "SpawnMarine", 0.0	Damagefactor "Stealth", 0.0
	Damagefactor "TeleportRemover", 0.0	Damagefactor "Use", 0.0
	PainChance 255
	Monster
    +FLOORCLIP
	+FRIGHTENED
    States
    {

    Spawn:
		NAHC ABCD 10 A_Wander
		NAHC A 0 A_Pain
		TNT1 A 0 A_SpawnItemEx("Brutal_FlyingBlood", 0, 0, 10, 0, 0)
		TNT1 A 0 A_GiveInventory("DeathTimer", 1)
		TNT1 A 0 A_JumpIfInventory("DeathTimer", 12, "GotoDeath")
		Loop

	GotoDeath:
		TNT1 A 0 A_Die("Expire")

	Death.Expire:
		NAHC EFGH 5
		NAHC H -1 A_NoBlocking
		Stop

	Death:
		TNT1 A 0
		TNT1 AA 0 A_SpawnItemEx("HealthCrueltyBonus2", 0, 0, 12, frandom (-2.5, 2.5), frandom (-2.5, 2.5), 5)
		TNT1 AA 0 A_SpawnItemEx("ArmorCrueltyBonus2", 0, 0, 12, frandom (-2.5, 2.5), frandom (-2.5, 2.5), 5)
		TNT1 AAAAAAAAAAAA 0 A_CustomMissile ("SmallBrainPiece", 10, 0, random (0, 360), 2, random (0, 160))
		TNT1 AAAA 0 A_CustomMissile ("XDeath1", 10, 0, random (0, 360), 2, random (0, 160))
		NAHC IJKLMN 5
		NAHC N -5 A_NoBlocking
		Stop

	Pain.SuperPunch:
	Pain.SuperKick:
	Pain.Kick:
	Pain.Extremepunches:
	TNT1 A 0 A_FaceTarget
	NAHA A 1 A_Pain
	TNT1 A 0 ThrustThing(angle*256/360+128, 5, 0, 0)
	Pain.ExplosiveImpact:
	TNT1 A 0 ThrustThingZ(0,50,0,1)
	NAHA A 2 A_FaceTarget
	Goto Fly

	Fly:
	NAHA ABCDEFGH 3 A_CheckFloor("Spawn")
	NULL A 0 A_JumpIf(((VelY == 0)||(VelX == 0)), "Spawn")
	Loop
	}
}