原地自动遇敌+步步遇敌

ahsin

原创自制
第一步，ng.lua顶部第一行添加

local walkmark = 1--/1方向统计变量
复制代码

第二步，ng.lua msg中添加（如：/5之后添加）（需要把原先的/1去掉，或者注释掉）

 if(msg == "/1" or msg == "、1") then
                local zizou1 = Char.GetData(player,%对象_香步数%);
                if Char.GetData(player,%对象_不遇敌开关%) == 1 then
                NLG.SystemMessage(player,"你正在使用驱魔香水，无法使用步步遇敌");
                elseif zizou1 == 0 then
                Char.SetData(player,%对象_香步数%,999);
                Char.SetData(player,%对象_香上限%,999);
                NLG.SystemMessage(player,"步步遇敌+自动遇敌开始了，每10秒尝试一次。");
                NLG.SystemMessage(player,"注意：如果在地图版边使用可能会掉线。");
                Char.SetLoopEvent(nil,"yd_LoopEvent",player,10000)
                --local dir= math.random(0,7);
                --NLG.SetAction(player,1);
                --NLG.WalkMove(player,dir);
                else
                Char.SetLoopEvent(nil,"yd_LoopEvent",player,nil)
                Char.SetData(player,%对象_香步数%,0);
                Char.SetData(player,%对象_香上限%,0);
                NLG.SystemMessage(player,"步步遇敌+自动遇敌关闭了！");
                end
        end
复制代码

第三步 ng.lua底部最后一行添加

function yd_LoopEvent(player)
        --local CdKey = Char.GetData(player,%对象_CDK%)
        local CdKey = Char.GetData(player,%对象_CDK%)
        local Name = Char.GetData(player,%对象_名字%)
        --local pluskg = Char.GetData(player,%对象_香步数%);
        local pluskg = Char.GetData(player,%对象_香步数%);
        local dir= math.random(1,19);--生成随机动作，0为战力，去除
        if pluskg == 0 then
                Char.SetLoopEvent(nil,"yd_LoopEvent",player,nil)
        else
                if walkmark == 1 then
                        NLG.SystemMessage(player,"步步遇敌+自动遇敌中，每10秒尝试一次。");
                        NLG.SystemMessage(player,"注意：如果走到地图版边可能会掉线。");
                        --NLG.SetAction(player,3);--走路动作
                        NLG.WalkMove(player,2);--方向2走一步
                        NLG.SetAction(player,dir);--遇敌了，摆个随机pose
                        walkmark = 2
                else
                        NLG.SystemMessage(player,"步步遇敌+自动遇敌中，每10秒尝试一次。");
                        NLG.SystemMessage(player,"注意：如果走到地图版边可能会掉线。");
                        --NLG.SetAction(player,3);--走路动作
                        NLG.WalkMove(player,6);--方向6走一步
                        NLG.SetAction(player,dir);--遇敌了，摆个随机pose
                        walkmark = 1
                end
        end
end
复制代码

补充内容 (2021-5-2 03:32):
由于全局变量bug，导致部分玩家步伐方向会出错

遂请移步12楼查看使用新版代码。已经测试完毕，没有bug了

补充内容 (2022-1-21 02:33):
代码有更新，请前往12楼

补充内容 (2022-3-20 22:32):
补充一个，
所有Char.SetLoopEvent(nil,"yd_LoopEvent",player,nil)
改成Char.SetLoopEvent(nil,"yd_LoopEvent",player,0)

mark_pc

感谢，分享了那么多。就是能把所有分享的帖子链接都编辑到每帖的1楼吗？论坛不允许查看个人资料

ahsin

mark_pc 发表于 2021-4-25 02:45
感谢，分享了那么多。就是能把所有分享的帖子链接都编辑到每帖的1楼吗？论坛不允许查看个人资料 ...

超过一定时间以后，1楼等帖子也不能编辑啦

mark_pc

ahsin 发表于 2021-4-25 04:46
超过一定时间以后，1楼等帖子也不能编辑啦

我是说不能查看你所有帖子，你的帖子肯定都很有营养

ahsin

mark_pc 发表于 2021-4-25 23:06
我是说不能查看你所有帖子，你的帖子肯定都很有营养

不知道z老大是否允许，邮件ahsin@qq.com，如果老大不允许请删除此楼

mark_pc

ahsin 发表于 2021-4-26 22:10
不知道z老大是否允许，邮件，如果老大不允许请删除此楼

已发邮件，望加好友

°Cayenne.S

可以步步遇敌 但是不会原地自动遇敌 不知道是不是我加错的原因导致的 测试步步遇敌可以 战斗结束后人物不会触发原地遇敌..

xman

/1 似乎跟你的重复了

他算是想要仿制原地自动遇敌
步步遇敌+来回自己走动

循环的部分可能有问题?

或是人物没成功让他走动?

ahsin

°Cayenne.S 发表于 2021-4-28 20:49
可以步步遇敌 但是不会原地自动遇敌 不知道是不是我加错的原因导致的 测试步步遇敌可以 战斗结束后人物不 ...

你代码放置的位置不对
loopevent要添加到最后，不能添加到function msg中

ahsin

xman 发表于 2021-4-28 21:28
/1 似乎跟你的重复了

这个代码是替代了/1的功能，所以你需要把老的/1都注释掉，用新的/1