DM实力内部技术团队寻流放2GZS合作QQ:166790920	包年位置，投放QQ190959022	包年位置，投放QQ190959022
详情点进来：Q68828075	诚邀工作室代理开发转型	股票代操盘无任何套路
无忧ip 注册即送银牌会员，尽享9.5折优惠	15年老工作室千台E5+ 来合作 Q150525135	手把手一站式项目开发培训，QQ:1026165915
全站文字广告位点击查看报价投放QQ190959022

发帖回复

5651阅读
0回复

996 传奇 lua数据 [复制链接]

上一主题下一主题查看指定楼层

离线mudebug

韶华一笑间

发帖: 1

金钱: 412

威望: 402

贡献值: 0

诚信值: 0

社区警告: 0

纠纷记录: 0

冻结资金: 0

保证金: 0

只看楼主倒序阅读楼主发表于: 2024-01-05

游戏地址
www.fgcq996.com
那年传奇百区1.76

找到 lua_State 然后调用下面的函数就能实现功能
一个跑单狗注意qq1946913194
游戏账号密码。fanren9527 qq2293307009

搞完演示完，删除好友跑单

--自动寻路Ex
function API_AutoMoveEx(mapX, mapY)
    ssr.AutoMoveBegin(mapX, mapY, ssr.GetCurMapData().mapID)
    local inputProxy = global.Facade:retrieveProxy(global.ProxyTable.PlayerInputProxy)
    local pathPoints = inputProxy:GetPathFindPoints()
    if pathPoints == nil then
        return 0
    end
    return #pathPoints
end

--自动寻路
function API_AutoMove(mapX, mapY)
    ssr.AutoMoveBegin(mapX, mapY, ssr.GetCurMapData().mapID)
    local inputProxy = global.Facade:retrieveProxy(global.ProxyTable.PlayerInputProxy)
    local pathPoints = inputProxy:GetPathFindPoints()
    if pathPoints == nil then
        return 0
    end
    return #pathPoints
end

--停止寻路
function API_AutoMoveEnd()
    global.Facade:sendNotification(global.NoticeTable.AutoMoveEnd)
end

--自动打怪
function API_AutoFight(isAFK)
    if isAFK then
        if not IsAFKState() then
            global.networkCtl:SendMsg(global.MsgType.MSG_CS_AUTOPLAYGAME_REQUEST, 1)
            global.Facade:sendNotification(global.NoticeTable.AFKBegin)
        end
    else
        if IsAFKState() then
            global.networkCtl:SendMsg(global.MsgType.MSG_CS_AUTOPLAYGAME_REQUEST, 2)
            global.Facade:sendNotification(global.NoticeTable.AFKEnd)
        end
    end
end

function IsAFKState()
    local AutoProxy = global.Facade:retrieveProxy(global.ProxyTable.Auto)
    return AutoProxy:IsAFKState()
end

--打开自动穿戴
function API_AutoDress()
--不抢别人归属
global.MMO.SETTING_IDX_NO_ATTACK_HAVE_BELONG =1
    global.MMO.SETTING_IDX_AUTO_PUT_IN_EQUIP = 1
    local ServerOptionsProxy = global.Facade:retrieveProxy(global.ProxyTable.ServerOptionsProxy)
    ServerOptionsProxy._data["autoDress"] = 1
    global.ConstantConfig.autousetimes = 0
end

--强制打开自动挂机拾取
function API_AutoPick()
    local ItemConfigProxy = global.Facade:retrieveProxy(global.ProxyTable.ItemConfigProxy)
    local config = ItemConfigProxy.config
    for k, v in pairs(config) do
        --local res = string.gsub(v.pickset, "0", "1")
        v.pickset = v.pickset .. 1
    end
end

--获取人物坐标
function API_GetMapXY()
    return ssr.GetMainPlayerMapPos()
end

--获取人物状态
function API_GetAction()
    local player = global.gamePlayerController:GetMainPlayer()
    local list = global.playerManager.mPlayersInCurrViewField
    return player:GetAction()
end

