freeslot(
	"MT_REDCROWLO",
	"S_RCROWLO_IDLE",
	"S_RCROWLO_MOVE",
	"S_RCROWLO_MOVE2",
	"S_RCROWLO_MOVE3",
	"S_RCROWLO_MOVE4",
	"S_RCROWLO_MOVE5",
	"S_RCROWLO_MOVE6",
	"SPR_SSPO"
)

states[S_RCROWLO_IDLE] = {
	sprite = SPR_SSPO,
	frame = A,
	tics = 5,
	action = A_Look,
	nextstate = S_RCROWLO_IDLE
}

states[S_RCROWLO_MOVE] = {
	sprite = SPR_SSPO,
	frame = A,
	tics = 1,
	action = A_Chase,
	nextstate = S_RCROWLO_MOVE2
}

states[S_RCROWLO_MOVE2] = {
	sprite = SPR_SSPO,
	frame = A,
	tics = 1,
	action = A_Chase,
	nextstate = S_RCROWLO_MOVE3
}

states[S_RCROWLO_MOVE3] = {
	sprite = SPR_SSPO,
	frame = A,
	tics = 1,
	action = A_Chase,
	nextstate = S_RCROWLO_MOVE4
}

states[S_RCROWLO_MOVE4] = {
	sprite = SPR_SSPO,
	frame = A,
	tics = 1,
	action = A_Chase,
	nextstate = S_RCROWLO_MOVE5
}

states[S_RCROWLO_MOVE5] = {
	sprite = SPR_SSPO,
	frame = A,
	tics = 1,
	action = A_Chase,
	nextstate = S_RCROWLO_MOVE6
}

states[S_RCROWLO_MOVE6] = {
	sprite = SPR_SSPO,
	frame = A,
	tics = 1,
	action = A_Chase,
	nextstate = S_RCROWLO_MOVE
}

mobjinfo[MT_REDCROWLO] = {
	spawnstate = S_RCROWLO_IDLE,
	seestate = S_RCROWLO_MOVE,
	deathstate = S_XPLD_FLICKY,
	deathsound = sfx_pop,
	spawnhealth = 1,
	reactiontime = 32,
	painchance = 170,
	speed = 3,
	radius = 24*FRACUNIT,
	height = 32*FRACUNIT,
	mass = 100,
	flags = MF_ENEMY|MF_SPECIAL|MF_SHOOTABLE
}

addHook("MobjThinker", function(egg)
	for p in players.iterate do
		if not (p.mo and p.mo.valid) then return end
		if p.mo.skin ~= "specki" and p.mo.skin ~= "mechaspecki" then return end
		if not egg and egg.valid then return end
		if not egg.health then return end
		local aggro = P_SpawnMobj(egg.x, egg.y, egg.z, MT_REDCROWLO)
		aggro.flags = egg.flags
		aggro.flags2 = egg.flags2
		aggro.eflags = egg.eflags
		aggro.health = egg.health
		aggro.scale = egg.scale
		aggro.angle = egg.angle
		P_RemoveMobj(egg)
		return
	end
end, MT_REDCRAWLA)