local gc=love.graphics

local scene={}

local das,arr
local pos,dir,wait

function scene.sceneInit()
	das,arr=SETTING.das,SETTING.arr
	pos,dir,wait=0,1,30
	BG.set('bg1')
end

function scene.update()
	if wait>0 then
		wait=wait-1
		if wait==0 then
			pos=pos+(das==0 and 2 or 1)*dir
		else
			return
		end
	end
	if das>0 then
		das=das-1
		if das==0 then
			if arr==0 then
				pos=pos+7*dir
				das=SETTING.das+1
				arr=SETTING.arr
				dir=-dir
				wait=26
			else
				pos=pos+dir
			end
		end
	else
		arr=arr-1
		if arr==0 then
			pos=pos+dir
			arr=SETTING.arr
		elseif arr==-1 then
			pos=dir>0 and 8 or 0
			arr=SETTING.arr
		end
		if pos%8==0 then
			dir=-dir
			wait=26
			das=SETTING.das
		end
	end
end

function scene.draw()
	gc.translate(550,600)

	--Testing grid line
	gc.setLineWidth(4)
	gc.setColor(1,1,1,.4)
	gc.line(0,0,400,0)
	gc.line(0,40,400,40)
	gc.line(0,80,400,80)
	for x=40,360,40 do
		gc.line(x,-10,x,90)
	end
	gc.setColor(1,1,1)
	gc.line(0,-10,0,90)
	gc.line(400,-10,400,90)

	--O mino animation
	local O=SKIN.lib[SETTING.skinSet][SETTING.skin[6]]
	gc.draw(O,40*pos,0,nil,40/30)
	gc.draw(O,40*pos,40,nil,40/30)
	gc.draw(O,40*pos+40,0,nil,40/30)
	gc.draw(O,40*pos+40,40,nil,40/30)
	gc.translate(-550,-600)
end

local function sliderShow(S)
	S=S.disp()
	return S.."F "..math.floor(S*16.67).."ms"
end
scene.widgetList={
	WIDGET.newText{name="title",	x=80,	y=50,font=70,align='L'},
	WIDGET.newText{name="preview",	x=520,	y=610,font=40,align='R'},

	WIDGET.newSlider{name="das",	x=250,	y=190,w=600,unit=20,disp=SETval("das"),	show=sliderShow,code=SETsto("das")},
	WIDGET.newSlider{name="arr",	x=250,	y=260,w=525,unit=15,disp=SETval("arr"),	show=sliderShow,code=SETsto("arr")},
	WIDGET.newSlider{name="sddas",	x=250,	y=330,w=350,unit=10,disp=SETval("sddas"),show=sliderShow,code=SETsto("sddas")},
	WIDGET.newSlider{name="sdarr",	x=250,	y=400,w=140,unit=4,	disp=SETval("sdarr"),show=sliderShow,code=SETsto("sdarr")},
	WIDGET.newSlider{name="dascut",	x=250,	y=470,w=600,unit=20,disp=SETval("dascut"),show=sliderShow,code=SETsto("dascut")},
	WIDGET.newSlider{name="dropcut",x=250,	y=540,w=300,unit=10,disp=SETval("dropcut"),show=sliderShow,code=SETsto("dropcut")},
	WIDGET.newSwitch{name="ihs",	x=1100,	y=260,				disp=SETval("ihs"),	code=SETrev("ihs")},
	WIDGET.newSwitch{name="irs",	x=1100,	y=330,				disp=SETval("irs"),	code=SETrev("irs")},
	WIDGET.newSwitch{name="ims",	x=1100,	y=400,				disp=SETval("ims"),	code=SETrev("ims")},
	WIDGET.newButton{name="reset",	x=160,	y=640,w=200,h=100,color='lR',font=40,
		code=function()
			local _=SETTING
			_.das,_.arr,_.dascut=10,2,0
			_.sddas,_.sdarr=0,2
			_.ihs,_.irs,_.ims=false,false,false
		end},
	WIDGET.newButton{name="back",	x=1140,	y=640,w=170,h=80,fText=TEXTURE.back,code=backScene},
}

return scene