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

//-------Aliases-------//
private alias 53 : TYPE_HDROPBRIDGE

// Function declarations
reserve function HDropBridge_DebugDraw
reserve function HDropBridge_DebugSpawn

// Static Values

// Tables

function HDropBridge_DebugDraw
	temp0 = object.xpos
	temp1 = 0
	temp0 -= 0x380000
	while temp1 < 8
		DrawSpriteXY(0, temp0, object.ypos)
		temp0 += 0x100000
		temp1++
	loop
end function


function HDropBridge_DebugSpawn
	CreateTempObject(TypeName[H Drop Bridge], 0, object.xpos, object.ypos)
	object[tempObjectPos].drawOrder = 4
	object[tempObjectPos].value1 = 0
	object[tempObjectPos].value2 = 256
	object[tempObjectPos].value3 = object[tempObjectPos].xpos
	object[tempObjectPos].value3 -= 0x380000
	object[tempObjectPos].value4 = object[tempObjectPos].xpos
	object[tempObjectPos].value4 += 0x380000
end function


event ObjectMain
	switch object.state
	case 0
		if object[-1].propertyValue == 1
			object.state++
			PlaySfx(SfxName[Flapping Door], 0)
			if object.priority != PRIORITY_XBOUNDS_DESTROY
				object.priority = PRIORITY_ACTIVE
			end if
		end if
		foreach (GROUP_PLAYERS, currentPlayer, ACTIVE_ENTITIES)
			BoxCollisionTest(C_BOX, object.entityPos, -64, -8, 64, 8, currentPlayer, HITBOX_AUTO, HITBOX_AUTO, HITBOX_AUTO, HITBOX_AUTO)
		next
		break
	case 1
		if object.value1 < 128
			object.value1 += 8
			object.value2 -= 8
		else
			object.state++
		end if
	case 2
		temp6 = object.xpos
		temp7 = object.ypos
		temp0 = 0
		temp1 = 0
		while temp0 < 4
			Cos(object.xpos, object.value1)
			object.xpos *= temp1
			object.xpos += object.value3
			Sin(object.ypos, object.value1)
			object.ypos *= temp1
			object.ypos += temp7
			foreach (GROUP_PLAYERS, currentPlayer, ACTIVE_ENTITIES)
				BoxCollisionTest(C_BOX, object.entityPos, -8, -8, 8, 8, currentPlayer, HITBOX_AUTO, HITBOX_AUTO, HITBOX_AUTO, HITBOX_AUTO)
			next
			temp0++
			temp1 += 0x800
		loop
		temp0 = 0
		temp1 = 0
		while temp0 < 4
			Cos(object.xpos, object.value2)
			object.xpos *= temp1
			object.xpos += object.value4
			Sin(object.ypos, object.value2)
			object.ypos *= temp1
			object.ypos += temp7
			foreach (GROUP_PLAYERS, currentPlayer, ACTIVE_ENTITIES)
				BoxCollisionTest(C_BOX, object.entityPos, -8, -8, 8, 8, currentPlayer, HITBOX_AUTO, HITBOX_AUTO, HITBOX_AUTO, HITBOX_AUTO)
			next
			temp0++
			temp1 += 0x800
		loop
		object.xpos = temp6
		object.ypos = temp7
		break
	end switch
	if object.outOfBounds == 1
		if object.priority != PRIORITY_XBOUNDS_DESTROY
			object.value1 = 0
			object.value2 = 256
			object.state = 0
		end if
	end if
end event


event ObjectDraw
	temp0 = 0
	temp1 = 0
	while temp0 < 4
		Cos(temp2, object.value1)
		temp2 *= temp1
		temp2 += object.value3
		Sin(temp3, object.value1)
		temp3 *= temp1
		temp3 += object.ypos
		DrawSpriteXY(0, temp2, temp3)
		temp0++
		temp1 += 0x800
	loop
	temp0 = 0
	temp1 = 0
	while temp0 < 4
		Cos(temp2, object.value2)
		temp2 *= temp1
		temp2 += object.value4
		Sin(temp3, object.value2)
		temp3 *= temp1
		temp3 += object.ypos
		DrawSpriteXY(0, temp2, temp3)
		temp0++
		temp1 += 0x800
	loop
end event


event ObjectStartup
	LoadSpriteSheet("MCZ/Objects.gif")
	SpriteFrame(-8, -8, 16, 16, 135, 131)
	foreach (TypeName[H Drop Bridge], arrayPos0, ALL_ENTITIES)
		object[arrayPos0].drawOrder = 4
		object[arrayPos0].value1 = 0
		object[arrayPos0].value2 = 256
		object[arrayPos0].value3 = object[arrayPos0].xpos
		object[arrayPos0].value3 -= 0x380000
		object[arrayPos0].value4 = object[arrayPos0].xpos
		object[arrayPos0].value4 += 0x380000
	next
	SetTableValue(TypeName[H Drop Bridge], DebugMode_ObjCount, DebugMode_TypesTable)
	SetTableValue(HDropBridge_DebugDraw, DebugMode_ObjCount, DebugMode_DrawTable)
	SetTableValue(HDropBridge_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
