发新话题
打印

[讨论] 做了个收魔币、计时/计步,不遇敌lua内挂。gmsv.exe适用

做了个收魔币、计时/计步,不遇敌lua内挂。gmsv.exe适用

首先。。。我不是专业lua程序猿,代码都是拼凑和看cgdev的库然后做出来的
7 k+ k( X% e0 F$ ~; |  j妖城在线论坛
" ?; ~3 O5 F9 t/ \魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表代码里有些可能是过度的,高手就不要介意了!
& G; U5 k7 G+ I妖城在线论坛—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート" K* P9 |" p$ O! M8 i
总之,用了好多魔力GF内置方法都没能做出一个有效的不遇敌道具。
/ @( j% d% c9 w  V) W7 u) P1 r; w魔力私服,最新魔力宝贝私服技术交流  e! Z2 i! z4 ], V7 p% }
无奈最后只能自己瞎写写了!
4 X6 h+ y: J3 d- R; L—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート魔力私服,最新魔力宝贝私服技术交流# d- ?0 F3 y* ^- A( O+ r
我VB做得多。。。所以lua让我烦恼了很久,没有timer没有sleep,不过最后还是曲线解决了- -魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表3 z, \3 |+ k- k* j+ y

4 _7 q' W0 h" w6 i( q% _6 r魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表
$ m1 O. Q: j( ~, g/ A* L; P妖城在线论坛我这里是小公益服,人少,测试一周功能正常。魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表1 q' M' V& q% T4 z9 q- S# X2 d
! q& e4 Z. V, }
各位小伙伴可以测试一下
3 _: d  k& r' m7 R1 |; M$ j, C魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表
* _1 x% e) t3 z魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表公布代码如下
复制内容到剪贴板
代码:
--本lua由ahsinsoft.com编写 QQ230236979
if type(Players)~="table" then Players={} end
if type(tab_msg)~="table" then tab_msg={} end
if type(tab_return)~="table" then tab_return={} end
if type(tab_buyudi)~="table" then tab_buyudi={} end
local bydgold= 5555--支付价格
local bydsj= 900--不遇敌有效时间,秒


NL.RegTalkEvent(nil,"ngsupport_TalkEvent");--监视玩家说话内容是否含有关键字
NL.RegLogoutEvent(nil,"ngsupport_LogoutEvent");--监视玩家是否登出,是则清空所有功能参数
--Delegate.
--NL.RegDropEvent(nil,"ngsupport_DropEvent");--监视玩家是否掉线、下线,是则清空所有功能参数

function ngsupport_TalkEvent(player,msg,color,range,size)
       
        if(msg == "/2" or msg == "、2")then
        local CdKey = Char.GetData(player,%对象_账号%);
                if  (Char.GetData(player,%对象_金币%)<bydgold) then
                        NLG.SystemMessage(player, "[系统] 魔币不足["..bydgold.."],无法使用!")
                        return 0
                end
                local kg = Char.GetData(player,%对象_不遇敌开关%);
                if(kg == 0)then
                        Char.AddGold(player,-bydgold);
                        Char.SetData(player,%对象_不遇敌开关%,1);
                        NLG.SystemMessage(player,"不遇敌已经开启,当前时效限定为15分钟!");
                        zoucia = os.time();
                        Char.SetLoopEvent(nil, "bydoff", player, 30000);--伪timer 开启,参数为毫秒
                else
                        Char.SetData(player,%对象_不遇敌开关%,0);
                        zoucia = nil
                        zoucib = nil
                        zoucic = nil
                        Char.SetLoopEvent(nil, "bydoff", player, nil);--伪timer 关闭
                        NLG.SystemMessage(player,"玩家已经主动关闭不遇敌!");
                        return 0
                end
        end
end

