// ----------------------------------
// RSDK Project: Sonic 1/Sonic 2
// Script Description: Clucker Object
// Script Author: Christan Whitehead/Simon Thomley
// Unpacked by Rubberduckycooly's script unpacker
// ----------------------------------

//-------Aliases-------//
private alias 67 : TYPE_CLUCKER

// Function declarations
reserve function Clucker_Function128
reserve function Clucker_DebugDraw
reserve function Clucker_DebugSpawn

// Static Values
public value Clucker_value49 = 0;
public value Clucker_value50 = 0;

// Tables

function Clucker_Function128
	object[arrayPos0].ypos = object[arrayPos0].value0
	object[arrayPos0].value1 = 0
	object[arrayPos0].state = 0
	object[arrayPos0].priority = PRIORITY_ACTIVE_BOUNDS
end function


function Clucker_DebugDraw
	EditFrame(0, -16, -16, 32, 32, Clucker_value49, Clucker_value50)
	DrawSpriteFX(0, FX_FLIP, object.xpos, object.ypos)
end function


function Clucker_DebugSpawn
	CreateTempObject(TypeName[Clucker], 0, object.xpos, object.ypos)
	object[tempObjectPos].ypos += 0x200000
	object[tempObjectPos].value0 = object[tempObjectPos].ypos
	object[tempObjectPos].direction = object.direction
	arrayPos0 = object[tempObjectPos].entityPos
	CallFunction(Clucker_Function128)
end function


event ObjectMain
	switch object.state
	case 0
		foreach (GROUP_PLAYERS, currentPlayer, ACTIVE_ENTITIES)
			BoxCollisionTest(C_TOUCH, object.entityPos, -128, -256, 128, 32, currentPlayer, -1, -1, 1, 1)
			if checkResult == 1
				object.value1 = 16
				if object[currentPlayer].xpos > object.xpos
					object.direction = FLIP_X
					object.value2 = -0x80000
				else
					object.direction = FLIP_NONE
					object.value2 = 0x80000
				end if
				object.priority = PRIORITY_ACTIVE
				object.state = 1
			end if
		next
		break
	case 1
		object.ypos -= 0x20000
		object.value1--
		if object.value1 == 0
			object.value1 = 8
			object.state = 2
		end if
		break
	case 2
		if object.direction == FLIP_NONE
			object.value2 -= 0x10000
		else
			object.value2 += 0x10000
		end if
		object.value1--
		if object.value1 == 0
			object.value1 = 14
			object.state = 3
		end if
		break
	case 3
		switch object.value1
		case 4
			if object.direction == FLIP_NONE
				object.value2 += 0x20000
			else
				object.value2 -= 0x20000
			end if
			break
		case 0
			PlaySfx(SfxName[Octus Shot], 0)
			temp0 = object.xpos
			temp1 = object.ypos
			temp1 += 0xB0000
			if object.direction == FLIP_NONE
				object.value2 -= 0x20000
				temp0 -= 0x130000
				CreateTempObject(TypeName[Clucker Shot], 0, temp0, temp1)
				object[tempObjectPos].xvel = -0x20000
			else
				object.value2 += 0x20000
				temp0 += 0x130000
				CreateTempObject(TypeName[Clucker Shot], 0, temp0, temp1)
				object[tempObjectPos].xvel = 0x20000
			end if
			object[tempObjectPos].direction = object.direction
			object.value1 = 68
			break
		end switch
		object.value1--
		break
	end switch
	temp0 = object.ypos
	object.ypos = object.value0
	foreach (GROUP_PLAYERS, currentPlayer, ACTIVE_ENTITIES)
		BoxCollisionTest(C_BOX, object.entityPos, -16, -8, 16, 8, currentPlayer, HITBOX_AUTO, HITBOX_AUTO, HITBOX_AUTO, HITBOX_AUTO)
	next
	object.ypos = temp0
	CallFunction(PlayerObject_EnemyPop)
	foreach (GROUP_PLAYERS, currentPlayer, ACTIVE_ENTITIES)
		BoxCollisionTest(C_TOUCH, object.entityPos, -14, -16, 14, 16, currentPlayer, object[currentPlayer].value40, object[currentPlayer].value38, object[currentPlayer].value41, object[currentPlayer].value39)
		if checkResult == 1
			CallFunction(PlayerObject_BadnikBreak)
		end if
	next
	if object.outOfBounds == 1
		temp1 = object.ypos
		object.ypos = object.value0
		if object.outOfBounds == 1
			arrayPos0 = object.entityPos
			CallFunction(Clucker_Function128)
		else
			object.ypos = temp1
		end if
	end if
end event


event ObjectDraw
	if object.state >= 2
		temp0 = object.xpos
		temp0 += object.value2
		DrawSpriteFX(1, FX_FLIP, temp0, object.ypos)
	end if
	temp0 = object.value0
	temp0 -= object.ypos
	temp0 >>= 16
	EditFrame(0, -16, -16, 32, temp0, Clucker_value49, Clucker_value50)
	DrawSpriteFX(0, FX_FLIP, object.xpos, object.ypos)
end event


event ObjectStartup
	CheckCurrentStageFolder("Zone11")
	if checkResult == 1
		LoadSpriteSheet("SCZ/Objects.gif")
		SpriteFrame(-16, -16, 32, 32, 9, 223)
		SpriteFrame(-24, 7, 8, 7, 1, 246)
		Clucker_value49 = 9
		Clucker_value50 = 223
	else
		LoadSpriteSheet("MBZ/Objects.gif")
		SpriteFrame(-16, -16, 32, 32, 845, 256)
		SpriteFrame(-24, 7, 8, 7, 837, 279)
		Clucker_value49 = 845
		Clucker_value50 = 256
	end if
	foreach (TypeName[Clucker], arrayPos0, ALL_ENTITIES)
		object[arrayPos0].ypos += 0x200000
		object[arrayPos0].value0 = object[arrayPos0].ypos
		CallFunction(Clucker_Function128)
	next
	SetTableValue(TypeName[Clucker], DebugMode_ObjCount, DebugMode_TypesTable)
	SetTableValue(Clucker_DebugDraw, DebugMode_ObjCount, DebugMode_DrawTable)
	SetTableValue(Clucker_DebugSpawn, DebugMode_ObjCount, DebugMode_SpawnTable)
	DebugMode_ObjCount++
end event

event RSDKDraw
	DrawSprite(0)
end event

event RSDKLoad
	LoadSpriteSheet("Global/Display.gif")
	SpriteFrame(-16, -16, 32, 32, 1, 143)
end event