--设置宠物状态
function API_PetSleep(isSleep)
    local SummonsProxy = global.Facade:retrieveProxy(global.ProxyTable.SummonsProxy)
    if not SummonsProxy:IsAlived() then
        return false
    end
    if isSleep then
        SummonsProxy:RequestModeChange(2)
    else
        SummonsProxy:RequestModeChange(4)
    end
end

--获取人物数据
function API_GetGamePlayer()
    local player = global.gamePlayerController:GetMainPlayer()
    local list = global.playerManager.mPlayersInCurrViewField
    local person = {}
    person["等级"] = player:GetLevel()
    person["职业"] = player:GetJobID()
    person["名字"] = player:GetName()
    person["金币"] = ssr.GetMoneyCountById(1)
    person["元宝"] = ssr.GetMoneyCountById(2)
    person["绑金"] = ssr.GetMoneyCountById(3)
    return person
end

function API_GetGamePlayerLevel()
    local player = global.gamePlayerController:GetMainPlayer()
    return player:GetLevel()
end

--获取周围怪物
function API_GetMonster()
    local list = global.monsterManager.mMonstersInCurrViewField
    local actors = {}
    for k, v in pairs(list) do
        local actor = {}
        actor["mID"] = v:GetID()
        actor["mName"] = v:GetName()
        actor["mRace"] = v:GetRace()
        actor["mType"] = v:GetType()
        actor["mSubType"] = v:GetSubType()
        actor["mX"] = v:GetMapX()
        actor["mY"] = v:GetMapY()
        actor["mAction"] = v:GetAction()
        actor["mTypeIndex"] = v:GetTypeIndex()
        actor["mAnimationID"] = v:GetAnimationID()
        actor["mLv"] = (v.GetLevel and { v:GetLevel() } or { 0 })[1]
        actor["mSex"] = (v.GetSexID and { v:GetSexID() } or { 0 })[1]
        actor["mJobID"] = (v.GetJobID and { v:GetJobID() } or { 0 })[1]
        actor["mHP"] = (v.GetHP and { v:GetHP() } or { 0 })[1]
        actor["mHPMax"] = (v.GetMaxHP and { v:GetMaxHP() } or { 0 })[1]
        actor["mMP"] = (v.GetMP and { v:GetMP() } or { 0 })[1]
        actor["mMPMax"] = (v.GetMaxMP and { v:GetMaxMP() } or { 0 })[1]
        actor["mOwnerID"] = (v.GetOwnerID and { v:GetOwnerID() } or { "" })[1]
        actor["mOwnerName"] = (v.GetOwnerName and { v:GetOwnerName() } or { "" })[1]
        actor["mGuildName"] = (v.mGuildName and { v.mGuildName } or { "" })[1]
        actor["mColor"] = "0xFFFFFF"
        if v:GetType() == global.MMO.ACTOR_PLAYER then
            local batch_label = global.MMO.HUD_TYPE_BATCH_LABEL
            local label_name  = global.MMO.HUD_LABEL_NAME
            local hudName     = global.HUDManager:GetHUD(v:GetID(), batch_label, label_name)
            if hudName then
                actor["mColor"] = GetColorHexFromRBG(hudName:getColor())
            end
        end
        table.insert(actors, actor);
    end

    return actors
end

