【界面UI】地图选择器：传送点列表与直达

---地图选择器：按区域分组
MapPicker.groups = {
    { name = "主城",   maps = { "比奇省", "盟重土城" } },
    { name = "练级",   maps = { "沃玛森林", "僵尸洞", "蜈蚣洞" } },
    { name = "高级",   maps = { "祖玛寺庙", "赤月峡谷", "魔龙城" } },
}

function MapPicker.show(win)
    local list = GUI:ListView_Create(win, "maps", 0, 0, 240, 300)
    for _, g in ipairs(MapPicker.groups) do
        local head = GUI:Text_Create(list, "g_" .. g.name,
            0, 0, 13, "#FFD700", "— " .. g.name .. " —")
        for _, m in ipairs(g.maps) do
            local unlocked = MapPicker.unlocked(m)
            local row = GUI:Text_Create(list, "m_" .. m,
                0, 0, 12,
                unlocked and "#FFFFFF" or "#777777",
                unlocked and m or (m .. "（未解锁）"))
            if unlocked then
                GUI:addOnClickEvent(row, function()
                    MapPicker.go(m)
                end)
            end
        end
    end
end

---直达的服务器校验与扣费
function MapPicker.go(actor, mapName)
    local player = class(actor)
    if not player then return false end
    local cost = MapPicker.costOf(mapName)
    if cost > 0 then
        if not checkitemw(actor, "传送卷", cost) then
            sendmsg(actor, 1, "传送卷不足，需要 " .. cost)
            return false
        end
        takeitem(actor, "传送卷", cost, 0, "地图传送")
    end
    local point = MapPicker.spawnOf(mapName)
    mapmove(actor, point.map, point.x, point.y, 0)
    sendmsg(actor, 1, "已抵达 " .. mapName)
    return true
end