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

//-------Aliases-------//
private alias 54 : TYPE_SWINGPLATFORM

// Function declarations
reserve function SwingPlatform_DebugDraw
reserve function SwingPlatform_DebugSpawn

// Static Values
private value SwingPlatform_value34 = 0;

// Tables

function SwingPlatform_DebugDraw
	temp7 = object[0].value17
	temp7 -= SwingPlatform_value34
	temp0 = 0
	temp1 = 16
	while temp0 < temp7
		Cos(temp2, 128)
		temp2 *= temp1
		temp2 <<= 7
		temp2 += object.xpos
		Sin(temp3, 128)
		temp3 *= temp1
		temp3 <<= 7
		temp3 += object.ypos
		DrawSpriteXY(1, temp2, temp3)
		temp0++
		temp1 += 16
	loop
	temp1 -= 8
	Cos(temp2, 128)
	temp2 *= temp1
	temp2 <<= 7
	temp2 += object.xpos
	Sin(temp3, 128)
	temp3 *= temp1
	temp3 <<= 7
	temp3 += object.ypos
	DrawSprite(0)
	DrawSpriteXY(2, temp2, temp3)
end function


function SwingPlatform_DebugSpawn
	temp0 = object[0].value17
	temp0 -= SwingPlatform_value34
	CreateTempObject(TypeName[Swing Platform], temp0, object.xpos, object.ypos)
	object[tempObjectPos].value5 = object.direction
end function


event ObjectMain
	temp2 = object.xpos
	temp3 = object.ypos
	GetTableValue(object.angle, 12, StageSetup_table9)
	object.angle >>= 8
	if object.value5 == 0
		if object.angle <= 64
			object.angle = 64
			if object.value6 == 0
				object.value6 = 1
				PlaySfx(SfxName[Plat Collide], 0)
			end if
		else
			object.value6 = 0
		end if
	else
		if object.angle >= 64
			object.angle = 64
			if object.value6 == 0
				object.value6 = 1
				PlaySfx(SfxName[Plat Collide], 0)
			end if
		else
			object.value6 = 0
		end if
	end if
	if object.direction == FLIP_X
		object.angle ^= 255
		object.angle += 129
	end if
	object.angle <<= 1
	temp1 = object.propertyValue
	temp1++
	temp1 <<= 4
	temp1 -= 8
	object.xpos = object.value1
	object.ypos = object.value2
	Cos(object.value3, object.angle)
	object.value3 *= temp1
	object.value3 <<= 7
	object.value3 += temp2
	object.value3 &= -0x10000
	object.value1 = object.value3
	object.value3 -= object.xpos
	Sin(object.value4, object.angle)
	object.value4 *= temp1
	object.value4 <<= 7
	object.value4 += temp3
	object.value4 &= -0x10000
	object.value2 = object.value4
	object.value4 -= object.ypos
	foreach (GROUP_PLAYERS, currentPlayer, ACTIVE_ENTITIES)
		BoxCollisionTest(C_PLATFORM, object.entityPos, -24, -8, 24, 8, currentPlayer, HITBOX_AUTO, HITBOX_AUTO, HITBOX_AUTO, HITBOX_AUTO)
		if checkResult == 1
			object[currentPlayer].xpos += object.value3
			object[currentPlayer].ypos += object.value4
		end if
	next
	object.xpos = temp2
	object.ypos = temp3
end event


event ObjectDraw
	temp0 = 0
	temp1 = 16
	while temp0 < object.propertyValue
		Cos(temp2, object.angle)
		temp2 *= temp1
		temp2 <<= 7
		temp2 += object.xpos
		Sin(temp3, object.angle)
		temp3 *= temp1
		temp3 <<= 7
		temp3 += object.ypos
		DrawSpriteXY(1, temp2, temp3)
		temp0++
		temp1 += 16
	loop
	temp1 -= 8
	Cos(object.value1, object.angle)
	object.value1 *= temp1
	object.value1 <<= 7
	object.value1 += object.xpos
	object.value1 &= -0x10000
	Sin(object.value2, object.angle)
	object.value2 *= temp1
	object.value2 <<= 7
	object.value2 += object.ypos
	object.value2 &= -0x10000
	DrawSprite(0)
	DrawSpriteXY(2, object.value1, object.value2)
end event


event ObjectStartup
	LoadSpriteSheet("MCZ/Objects.gif")
	SpriteFrame(-12, -12, 23, 33, 152, 131)
	SpriteFrame(-8, -8, 16, 16, 135, 148)
	SpriteFrame(-24, -8, 48, 16, 141, 165)
	foreach (TypeName[Swing Platform], arrayPos0, ALL_ENTITIES)
		if object[arrayPos0].propertyValue > 0
			object[arrayPos0].propertyValue--
		end if
		object[arrayPos0].value6 = 1
		object[arrayPos0].value5 = object[arrayPos0].propertyValue
		object[arrayPos0].value5 >>= 3
		object[arrayPos0].value5 &= 1
		object[arrayPos0].propertyValue &= 7
		object[arrayPos0].propertyValue++
	next
	temp0 = 0
	SwingPlatform_value34 = DebugMode_ObjCount
	SwingPlatform_value34--
	while temp0 < 8
		SetTableValue(TypeName[Swing Platform], DebugMode_ObjCount, DebugMode_TypesTable)
		SetTableValue(SwingPlatform_DebugDraw, DebugMode_ObjCount, DebugMode_DrawTable)
		SetTableValue(SwingPlatform_DebugSpawn, DebugMode_ObjCount, DebugMode_SpawnTable)
		DebugMode_ObjCount++
		temp0++
	loop
end event

event RSDKDraw
	DrawSprite(0)
end event

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