--遍历周围玩家
function API_GetPlayer()
    local list = global.playerManager.mPlayersInCurrViewField
    local actors = {}
    for k, v in pairs(list) do
        local actor = {}
        actor["mID"] = v:GetID()
        actor["mName"] = v:GetName()
        actor["mRace"] = v:GetRace()
        actor["mType"] = v:GetType()
        actor["mSubType"] = v:GetSubType()
        actor["mX"] = v:GetMapX()
        actor["mY"] = v:GetMapY()
        actor["mAction"] = v:GetAction()
        actor["mTypeIndex"] = v:GetTypeIndex()
        actor["mAnimationID"] = v:GetAnimationID()
        actor["mLv"] = (v.GetLevel and { v:GetLevel() } or { 0 })[1]
        actor["mSex"] = (v.GetSexID and { v:GetSexID() } or { 0 })[1]
        actor["mJobID"] = (v.GetJobID and { v:GetJobID() } or { 0 })[1]
        actor["mHP"] = (v.GetHP and { v:GetHP() } or { 0 })[1]
        actor["mHPMax"] = (v.GetMaxHP and { v:GetMaxHP() } or { 0 })[1]
        actor["mMP"] = (v.GetMP and { v:GetMP() } or { 0 })[1]
        actor["mMPMax"] = (v.GetMaxMP and { v:GetMaxMP() } or { 0 })[1]
        actor["mOwnerID"] = (v.GetOwnerID and { v:GetOwnerID() } or { "" })[1]
        actor["mOwnerName"] = (v.GetOwnerName and { v:GetOwnerName() } or { "" })[1]
        actor["mGuildName"] = (v.mGuildName and { v.mGuildName } or { "" })[1]
        actor["mColor"] = "0xFFFFFF"
        if v:GetType() == global.MMO.ACTOR_PLAYER then
            local batch_label = global.MMO.HUD_TYPE_BATCH_LABEL
            local label_name  = global.MMO.HUD_LABEL_NAME
            local hudName     = global.HUDManager:GetHUD(v:GetID(), batch_label, label_name)
            if hudName then
                actor["mColor"] = GetColorHexFromRBG(hudName:getColor())
            end
        end
        table.insert(actors, actor);
    end
    return actors
end

--遍历周围玩家EX
function API_GetPlayerExe()
    local s1 = API_GetPlayer()
    local result = ""
    for k, v in pairs(s1) do
        local s2 = string.format(
            "mID=%s,mName=%s,mRace=%s,Dura=%s,mType=%s,mSubType=%s,mX=%s,mY=%s,mAction=%s,mTypeIndex=%s,mAnimationID=%s,"
            , v["mID"]
            , v["mName"]
            , v["mRace"]
            , v["Dura"]
            , v["mType"]
            , v["mSubType"]
            , v["mX"]
            , v["mY"]
            , v["mAction"]
            , v["mTypeIndex"]
            , v["mAnimationID"])
        local s3 = ""
        local s3 = string.format("mLv=%s,mSx=%s,mJD=%s,mHP=%s,mHPx=%s,mMP=%s,mMPx=%s,mOID=%s,OwN=%s,mGld=%s,mCor=%s"
        , v["mLv"]
        , v["mJobID"]
        , v["mHP"]
        , v["mHPMax"]
        , v["mMP"]
        , v["mMPMax"]
        , v["mOwnerID"]
        , v["mOwnerName"]
        , v["mGuildName"]
        , v["mColor"])
        result = result .. s2 .. s3 .. "\r\n"
    end
    return result
end

--遍历周围指定NPC
function API_GetNpcIdByName(npcName)
    local npcVec = global.npcManager:FindNpcInCurrViewField()
    local npc = {}
    for k, v in pairs(npcVec) do
        local npcs = {}
        npc[v["mID"]] = v["mName"]
    end
    for key, value in pairs(npc) do
        local sPos, ePos = string.find(value, npcName)
        if sPos then
            return key
        end
    end
    return nil
end

--NPC名称打开NPC
function API_NpcTalk(npcName)
    local npcid = API_GetNpcIdByName(npcName)
    local NPCProxy = global.Facade:retrieveProxy(global.ProxyTable.NPC)
    NPCProxy:RequestTalk(npcid)
end

--NPCID打开NPC
function API_NpcTalkEx(npcid)
    local NPCProxy = global.Facade:retrieveProxy(global.ProxyTable.NPC)
    NPCProxy:RequestTalk(npcid)
end

function API_GetNpcTalkData()
    local NPCProxy = global.Facade:retrieveProxy(global.ProxyTable.NPC)
    local talkData = NPCProxy:GetCurrentNPCTalkData()
    return talkData
end

function API_GetAllLink()
    local talkData = API_GetNpcTalkData()

    local acts = {}
    local kv = {}

    for line in talkData.content:gmatch("(text=.->)") do
        if string.find(line, "@") then
            local key = line:match("text=(.-)|")

            local value = line:match("(@.-)>")
            kv[key] = value
        end
    end

    for result in talkData.content:gmatch("(@.-)>") do
        table.insert(acts, result)
    end
    local sendData = {
        UserID = talkData.npcID,
        index  = talkData.index,
        --Act    = "@blbumj",
        --commonInput = jsonData.commonInput,
        --inputID= jsonData.inputID,
    }
    return acts, kv, sendData
