《新天龙八部》官方论坛-【十二周年】今日火爆公测

标题: 自动还童 [打印本页]

作者: 花花花的花    时间: 2024-5-21 14:14
标题: 自动还童
小MI 这么自动还童啊,65级一下的宝宝。这么设置
作者: 大师~    时间: 2024-5-21 16:28
另外添加的
作者: 花花花的花    时间: 2024-5-21 17:31
大师~ 发表于 2024-5-21 16:28
另外添加的

手动添加的?怎么添加呢
作者: QQ图像    时间: 2024-5-21 20:23
现在没啥价值,几率低了
作者: 取个名字2天    时间: 2024-5-21 22:26
function 查询珍兽成长率(珍兽名称)
屏幕提示("珍兽查询成长率:"..珍兽名称)
       LUA_Call(string.format([[
        for i=0, 9 do
                if Pet:IsPresent(i) then
                                        local Petchengzhanglv = Pet : GetGrowRate(i);
                     local PetName=Pet:GetName(i)

                      if PetName==PetDoName then
                                                if tonumber(Petchengzhanglv) < 500 then
                                                                local hid,lid = Pet:GetGUID(i);
                                                                PushDebugMessage("资质鉴定珍兽成长:"..PetName)
                             Clear_XSCRIPT();
                             Set_XSCRIPT_Function_Name("OnInquiryForGrowRate");
                             Set_XSCRIPT_ScriptID(1050);
                             Set_XSCRIPT_Parameter(0,hid);
                             Set_XSCRIPT_Parameter(1,lid);
                             Set_XSCRIPT_ParamCount(2);
                             Send_XSCRIPT();   
                                        end
                        end
         end
        end       
        ]], 珍兽名称))
end

function 珍兽还童(珍兽名称,材料)
                材料位置=获取背包物品位置(材料)-1
       LUA_Call(string.format([[
       
                      local  PetDoName ="%s"
                        local nPetCount = Pet : GetPet_Count()
                    -- PushDebugMessage("当前珍兽数量:"..nPetCount )
for i=0, 9 do
                if Pet:IsPresent(i) then
                            local Petchengzhanglv = Pet : GetGrowRate(i);
                             local PetName=Pet:GetName(i)
                 --PushDebugMessage(Petchengzhanglv)
                      if PetName==PetDoName then
                                                        Pet : SkillStudy_Do(2, i, %d)
                      end
                                        end
        end       
        ]], 珍兽名称,材料位置))
end       


--查询珍兽成长率


function 查询所有珍兽成长率()
屏幕提示("查询所有珍兽成长率")
       LUA_Call(string.format([[

for i=0, 9 do
                if Pet:IsPresent(i) then
                            local Petchengzhanglv = Pet : GetGrowRate(i);
                             local PetName=Pet:GetName(i)
                 --PushDebugMessage(Petchengzhanglv)
   
                        if tonumber(Petchengzhanglv) < 500 then
                             local hid,lid = Pet:GetGUID(i);
                              PushDebugMessage("资质鉴定珍兽成长:"..PetName)
                             Clear_XSCRIPT();
                             Set_XSCRIPT_Function_Name("OnInquiryForGrowRate");
                             Set_XSCRIPT_ScriptID(1050);
                             Set_XSCRIPT_Parameter(0,hid);
                             Set_XSCRIPT_Parameter(1,lid);
                             Set_XSCRIPT_ParamCount(2);
                             Send_XSCRIPT();   
                        end
                end
        end       
        ]]))
end






