local gc=love.graphics

local inputBox=WIDGET.newInputBox{name="input",x=20,y=110,w=726,h=60,font=40}
local int,abs=math.floor,math.abs
local min,sin=math.min,math.sin
local ins=table.insert
local find=string.find

local scene={}

local dict--Dict list
local result--Result Lable
local url

local lastTickInput
local waiting--Searching animation timer
local selected--Selected option
local scrollPos--Scroll down length

local lastSearch--Last searched string

local typeColor={
    help=COLOR.Y,
    other=COLOR.lO,
    game=COLOR.lC,
    term=COLOR.lR,
    setup=COLOR.lY,
    pattern=COLOR.lJ,
    command=COLOR.lN,
    english=COLOR.B,
    name=COLOR.lV,
}
local function _getList()return result[1]and result or dict end
local function _clearResult()
    TABLE.cut(result)
    selected,scrollPos=1,0
    waiting,lastSearch=0,false
end
local function _search()
    local input=inputBox:getText():lower()
    _clearResult()
    local first
    for i=1,#dict do
        local pos=find(dict[i][2],input,nil,true)
        if pos==1 and not first then
            ins(result,1,dict[i])
            first=true
        elseif pos then
            ins(result,dict[i])
        end
    end
    if #result>0 then
        SFX.play('reach')
    end
    url=_getList()[selected][5]
    lastSearch=input
end

function scene.sceneInit()
    dict=require("parts.language.dict_"..({"zh","zh","zh","en","en","en","en","en"})[SETTING.lang])

    inputBox:clear()
    result={}
    url=dict[1][5]

    waiting=0
    selected=1
    scrollPos=0

    lastSearch=false
    WIDGET.focus(inputBox)
    BG.set('rainbow')
end

function scene.wheelMoved(_,y)
    WHEELMOV(y)
end
function scene.keyDown(key)
    if key=="up"then
        if selected and selected>1 then
            selected=selected-1
            if selected<scrollPos+1 then
                scrollPos=scrollPos-1
            end
        end
    elseif key=="down"then
        if selected and selected<#_getList()then
            selected=selected+1
            if selected>scrollPos+15 then
                scrollPos=selected-15
            end
        end
    elseif key=="left"or key=="pageup"then
        for _=1,12 do scene.keyDown("up")end
    elseif key=="right"or key=="pagedown"then
        for _=1,12 do scene.keyDown("down")end
    elseif key=="link"then
        love.system.openURL(url)
    elseif key=="delete"then
        if inputBox:hasText()then
            _clearResult()
            inputBox:clear()
            SFX.play('hold')
        end
    elseif key=="backspace"then
        WIDGET.keyPressed("backspace")
    elseif key=="escape"then
        if inputBox:hasText()then
            scene.keyDown("delete")
        else
            SCN.back()
        end
    else
        return
    end
    url=_getList()[selected][5]
end

function scene.update(dt)
    local input=inputBox:getText()
    if input~=lastTickInput then
        if #input==0 then
            _clearResult()
        else
            waiting=.8
        end
        lastTickInput=input
    end
    if waiting>0 then
        waiting=waiting-dt
        if waiting<=0 then
            if #input>0 and input~=lastSearch then
                _search()
            end
        end
    end
end

function scene.draw()
    local list=_getList()
    gc.setColor(COLOR.Z)
    local t=list[selected][4]
    setFont(
        #t>900 and 15 or
        #t>600 and 20 or
        #t>400 and 25 or
        30
    )
    gc.printf(t,306,180,950)

    setFont(30)
    gc.setColor(1,1,1,.4+.2*sin(TIME()*4))
    gc.rectangle('fill',20,143+35*(selected-scrollPos),280,35)

    setFont(30)
    for i=1,min(#list,15)do
        local y=142+35*i
        i=i+scrollPos
        local item=list[i]
        gc.setColor(COLOR.D)
        gc.print(item[1],29,y-1)
        gc.print(item[1],29,y+1)
        gc.print(item[1],31,y-1)
        gc.print(item[1],31,y+1)
        gc.setColor(typeColor[item[3]])
        gc.print(item[1],30,y)
    end

    gc.setLineWidth(2)
    gc.setColor(COLOR.Z)
    gc.rectangle('line',300,180,958,526,5)
    gc.rectangle('line',20,180,280,526,5)

    if waiting>0 then
        local r=TIME()*2
        local R=int(r)%7+1
        gc.setColor(1,1,1,1-abs(r%1*2-1))
        gc.draw(TEXTURE.miniBlock[R],785,140,TIME()*10%6.2832,15,15,DSCP[R][0][2]+.5,#BLOCKS[R][0]-DSCP[R][0][1]-.5)
    end
end

scene.widgetList={
    WIDGET.newText{name="title",  x=20,y=5,font=70,align='L'},
    inputBox,
    WIDGET.newKey{name="link",    x=1150,y=655,w=200,h=80,font=35,code=pressKey"link",hideF=function()return not url end},
    WIDGET.newKey{name="up",      x=1130,y=460,w=60,h=90,font=35,fText="↑",code=pressKey"up",hide=not MOBILE},
    WIDGET.newKey{name="down",    x=1130,y=560,w=60,h=90,font=35,fText="↓",code=pressKey"down",hide=not MOBILE},
    WIDGET.newKey{name="pageup",  x=1210,y=460,w=80,h=90,font=35,fText="↑↑",code=pressKey"pageup",hide=not MOBILE},
    WIDGET.newKey{name="pagedown",x=1210,y=560,w=80,h=90,font=35,fText="↓↓",code=pressKey"pagedown",hide=not MOBILE},
    WIDGET.newButton{name="back", x=1165,y=60,w=170,h=80,fText=TEXTURE.back,code=backScene},
}

return scene