end

--按索引号点击按
function API_ClickLinkByIndex(index)
    acts, kv, sendData = API_GetAllLink()
    sendData["Act"] = acts[index + 2]
    local NPCProxy = global.Facade:retrieveProxy(global.ProxyTable.NPC)
    NPCProxy:ExecuteWithJsonData(sendData)
end

--按索购买引号点击按
function API_ClickBuyLinkByIndex(index)
    acts, kv, sendData = API_GetAllLink()
    sendData["Act"] = acts[index]
    local NPCProxy = global.Facade:retrieveProxy(global.ProxyTable.NPC)
    NPCProxy:ExecuteWithJsonData(sendData)
end

--按名称点击按
function API_ClickLinkByName(linkName)
    acts, kv, sendData = API_GetAllLink()
    sendData["Act"] = kv[linkName]
    local NPCProxy = global.Facade:retrieveProxy(global.ProxyTable.NPC)
    NPCProxy:ExecuteWithJsonData(sendData)
end

--出售物品
function API_Sell(npcName,itemsName)
    local npcId=API_GetNpcIdByName(npcName)
    local bagData=ssr.getBagData()
    for k,v in pairs(bagData) do
        if string.find(itemsName,v.Name) then
            --if #v["Values"]<2 then
                local Name = v.Name
                local MakeIndex = v.MakeIndex
                local networkCtl = global.networkCtl
                networkCtl:SendMsg(global.MsgType.MSG_CS_NPC_STORE_SELL_ITEM, npcId, MakeIndex , 0, 0, Name , string.len(Name) )
            --end
        end
    end
end
--全部卖
function API_SellAll(npcName)
    local npcId=API_GetNpcIdByName(npcName)
    local bagData=ssr.getBagData()
    for k,v in pairs(bagData) do
        --if #v["Values"]<2 then
            local Name = v.Name
            local MakeIndex = v.MakeIndex
            local networkCtl = global.networkCtl
            networkCtl:SendMsg(global.MsgType.MSG_CS_NPC_STORE_SELL_ITEM, npcId, MakeIndex , 0, 0, Name , string.len(Name) )
        --end
    end
end