function 放生珍兽(aaaa,bbbb)
local nIndex =  LUA_取返回值(string.format([[

for i=0, 9 do
                if Pet:IsPresent(i) then
    local strName=Pet:GetName(i)
PushDebugMessage(strName)
--成长率
local strTbl = {"普通","优秀","杰出","卓越","完美"};
local Petchengzhanglv = Pet : GetGrowRate(i);
local nGrowLevel = Pet : GetPetGrowLevel(i,tonumber(Petchengzhanglv));
if(nGrowLevel >= 0) then
  nGrowLevel = nGrowLevel + 1;
nGrowLevelname=strTbl[nGrowLevel]
else
nGrowLevelname="未知"
Petchengzhanglv=""
end
--PushDebugMessage(nGrowLevel..nGrowLevelname..strName)
if strName == "%s" and nGrowLevel<= tonumber(%d) then
                  PushDebugMessage("放生珍兽:"..strName.."|成长率"..nGrowLevelname)
                   Pet : Go_Free(i)
end
end
end
        return -1
]], aaaa,bbbb), "n")
return nIndex
end




function 还童珍兽(aaaa,bbbb,材料)
        if 获取背包物品数量(材料)<=0 then
                return -1
        end
        材料位置=获取背包物品位置(材料)-1
        local nIndex =  LUA_取返回值(string.format([[


                for i=0, 10-1 do
                if Pet:IsPresent(i) then
                        local strName=Pet:GetName(i)
                --PushDebugMessage(strName)
                --成长率
                local strTbl = {"普通","优秀","杰出","卓越","完美"};
                local Petchengzhanglv = Pet : GetGrowRate(i);
                local nGrowLevel = Pet : GetPetGrowLevel(i,tonumber(Petchengzhanglv));
                if(nGrowLevel >= 0) then
                  nGrowLevel = nGrowLevel + 1;
                nGrowLevelname=strTbl[nGrowLevel]
                else
                nGrowLevelname="未知"
                Petchengzhanglv=""
                end
                --PushDebugMessage(nGrowLevel..nGrowLevelname..strName)
                if strName == "%s" and nGrowLevel < tonumber(%d) then
                                                  PushDebugMessage("放生珍兽:"..strName.."|成长率        "..nGrowLevelname)
                                                   Pet : SkillStudy_Do(2, i, %d)
                        end
                end
                end
                                return -1
        ]], aaaa,bbbb,材料位置), "n")
        return nIndex
end




function 自动还童珍兽(aaaa,bbbb,材料)
        for i=1,9999 do
                取出物品("金币")       
                跨图寻路("洛阳",275,297)
                查询所有珍兽成长率()
                延时(700)
                if 还童珍兽(aaaa,bbbb,材料)== -1 then
                        break
                end       
                延时(500)
        end
end
--以上程序不要乱动

--以下程序只修改宝宝名称和还童卷轴名称
自动还童珍兽("蛋蛋鸡宝宝",5,"高级珍兽还童卷轴")

