source: code/trunk/data/gui/scripts/HighscoreMenu.lua @ 12392

-- HighscoreMenu.lua

local P = createMenuSheet("HighscoreMenu")

P.highscoreList = {}
P.tabList = {}
P.linesList = {}
P.levelList = {}


P.imageHeight = 50

function P.onLoad()
    P.createLevelList()    
end

function P.onShow()
    
    -- reset tables
    P.highscoreList = {}
    P.tabList = {}
    P.linesList = {}

    -- fetch save scores and write it into the list
    for i=orxonox.Highscore:getInstance():getNumberOfHighscores()-1,0,-1 do
        table.insert(P.highscoreList, orxonox.Highscore:getInstance():getHighscore(i))
    
    end
    
    -- read minigames out of the levelList
    for k,v in pairs(P.levelList) do
        if(v:getName() ~= "Hover level" and v:getName() ~= "Pong") then   -- hover and pong dont contain relevant scores
            P.createFilterTab(v:getName(), v:getName())
        end
    end
  
end
function P.onHide()

    -- delete old windows to reload them on show
    local tabControl = P.window:getChild("HighscoreWindow/HighscoreTabControl")
    for k,v in pairs(P.tabList) do
            local default = tabControl:getChild(v)
            tabControl:removeChild(default)
            winMgr:destroyWindow(default)
    end
end
function P.createLevelList()
    P.levelList = {}
    local size = orxonox.LevelManager:getInstance():getNumberOfLevels()
    local index = 0
    local level = nil
    while index < size do
        level = orxonox.LevelManager:getInstance():getAvailableLevelListItem(index)
        if (level ~= nil and level:getXMLFilename() ~= "_temp.oxw" and level:hasTag("minigame")) then
            table.insert(P.levelList, level)
        end
        index = index + 1
    end
end
function P.createFilterTab(name, tag)
    -- create unique tab window name
    local tabName = "HighscoreLevelTab"
    if tag ~= nil then
        tabName = tabName..tag
    end

    table.insert(P.tabList, tabName)
    -- create new tab window with desired name
    local default = (winMgr:createWindow("DefaultWindow", tabName))
    default:setText(name)
    default:setProperty("MaxSize", "{{1,0},{1,0}}")
    default:setProperty("Area", "{{0,0},{0,0},{1,0},{1,0}}")
    local pane = winMgr:createWindow("MenuWidgets/ScrollablePane", tabName .. "pane") 
    pane:setSize(CEGUI.USize(CEGUI.UDim(1,0),CEGUI.UDim(1,0)))
    default:addChild(pane)

   
    local offset = 2
    for k,v in pairs(P.highscoreList) do
        -- split the score ("Playername./.game./.score")
        local splitlist = P.Split(v,"./.")
        if(splitlist[2] == name)then  
            local line = P.createPickupEntry(tabName .. k,k,tag)
            table.insert(P.linesList, line)
            line:setYPosition(CEGUI.UDim(0,offset))
            offset = offset + P.imageHeight +2
            pane:addChild(line)
        end
        
    end

    local tabControl = P.window:getChild("HighscoreWindow/HighscoreTabControl")
    tabControl:addChild(default)
 

    
end
function P.createPickupEntry(parent,k,tag)
   
    local name = "HiscoreEntry" .. parent
    local splitlist = P.Split(P.highscoreList[k],"./.")
    local item = winMgr:createWindow("DefaultWindow", name)
    item:setSize(CEGUI.USize(CEGUI.UDim(1, 0), CEGUI.UDim(0, P.imageHeight)))
    item:setPosition(CEGUI.UVector2(CEGUI.UDim(0, 0), CEGUI.UDim(0, 0)))

    local player = winMgr:createWindow("MenuWidgets/StaticText", name .. "/Player")
    player:setText(splitlist[1])
    player:setPosition(CEGUI.UVector2(CEGUI.UDim(0.005,0), CEGUI.UDim(0,0)))
    player:setSize(CEGUI.USize(CEGUI.UDim(0.49, 0), CEGUI.UDim(0, P.imageHeight)))
    
    item:addChild(player)
        
    local score = winMgr:createWindow("MenuWidgets/StaticText", name .. "/Score")
    score:setText(splitlist[3])
    score:setPosition(CEGUI.UVector2(CEGUI.UDim(0.5,0), CEGUI.UDim(0,0)))
    score:setSize(CEGUI.USize(CEGUI.UDim(0.495, 0), CEGUI.UDim(0, P.imageHeight)))
    
    item:addChild(score)

    return item
end
function P.HighscoreGetSelectedLevel()
    -- choose the active listbox
    local tabControl = CEGUI.toTabControl(P.window:getChild("HighscoreWindow/HighscoreTabControl"))
    local listbox = CEGUI.toListbox(tabControl:getTabContentsAtIndex(tabControl:getSelectedTabIndex()))
    local choice = listbox:getFirstSelectedItem()
    if choice ~= nil then
        -- get the right tab and the right index
        local tabIndexes = P.activeTabIndexes[tabControl:getSelectedTabIndex()+1]
        local index = tabIndexes[listbox:getItemIndex(choice)+1]
        return P.levelList[index]
    else
        return nil
    end
end
function P.Split(str, delim, maxNb)
    -- Eliminate bad cases...
    if string.find(str, delim) == nil then
        return { str }
    end
    if maxNb == nil or maxNb < 1 then
        maxNb = 0    -- No limit
    end
    local result = {}
    local pat = "(.-)" .. delim .. "()"
    local nb = 0
    local lastPos
    for part, pos in string.gfind(str, pat) do
        nb = nb + 1
        result[nb] = part
        lastPos = pos
        if nb == maxNb then break end
    end
    -- Handle the last field
    if nb ~= maxNb then
        result[nb + 1] = string.sub(str, lastPos)
    end
    return result
end



function P.HighscoreBackButton_clicked(e)
    hideMenuSheet(P.name)
end

return P