--NPC购买
function API_Buy(npcName,itemName,count)
    --进入子菜单
    local sendData =
    {
        UserID = API_GetNpcIdByName(npcName),
        Name = itemName,
    }
    SendTableToServer(1015, sendData)
    local function ToBuy()
        local NPCProxy = global.Facade:retrieveProxy(global.ProxyTable.NPC)
        local list = NPCProxy.facade.view.mediatorMap.NPCStoreMediator._layer.itemList
        for i=1,count do
            if i>#list then
                break
            end
            sendData.MakeIndex= list[#list-i].MakeIndex
            SendTableToServer(1014, sendData)
        end
        API_CloseNpcTalk()
    end
    local scheduleID = ssr.PerformWithDelayGlobal(ToBuy, 1)
end

function 打开子项(item)
    local NPCProxy = global.Facade:retrieveProxy(global.ProxyTable.NPC)
    if item.SubMenu == 1 then
        NPCProxy:RequestNpcStoreItemList(item)
    end
end

function 子项购买(count)
    local list = NPCProxy.facade.view.mediatorMap.NPCStoreMediator._layer.itemList
    for i = 1, count do
        if i > #list then break end
        NPCProxy:RequestNpcStoreBuy(list)
    end
end

--登录角色

function API_LoginRole(index)
    local LoginProxy = global.Facade:retrieveProxy(global.ProxyTable.Login)
    LoginProxy:SetSelectedRoleByIndex(index)
    LoginProxy:RequestEnterGame()
    global.Facade:sendNotification(global.NoticeTable.Audio_Stop_BGM)
end

--登录
function API_Login(name, password)
    local AuthProxy = global.Facade:retrieveProxy(global.ProxyTable.AuthProxy)
    local data = {}
    data.type = 1
    data.username = name
    data.password = password
    AuthProxy:RequestLogin(data)
end

--开门
function API_EnterRoom(x, y)
    local qq = ssr.GetCurMapData()
    global.networkCtl:SendMsg(global.MsgType.MSG_CS_OPEN_DOOR_REQUEST, 0, x, y)
    local function callback()
        ssr.AutoMoveBegin(x, y, qq.mapID)
    end
    SL:ScheduleOnce(callback, 0.5)
end

--多开
function API_PcOpen()
    LuaBridgeCtl:Inst():CheckClientCount(2)
end

--盒子显示
function API_hezi()
    global.L_GameEnvManager._envData["isBoxLogin"] = 1
end

--遍历背包物品
function API_GetCurBagData()
    local s1 = ssr.getCurBagData()
    local result = ""
    for k, v in pairs(s1) do
        local s1 = string.format(
            "OverLap=%s,DuraMax=%s,Where=%s,Dura=%s,Name=%s,Shape=%s,MakeIndex=%s,Weight=%s,StdMode=%s,Index=%s"
            , v["OverLap"]
            , v["DuraMax"]
            , v["Where"]
            , v["Dura"]
            , v["Name"]
            , v["Shape"]
            , v["MakeIndex"]
            , v["Weight"]
            , v["StdMode"]
            , v["Index"])
        local ss = ""
        if #v["Values"] > 1 then
            for x, y in pairs(v["Values"]) do
                if y["Value"] > 0 then
                    local Values = string.format("m_Value=%s,m_ValueID=%s"
                    , y["Value"]
                    , y["Id"])
                    ss = ss .. Values
                end
            end
        end
        result = result .. s1 .. "," .. ss .. "\r\n"
    end
    return result
end

--获取背包是否满
function API_GetBagFull()
    return ssr.IsBagToFull(isTips)
end

--获取背包百分比
function API_GetBagEx()
    HW = ssr.GetMetaValueByKey("BW")
    MAXHW = ssr.GetMetaValueByKey("MAXBW")
    ELL = HW / MAXHW * 100
    return math.ceil(ELL)
end

--获取背包是否满
function API_GetBagFull()
    return ssr.IsBagToFull(isTips)
end

--读取地图ID
function API_GetMapID()
    local tt = ssr.GetCurMapData()
    return tt.mapID
end

--读取地图名称
function API_GetMapName()
    local tt = ssr.GetCurMapData()
    return tt.mapName
end

--获取背包最大数
function API_GetMaxBag()
    return ssr.GetMaxBag()
end

--使用物品
function API_UseItem(itemName)
    local items = ssr.getQuickUseData()
    local item = ssr.getCurBagData()
    for k, v in pairs(items) do
        if v.Name == itemName then
            ssr.UseItemByIndex(v.Index)
        end
    end

    for k, v in pairs(item) do
        if v.Name == itemName then
            ssr.UseItemByIndex(v.Index)
        end
    end
end

--获取金币数量
function API_GetMoney(Index)
    return ssr.GetMoneyCountById(Index)
end

function API_MergeTables(t1, t2)
    local merged = {}
    for key, value in pairs(t1) do
        merged[key] = value
    end
    for key, value in pairs(t2) do
        merged[key] = value
    end
    return merged
end

--获取物品数量
function API_GetItemCount(itemName,isBind)
    local items=ssr.getQuickUseData()
    local bagData=ssr.getBagData()
    items=API_MergeTables(items,bagData)
    local bind=isBind or false
    local count=0
    for k,v in pairs(items) do
        if bind then
            --绑定
            if v.Name==itemName and v.Bind~=nil then
                count=count+ v.OverLap
            end
        else
            --不绑定
            if v.Name==itemName and v.Bind==nil then
                count=count+ v.OverLap
            end
        end
    end
    return count
end
--读取人物坐标

function API_GetMapXY()
    local aa = ssr.GetMainPlayerMapPos()
    local aa = string.format("x=%s,y=%s"
    , aa.x
    , aa.y)
    return aa
end

-- 获取角色是否活着
function API_IsRoleAlive()
    return ssr.IsRoleAlive()
end

--读取聊天信息
function API_ChatMsg()
    local function listcb(msg)
        --table
        ChatTable = msg
    end
    ssr.RegisterLUAEvent("OnAddChatItem", "增加聊天消息", listcb)
    if ChatTable.mt == 1 and ChatTable.ChannelId == 3 or ChatTable.ChannelId == 6 then
        local ChatT = string.format(
            "SendName=%s,SendId=%s,ChannelId=%s,mt=%s,SendTime=%s,Msg=%s"
            , ChatTable.SendName
            , ChatTable.SendId
            , ChatTable.ChannelId
            , ChatTable.mt
            , ChatTable.SendTime
            , ChatTable.Msg)
        return ChatT
    end
end

function API_ChatMaa()
    return ssr.GetMaxBag()
end

--修理装备
function API_CopyTable(original)
    local copy = {}
    for key, value in pairs(original) do
        if type(value) == "table" then
            copy[key] = API_CopyTable(value)
        else
            copy[key] = value
        end
    end
    return copy
end
修衣服 = "0,4" --衣服，头盔
修武器 = "1"
修项链 = "3"
修手镯 = "5,6"
修戒指 = "7,8" --左戒指右戒指
function API_Repair(npcName, itemPos)
    local npcId = API_GetNpcIdByName(npcName)
    local tempData = ssr.getEquipData()
    local tobeRepair = {}
    for k, v in pairs(tempData) do
        if string.find(itemPos, tostring(v["Where"])) and v["Dura"] ~= v["DuraMax"] then
            local tmp = {
                Name = v.Name,
                MakeIndex = v.MakeIndex,
                Where = v.Where
            }
            table.insert(tobeRepair, tmp)
            ssr.TakeOffEquipRequest(v)
        end
    end
    --脱完开始修理
    for k, v in pairs(tobeRepair) do
        local Name = v.Name
        local MakeIndex = v.MakeIndex
        local networkCtl = global.networkCtl
        networkCtl:SendMsg(1023, npcId, MakeIndex, 0, 0, Name, string.len(Name))
    end
    --开始穿
    local function ToDress()
        for k, v in pairs(tobeRepair) do
            ssr.TakeOnEquipRequest(v, v["Where"])
        end
    end
    local scheduleID = ssr.PerformWithDelayGlobal(ToDress, 1)
    API_CloseNpcTalk()
end

药店={0}
首饰店={19,20,21,22,23,24,26}
衣服店={10,11,15,16,27,28,62,64}
武器店={5,6}
杂货店={3,25,2,30,31}
铁匠铺={43}
书店={4}
--检测背包是否有指定类型物品
function API_IsNeedToStore(StdModes)
    local function IsNeed(StdMode)
        local bagData=ssr.getBagData()
        for k,v in pairs(bagData) do
            if v.StdMode==StdMode then
                return true
            end
        end
        local EquipProxy = global.Facade:retrieveProxy(global.ProxyTable.Equip)
        local equip = EquipProxy:GetEquipData()
        for k,v in pairs(equip) do
            if v.StdMode==StdMode then
                if tonumber(v.Dura)/v.DuraMax < 0.9 then
                    return true
                end
            end
        end
        return false
    end

    for k,v in pairs(StdModes) do
        if IsNeed(v) then
            return true
        end
    end
    return false
end

--范围内怪物个数  bool型返回distance
function API_范围内怪物个数(distance, count)
    local proxyUtils   = requireProxy("proxyUtils")
    local mainPlayerID = global.gamePlayerController:GetMainPlayerID()
    return proxyUtils.checkIsEnoughEnemy(mainPlayerID, count, distance)
end
--关闭NPC框
function API_CloseNpcTalk()
    global.Facade:sendNotification(global.NoticeTable.Layer_NPC_Talk_Close)
    global.Facade:sendNotification(global.NoticeTable.GuideEventEnded, {name = "GUIDE_END_NPC_TALK_LAYER_CLOSED"})
end
--无怪随机
function API_无怪随机()
    local list = global.monsterManager.mMonstersInCurrViewField
    local actors = {}
    for k, v in pairs(list) do
        local actor = {}
        actor["mID"] = v:GetID()
        table.insert(actors, actor);
    end
    if #actors < 1 then
        API_UseItem("随机传送石")
        local aa = API_GetItemCount(1078)
        if aa < 1 then
            ssr.BuyStoreItemsById(2, 1)
        end
    end
    return #actors
end

--API_周围怪物数量
function API_周围怪物数量()
    local list = global.monsterManager.mMonstersInCurrViewField
    local actors = {}
    for k, v in pairs(list) do
        local actor = {}
        actor["mID"] = v:GetID()
        table.insert(actors, actor);
    end
    return #actors
end

--API_周围人物数量  参数是白名单
function API_视野内敌人(Name, lv)
    local list = global.playerManager.mPlayersInCurrViewField
    local myName = global.gamePlayerController:GetMainPlayer():GetName()
    local actors = {}
    local names = myName .. "," .. Name
    for k, v in pairs(list) do
        local actor = {}
        actor["mID"] = v:GetID()
        actor["mName"] = v:GetName()
        actor["mLv"] = (v.GetLevel and { v:GetLevel() } or { 0 })[1]
        --local myName=global.gamePlayerController:GetMainPlayer():GetName()
        if not string.find(names, actor["mName"]) and tonumber(actor["mLv"]) > lv then
            table.insert(actors, actor);
        end
    end
    return #actors
end

--自动捡
API_NoBodyPickEnable=true

--捡取物品白名单
API_MyPlayerNames = "我不是药神,"

--全图捡
API_MapPickEnable = true
--自动存
API_InStoreEnable=false
API_InStoreItems=""
--自动扔
API_ItemDropEnable=false
--自动用
API_ItemKeepCountEnable=true
--自动领取
API_GetMailItemEnable=false
--自动买回城石
API_BuyStoneEnable=false
API_RecoveryItemMaxMoney=1000000
--地图
API_PreMapName="盟重省"
--开关
API_TimerEnable=true

API_TimerEnable1s=true
API_TimerEnable10s=true
--1S定时器
function API_AutoSchedule1s()
    if GET_GAME_STATE() == "world" and API_TimerEnable1s then
        --自己设置的自动捡
        --API_PickItems()
        --系统自动捡
        if API_NoBodyPickEnable then
            if API_IsInCurrViewField(API_MyPlayerNames) then
                API_OpenGroupPick(false)
                --release_print("来人，关自动捡")
                --API_RunAway() --逃跑
                --API_UseItem3Second("回城石")
            else
                API_OpenGroupPick(true)
                API_PickItems()
                --release_print("无人，开自动捡")
            end
        end
    end
end
--10s定时器
function API_AutoSchedule10s()
    if GET_GAME_STATE()=="world" and API_TimerEnable then
        --自动扔
        if API_ItemDropEnable then
            API_DropItemKeep("回城卷",2)
        end

        --自动组队
    if ssr.GetCurMapData().mapName == "石墓二层" or ssr.GetCurMapData().mapName == "石墓三层" or ssr.GetCurMapData().mapName == "地牢一层西" then
        API_InviteJoinTeam()
        API_TeamApplyUpdate() --允许所有邀请
    end

        --自动用消耗品
        if API_ItemKeepCountEnable then
            if API_GetItemCount("强效金创药") > 1 then
                API_UseItem("强效金创药")
            end
            if API_GetItemCount("强效魔法药") > 1 then
                API_UseItem("强效魔法药")
            end
            if API_GetItemCount("太阳水") > 1 then
                API_UseItem("太阳水")
            end
            if API_GetItemCount("魔法药(中量)") > 7 then
                API_UseItem("魔法药(中量)")
            end
            if API_GetItemCount("魔法药(中量)") < 1 then
                API_UseItem("魔法药(中)包")
            end
            if API_GetItemCount("金创药(中量)") > 1 then
                API_UseItem("金创药(中量)")
            end
            if API_GetItemCount("护身符(大)") < 1 then
                API_UseItem("回城卷")
            end
            if API_GetItemCount("魔法药(中量)") < 1 and SL:GetMetaValue("MAP_NAME") ~= "盟重省" and API_GetItemCount("魔法药(中)包") < 1 then
                API_UseItem("回城卷")
            end
            if SL:GetMetaValue("HP") < 30 and not SL:GetMetaValue("IN_SAFE_AREA") then
                API_UseItem("回城卷")
            end
        end

        if API_GetMailItemEnable then
            global.networkCtl:SendMsg(global.MsgType.MSG_CS_EMAIL_GET_REQUEST, 2)
            global.Facade:sendNotification(global.NoticeTable.Layer_Enter_Current)
        end
    end
end

--定时器
function API_TimerStart()
    --1S定时开关
    if API_AutoScheduleID1s == nil then
        API_AutoScheduleID1s = ssr.Schedule(API_AutoSchedule1s, 1)
    else
        ssr.UnSchedule(API_AutoScheduleID1s)
        API_AutoScheduleID1s = ssr.Schedule(API_AutoSchedule1s, 1)
    end
    --10S定时开关
    if API_AutoScheduleID10s == nil then
        API_AutoScheduleID10s = ssr.Schedule(API_AutoSchedule10s, 10)
    else
        ssr.UnSchedule(API_AutoScheduleID10s)
        API_AutoScheduleID10s = ssr.Schedule(API_AutoSchedule10s, 10)
    end
end
function API_IsInCurrViewField(names, level)
    local lv = level or 0
    local nameList = names or ""
    local list = global.playerManager.mPlayersInCurrViewField
    local actors = {}
    for k, v in pairs(list) do
        local actor = {}
        actor["mID"] = v:GetID()
        actor["mName"] = v:GetName()
        actor["mLv"] = (v.GetLevel and { v:GetLevel() } or { 0 })[1]
        if not string.find(names, actor["mName"]) and tonumber(actor["mLv"]) > lv then
            table.insert(actors, actor);
        end
    end
    if #actors > 0 then
        return true
    else
        return false
    end
end

--打开组捡
function API_OpenGroupPick(isOpen)
    local GameSettingProxy = global.Facade:retrieveProxy(global.ProxyTable.GameSettingProxy)
    local count = 0
    for key, value in pairs(GameSettingProxy._pickConfig) do
        count = count + 1
    end
    local function SetGroup(pickgroup)
        for i = 1, count do
            GameSettingProxy:SetPickGroupValue(i, pickgroup)
        end
    end
    if isOpen then
        local pickgroup = { 1, 1, 1 }
        SetGroup(pickgroup)
    else
        local pickgroup = { 1, 1, 0 }
        SetGroup(pickgroup)
    end
end
gXt O*Rfqk

广海社区提醒您：
1.忘记账号、密码、安全问题等常见站务问题，请查看论坛左上角站点帮助
2.请理性对待商业信息，如有交易，强烈建议您选择广海中介进行交易
3.欢迎购买广海社区广告位，感谢您的支持，报价及位置详见广海社区广告服务
4.特殊会员售价50元，积分（金钱和威望）无限，更多权限，欢迎到广海淘宝购买
5.广海社区唯一域名ghoffice.cc，唯一QQ190959022，其他均为假冒，谨防上当受骗
6.如您被骗，请查看广海社区举报中心，按照要求和流程提交举报材料，未经核实的举报帖子将一律删除
7.如您发现违规违法内容，欢迎点击帖子右下角举报按钮进行举报，也可到站务办公版块匿名发帖举报
免责声明
文中内容未经本站证实，对本文以及其中全部或者部分内容、文字的真实性、完整性、及时性本站不作任何保证或承诺，请读者仅作参考，并请自行核实相关内容。私下交易造成损失的，本站概不负责。

分享到 淘江湖新浪 QQ微博 QQ空间开心人人豆瓣网易微博百度鲜果白社会飞信

发帖回复

返回列表


	https://www.ghoffice.cc 访问内容超出本站范围，不能确定是否安全


	关闭您还没有登录，快捷通道只有在登录后才能使用。立即登录还没有帐号？赶紧注册一个


	关闭选中1篇全选