作者: 李李lee    时间: 2024-5-21 23:09
取个名字2天 发表于 2024-5-21 23:09
function 查询珍兽成长率(珍兽名称)
屏幕提示("珍兽查询成长率:"..珍兽名称)
       LUA_Call(string.forma ...

求教具体**作呀,大佬,大哥,求求了!
作者: 萌宠猪    时间: 2024-5-22 00:57
洗五**千,七八千饺子洗不出来
作者: 卖黄瓜    时间: 2024-5-22 01:18
取个名字2天 发表于 2024-5-22 01:18
function 查询珍兽成长率(珍兽名称)
屏幕提示("珍兽查询成长率:"..珍兽名称)
       LUA_Call(string.forma ...

能改到卓越停止吗
作者: 葬花℡    时间: 2024-5-22 01:41
怎么用啊!
作者: 五六七吧    时间: 2024-5-22 06:14

作者: 骗子走开    时间: 2024-5-22 07:55
牛**
作者: 大鱼哥哥哥    时间: 2024-5-22 08:10
取个名字2天 发表于 2024-5-22 08:10
function 查询珍兽成长率(珍兽名称)
屏幕提示("珍兽查询成长率:"..珍兽名称)
       LUA_Call(string.forma ...

秀儿
作者: 5201235    时间: 2024-5-22 08:55
取个名字2天 发表于 2024-5-22 08:55
function 查询珍兽成长率(珍兽名称)
屏幕提示("珍兽查询成长率:"..珍兽名称)
       LUA_Call(string.forma ...

这是代码。?
作者: 光年之内    时间: 2024-5-22 09:09
取个名字2天 发表于 2024-5-22 09:09
function 查询珍兽成长率(珍兽名称)
屏幕提示("珍兽查询成长率:"..珍兽名称)
       LUA_Call(string.forma ...

你这个过分了啊
作者: 萌萌梦千寻    时间: 2024-5-22 09:31
自动很坑的  我洗的时装,自动洗稀有。洗出稀有之后又洗了一下才停的,
作者: 7.月雪花纷飞    时间: 2024-5-22 09:35
卖黄瓜 发表于 2024-5-22 09:35
能改到卓越停止吗

1普通2优秀3杰出4卓越5完美。把5改4就行
作者: 我来找老婆    时间: 2024-5-22 09:38
我问客服了,它说没有这个功能。
作者: 花花花的花    时间: 2024-5-22 10:03
取个名字2天 发表于 2024-5-21 22:26
function 查询珍兽成长率(珍兽名称)
屏幕提示("珍兽查询成长率:"..珍兽名称)
       LUA_Call(string.forma ...

这是直接复制粘贴到本子里面吗,看不懂啊,太长了这个,全部复制吗
作者: 李李lee    时间: 2024-5-22 10:25
花花花的花 发表于 2024-5-22 10:25
这是直接复制粘贴到本子里面吗,看不懂啊,太长了这个,全部复制吗

复制粘贴直接用
作者: 流浪的浪流    时间: 2024-5-22 10:25
葬花℡ 发表于 2024-5-22 10:25
怎么用啊!

最讨厌这种显眼包了,以为自己很厉害,封了都没得玩
作者: 好图龙    时间: 2024-5-22 10:37
取个名字2天 发表于 2024-5-22 10:37
function 查询珍兽成长率(珍兽名称)
屏幕提示("珍兽查询成长率:"..珍兽名称)
       LUA_Call(string.forma ...

没看懂,高手啊
作者: 不看也罢    时间: 2024-5-22 11:14
李李lee 发表于 2024-5-22 11:14
求教具体**作呀,大佬,大哥,求求了!

这都喂到嘴里了 还需要怎么教啊?
作者: 八成都是    时间: 2024-5-22 12:08
文件夹改下
作者: 541正宗88    时间: 2024-5-22 12:31
流浪的浪流 发表于 2024-5-22 12:31
最讨厌这种显眼包了,以为自己很厉害,封了都没得玩

都没得玩
作者: 明月照人心c    时间: 2024-5-22 12:46
怎么,古人说的闷声发大财是一点没学到吗?之前可以洗85的,被你们显摆的改了,又开始出来显摆?是脑子不好吗
作者: 小仙飞飞    时间: 2024-5-22 13:05
还是这个有用
作者: 语过    时间: 2024-5-22 13:16

作者: 偏偏爱.    时间: 2024-5-22 14:47
李李lee 发表于 2024-5-22 14:47
求教具体**作呀,大佬,大哥,求求了!

编辑文本?拖到游戏安装包里?
作者: 不掉血    时间: 2024-5-22 14:49
李李lee 发表于 2024-5-22 14:49
求教具体**作呀,大佬,大哥,求求了!

你复制他发的,粘贴到文本,在导入小咪就行
作者: 初沁    时间: 2024-5-22 15:13
去问闲鱼
作者: 流弊的样子.    时间: 2024-5-22 19:24
5201235 发表于 2024-5-22 19:24
这是代码。?

看都看不懂
作者: 取个名字2天    时间: 2024-5-22 21:04
卖黄瓜 发表于 2024-5-22 01:18
能改到卓越停止吗

卓越选4
作者: 四十三街坊    时间: 2024-8-19 22:51
哪个软件的,蜜蜜不行




欢迎光临 《新天龙八部》官方论坛-【十二周年】今日火爆公测 (https://bbs.tl.changyou.com/) Powered by Discuz! X3.2