freeslot(
	"MT_ELEMENTALTHUNDER",
		"SPR_ELTH",
		"S_ELTH_1",
		"S_ELTH_2",
		"S_ELTH_3",
		"S_ELTH_4",
		"S_ELTH_5",
		"S_ELTH_6",
		"S_ELTH_7",
		"S_ELTH_8",
		"S_ELTH_9",
		"S_ELTH_10"		

)

mobjinfo[MT_ELEMENTALTHUNDER]={
	doomednum = 1576,
	painstate = S_ELTH_5,	
	painsound = sfx_evyedg,	
	deathsound = sfx_elemkl,
	deathstate = S_XPLD1,	
	spawnstate = S_ELTH_8,
	seestate = S_ELTH_1,
	spawnhealth = 2,
	reactiontime = 16,
	painchance = 1000,
	speed = 30,
	mass = 5,
	damage = 1,
	radius = 18*FRACUNIT,
	height = 26*FRACUNIT,	
	flags = MF_ENEMY|MF_SHOOTABLE|MF_SPECIAL|MF_NOGRAVITY|MF_FLOAT
}

states[S_ELTH_1]={SPR_ELTH, A, 4,  A_JetChase, 0, 0, S_ELTH_2}
states[S_ELTH_2]={SPR_ELTH, B, 4,  A_JetChase, 0, 0, S_ELTH_3}
states[S_ELTH_3]={SPR_ELTH, C, 4,  A_JetChase, 0, 0, S_ELTH_4}
states[S_ELTH_4]={SPR_ELTH, D, 40,  A_CrawlaCommanderThink, 0, 0, S_ELTH_1}

states[S_ELTH_5]={SPR_ELTH, E, 1,  None, 0, 0, S_ELTH_6}
states[S_ELTH_6]={SPR_ELTH, F, 2,  A_Pain, 0, 0, S_ELTH_7}
states[S_ELTH_7]={SPR_ELTH, G, 2,  None, 0, 0, S_ELTH_8}

states[S_ELTH_8]={SPR_ELTH, G, 2,  A_Look, 0, 0, S_ELTH_8}



addHook("MobjDeath", function(target, inflictor)
    if not inflictor.player then return end
    if not P_RandomChance(6554) then return end
    
    P_SwitchShield(inflictor.player, SH_THUNDERCOIN)
    
end, MT_ELEMENTALTHUNDER)