function bydoff(player)
--local CdKey = Char.GetData(player,%对象_账号%);
local kgs = Char.GetData(player,%对象_不遇敌开关%);
                zoucib = os.time();
                --zoucic = nil
                if(kgs == 0)then
                        zoucia = nil
                        zoucib = nil
                        zoucic = nil
                        Char.SetLoopEvent(nil, "bydoff", player, nil);--伪timer 关闭
                        return 0
                end
                if(kgs == 1 and zoucib - zoucia > bydsj)then
                        zoucia = nil
                        zoucib = nil
                        zoucic = nil
                        Char.SetLoopEvent(nil, "bydoff", player, nil);--伪timer 关闭
                        Char.SetData(player,%对象_不遇敌开关%,0);
                        NLG.SystemMessage(player,"不遇敌功能有效时间已过,不遇敌关闭!");
                        return 0
                else--if(kgs == 1)then
                        zoucic = zoucib - zoucia
                        zoucid = bydsj - zoucic
                        NLG.SystemMessage(player,"不遇敌功能将在 "..zoucid.." 秒后失效。   -=刷新率:30秒");
                end
end



function ngsupport_LogoutEvent(palyer)
local kgss = Char.GetData(player,%对象_不遇敌开关%);
                if(kgss == 1)then
                        Char.SetData(player,%对象_不遇敌开关%,0);
                        zoucia = nil
                        zoucib = nil
                        zoucic = nil
                        Char.SetLoopEvent(nil, "bydoff", player, nil);--伪timer 关闭
                        NLG.SystemMessage(player,"玩家登出,不遇敌关闭!");
                end
  --return 0;
end
启用方法:—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート4 R. l! p3 n0 [+ v/ I1 n
1、把ngsupport.lua放入服务端目录gmsv\lua\Module中—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート3 b. ]+ N" ~% ^) W" n/ C. S: K2 a9 K
2、服务端目录gmsv\lua中,编辑config.lua,在最后一行新增useModule("ngsupport");魔力私服,最新魔力宝贝私服技术交流" V% r& q. B3 x& m9 O5 P" b
3、本内挂热键为/2,若ng.lua中已经有简易版的不遇敌内挂,建议注释掉,以免冲突。高手忽略妖城在线论坛" v0 i/ H# z( B, J1 [# l9 b/ C  J) |) K

1 N9 _  e, I/ O+ T2 ~7 Z8 q魔力私服,最新魔力宝贝私服技术交流 ngsupport.rar (998 Bytes) 魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表& s. ~6 t4 O9 x# r3 @
bbs.mocwww.com  R' @/ p% E% U) a! W: `9 L
[ 本帖最后由 ahsin 于 2018-3-23 00:45 编辑 ]

TOP

已知bug:
, e* l9 P& z" Z  W$ Z9 [9 v) j魔力私服,最新魔力宝贝私服技术交流1、下线监视代码没完成,但不影响效果。魔力私服,最新魔力宝贝私服技术交流: p& S% _( ~; ?# ]* N
2、没找到彻底结束loop的方法,所以30秒监视可能会不准,但对玩家没有影响。假设现在是15分钟有效期,那么玩家可能15分钟后再多30秒后才结束不遇敌。魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表, \; |  ]) W# h
魔力私服,最新魔力宝贝私服技术交流6 J" L/ ?3 w4 |( X
求高手协助完善
0 f2 b$ q5 Q" S妖城在线论坛—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート' F! L+ T  Z  y( B6 i' P1 c
—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート% w0 d6 [% w  T3 v
bbs.mocwww.com) s7 j  P4 S9 k% Q

1 Y. d( L0 w% n1 T' ^bbs.mocwww.com
9 O/ ?: s% X( }+ Y魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表抱歉。。。计步没备份,被覆盖了哈哈哈
- O6 m5 |$ q' W妖城在线论坛
* E2 Y* U4 |$ P4 P: u& y! z- Ibbs.mocwww.com有需要找我,必须免费的!原理是相通的,高手自己改。
; @! G& w! D! {* _0 l% q—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート
% ]3 `+ f2 B2 [- ?8 c4 U( e- Wbbs.mocwww.com大致方向为:os.time 替换成 %对象_走次%
* K6 z9 \& \3 l: r# a3 z, \妖城在线论坛
3 z& G/ B+ P) C1 e—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート[ 本帖最后由 ahsin 于 2018-3-23 01:02 编辑 ]

TOP

引用:
原帖由 262070173 于 2018-3-26 13:36 发表 魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表& }) z/ Y0 Z2 j' v6 V% E
不能,顶一下,辛苦了...
—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート# Q; b' ]8 a0 A$ i2 D; M
额?什么不能?

TOP

发新话题