on = true
song = GetStringParam("song","radio/carib0.ogg")

function init()	
	zap = LoadSound("spark2.ogg")
	waswet = false

	--Find handle to radio
	radio = FindShape("radio")
	
	--Make sure the light is turned off and make interactable
	SetShapeEmissiveScale(radio, 0)
	SetTag(radio, "interact", "loc@TURN_ON")
	
	--Load click sound and music from game assets
	clickSound = LoadSound("clickdown.ogg")
	musicLoop = LoadLoop(song)
	SetSoundLoopUser(musicLoop, 0)
	if on then
		SetShapeEmissiveScale(radio, 1)
		SetTag(radio, "interact", "loc@TURN_OFF")			
	else
		SetShapeEmissiveScale(radio, 0)
		SetTag(radio, "interact", "loc@TURN_ON")			
	end
end


function tick(dt)
	--If radio is broken it should not be interactable and not function
	if IsShapeBroken(radio) then
		RemoveTag(radio, "interact")
		return
	end

	--Turn on/off radio
	if GetPlayerInteractShape() == radio and InputPressed("interact") then
		PlaySound(clickSound)
		if on then
			on = false
			SetShapeEmissiveScale(radio, 0)
			SetTag(radio, "interact", "loc@TURN_ON")
		else
			on = true
			SetShapeEmissiveScale(radio, 1)
			SetTag(radio, "interact", "loc@TURN_OFF")
		end
	end

	--If radio is on, play music at the world position
	if on then 
		local pos = GetShapeWorldTransform(radio).pos
		local wet, _ = IsPointInWater(pos)
		if wet then
			if waswet then
				PlaySound(zap, pos)
				SetShapeEmissiveScale(radio, 0)
				SetTag(radio, "interact", "loc@TURN_ON")
				on = false
			end
		else
			PlayLoop(musicLoop, pos)
		end
		waswet = wet
	end
end