GameProject-xianxia-neidan

--[[--brief: 内丹系统--date:  2017-06-20--author: syl--modified:--]]--[[-- Conf结构-- neidanConf =-- {--  item =--  {--      {--          add = 100,--          id = 52003,--          type = 1--      }--      ... 7--  }--  level =--  {--      {--          {--              type = 1,--              limit = 200--          }--          ... 3 - 7--      }--      ... 50--  }--  totalAttrType = 7 属性种类总数-- }--]]--[[-- ast结构-- neidanSys =-- {--      attr =--      {--         --          {--              value = 0--          },--          ... 7--      },--      level = 1--      upLevel = false-- }--]]module("systems.neidan.neidan", package.seeall)require("neidan.neidanconf")local logger        = Logger.GetLogger("NeidanSystem")local sysId         = siNeidanlocal neidanConf    = neidanConflocal function AddAttr(actor, type, value) -- 添加属性    LActor.luaAttrInit(actor, LuaAttrDef.NeidanAttr)    LActor.luaAttrClear(actor, LuaAttrDef.NeidanAttr)    LActor.luaAttrAdd(actor, LuaAttrDef.NeidanAttr, type, value)    LActor.refreshActor(actor)endlocal function InitActor(actor)    local ast = LActor.getStaticVar(actor)    if not ast.neidanSys then        ast.neidanSys =        {            level = 1,            upLevel = false        }    end    local neidan = ast.neidanSys    local levelTotalCount = #neidanConf.level[neidan.level] -- 当前等级的属性种类总数    if neidan.attr then         --print("当前等级[" .. neidan.level .. "]角色属性种类总数" .. #neidan.attr)        --print("当前等级[" .. neidan.level .. "]配置属性种类总数" .. levelTotalCount)    end    if not neidan.attr then        neidan.attr = {}        for i = 1, levelTotalCount do            neidan.attr[i] = { value = 0 }        end        return neidan    elseif #neidan.attr < levelTotalCount then -- 配置文件属性增减处理        for i = 1, levelTotalCount do            if not neidan.attr[i] then -- 缺哪个补哪个,配置减少不处理配置的时候赋空值即可                neidan.attr[i] = { value = 0 }            end        end    end    return neidanendlocal function OnOneKeyHandler(actor, index)    --print("----------------OnOneKeyHandler----------------")    local neidan = InitActor(actor)    local attrAst = neidan.attr    local level = neidan.level    local totalConf = neidanConf.totalAttrType    local levelConf = neidanConf.level    local attrConf = levelConf[level]    --print("index:" .. index)    if index == 0 then        for i = 1, #attrConf do            local limit = attrConf[i].limit            local type = attrConf[i].type            local item = neidanConf.item[type]            local add = item.add            local id = item.id            local value = attrAst[i].value            local surplus = limit - value            --print("value" .. i .. "数量：" .. value)            --print("level" .. i .. "数量：" .. level)            --print("limit" .. i .. "数量：" .. limit)            --print("surplus" .. i .. "数量：" .. surplus)            --print("add" .. i .. "数量：" .. add)            local needNeiDanCount = surplus / add            local haveNeiDanCount = LActor.getItemCount(actor, id, -1, -1, -1)            --print("拥有的内丹" .. i .. "数量：" .. haveNeiDanCount)            --print("需要的内丹" .. i .. "数量：" .. needNeiDanCount)            if haveNeiDanCount ~= 0 then                local del = 0                if haveNeiDanCount > needNeiDanCount then                    del = needNeiDanCount                    neidan.upLevel = true                else                    del = haveNeiDanCount                    neidan.upLevel = false                end                attrAst[i].value = attrAst[i].value + del * add                --print("添      加" .. i .. "属性：" .. del * add)                AddAttr(actor, attrConf[i].type, del * add)                --print("移除的内丹" .. i .. "数量：" .. del)                LActor.removeItem(actor, id, del, -1, -1, -1, "neidan_remove")            else                neidan.upLevel = false                SendTipMsg(actor, TipMsgId.tpLua10)            end        end        NetSendInfo(actor)    end    if index == -1 then        --print("突破")        if neidan.upLevel and neidan.level<= 50 then            neidan.upLevel = false            neidan.level = neidan.level + 1            --print("LevelUp:" .. neidan.level)            NetSendInfo(actor)        end    endend----------------Net----------------function NetSendInfo(actor)    if not LActor.isActorSystemOpen(actor, sysId) then return end    --print("NetSendInfo")    local neidan = InitActor(actor)    local pack = DataPack.allocPacket(actor, 179, 25)    DataPack.writeChar(pack, #neidan.attr)    DataPack.writeInt(pack, neidan.level)    for i = 1, #neidan.attr do        DataPack.writeInt(pack, neidan.attr[i].value)    end    DataPack.flush(pack)endfunction NetRequInfo(actor, pack) -- 全部 和 一个    if not LActor.isActorSystemOpen(actor, sysId) then return end    local index = DataPack.readChar(pack)    OnOneKeyHandler(actor, index)end----------------Gm----------------local function GmClear(actor, args)    local neidan = InitActor(actor)    local level = neidan.level    local levelConf = neidanConf.level    local attrConf = levelConf[level]    for i = 1, #attrConf do        neidan.attr[i].value = 0    endendlocal function GmPrint(actor, args)    local neidan = InitActor(actor)    local level = neidan.level    local levelConf = neidanConf.level    local attrConf = levelConf[level]    for i = 1, #attrConf do        print("value[" .. i .. "]:" .. neidan.attr[i].value)    endendlocal function GmOpen(actor)    logger:Info("NeiDanSystemOpen")    OnOpenSystem(actor, {sysId})endlocal function GmAdd(actor, args)    AddAttr(actor, args[1], args[2])end----------------Sys----------------function OnOpenSystem(actor, args)    InitActor(actor)    NetSendInfo(actor)endfunction OnLogin(actor)    -- RefreshAttr(actor)endlocal function OnInit()    ActorRegisterNetHandler(179, 25, NetRequInfo)    GmEventFuncList.register("neidan.clear", GmClear, 1)    GmEventFuncList.register("neidan.print", GmPrint, 1)    GmEventFuncList.register("neidan.open", GmOpen, 1)    GmEventFuncList.register("neidan.add", GmAdd, 1)    RegisterSystem(siNeidan, _M)endtable.insert(InitFnTable, OnInit) -- @proto 179 25 0