【进阶实战】世界地图的传送锚点管理：统一传送网关封装

local anchors = {
    [1] = { name = "比奇省", map = 0, x = 300, y = 300, lv = 1, fee = 1000 },
    [2] = { name = "盟重土城", map = 3, x = 330, y = 330, lv = 15, fee = 3000 },
    [3] = { name = "祖玛入口", map = 5, x = 25, y = 200, lv = 35, fee = 10000 },
    [4] = { name = "封魔谷", map = 11, x = 120, y = 160, lv = 40, fee = 50000 },
}
local function teleportTo(actor, anchorId)
    actor = getplayerbyname(actor)
    local a = anchors[anchorId]
    if a == nil then
        sendmsg(actor, 1, "锚点不存在。")
        return false
    end
    local lv = tonumber(getplayvar(actor, "HUMAN", "Level")) or 0
    if lv < a.lv then
        sendmsg(actor, 1, a.name .. " 需要等级 " .. a.lv .. "，当前 " .. lv .. "。")
        return false
    end
    if a.fee > 0 and not takeitem(actor, "金币", a.fee, 0, "传送费") then
        sendmsg(actor, 1, "传送费 " .. a.fee .. " 金币不足。")
        return false
    end
    local ok = beginteleport(actor, a.x, a.y)
    if not ok then
        sendmsg(actor, 1, "传送受理失败，费用稍后返还。")
        giveitem(actor, "金币", a.fee, 0, "传送失败返还")
    end
    return ok
end

local function onNpcClick(actor, anchorId)
    teleportTo(actor, anchorId)
end