传奇版本

超级智能化防假人脚本

[复制链接]
查看34184 | 回复20 | 2012-6-23 05:40:56 | 显示全部楼层 |阅读模式
准备工作:

建立文本文件:

D:\mirserver\Mir200\Envir\QuestDiary\游戏登陆\游戏激活.txt

D:\mirserver\Mir200\Envir\QuestDiary\KickList.txt

D:\mirserver\Mir200\Envir\QuestDiary\僵尸攻击.txt

修改登陆脚本QManage.txt

添加:

VAR Integer HUMAN 僵尸攻击
LOADVAR HUMAN 僵尸攻击 ..\QuestDiary\僵尸攻击.txt

#CALL [\\游戏登陆\游戏激活.txt] @验证



以下代码复制到 游戏激活.txt 文件里

5 uwl

[@验证]
{
#IF
Check [005] 0
#ACT
mov d5 0
mov d0 0
mov d1 0
mov d2 0
goto @假人验证
#ELSEACT
goto @普通验证


[@普通验证]
#IF
#ACT
DELAYCALL 15000 @踢人
#SAY
╔┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╗\
┆    ※※大唐网络为了防止刷假人一条龙机采取以下方案※※    ┆\
┆                                                      ┆\
┆玩家上线自动禁止聊天,请双击背包里《解禁言卷》恢复发言.┆\
┆                                                      ┆\
┆        <请在15秒内点击激活登陆否则会被T下线!/AUTOCOLOR=251,250,249>         ┆\
┆                                                      ┆\
┆※为了游戏活跃的气氛.请玩家点击<----激活登陆/@激活>.谢谢合作※┆\
╚┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╝\
[@激活]
#ACT
CLEARDELAYGOTO
sendmsg 7 您已成功激活,祝你游戏愉快!
close


[@踢人]
#IF
#ACT
SENDMSG 5 因为您没有正常激活登陆,系统将把你踢下线,不便之处请原谅。
SENDMSG 5 因为您没有正常激活登陆,系统将把你踢下线,不便之处请原谅。
SENDMSG 5 因为您没有正常激活登陆,系统将把你踢下线,不便之处请原谅。
SENDMSG 5 因为您没有正常激活登陆,系统将把你踢下线,不便之处请原谅。
SENDMSG 5 因为您没有正常激活登陆,系统将把你踢下线,不便之处请原谅。
KICK


[@假人验证]
#IF
CHECKIPLIST ..\QuestDiary\KickList.txt
#act
addIPLIST ..\QuestDiary\KickList.txt
SENDMSG 7 您被系统默认为恶意僵尸攻击<$HUMAN(僵尸攻击)>次,本系统已封掉您的IP,请联系管理员QQ:<$QQ>。
MESSAGEBOX  为了防止恶意刷屏和最新一条龙僵尸攻击\所有未激活的玩家全部踢出下线,不便之处请原谅。
KICK
#ELSEACT
movr d0 5
movr d1 5
movr d2 5
goto @suanshu
DELAYCALL 15000 @防假人一条龙机
#ELSESAY
━━━━━━━<㊣大唐网游技术交流社区专用版㊣>━━━━━━━\
        <请在15秒内点击激活登陆否则会被T下线!/AUTOCOLOR=251,250,249>\
        <请选择正确答案>   <$STR(d0)>+<$STR(d1)>+<$STR(d2)>=多少?\
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━\ \
  <0/@he00>      <1/@he01>      <2/@he02>      <3/@he03>      <4/@he04>      <5/@he05>      <6/@he06>      <7/@he07> \
  <8/@he08>      <9/@he09>      <10/@he10>     <11/@he11>     <12/@he12>     <13/@he13>     <14/@he14>     <15/@he15> \
[@suanshu]
#IF
equal d0 1
#act
inc d5 1
#IF
equal d0 2
#act
inc d5 2
#IF
equal d0 3
#act
inc d5 3
#IF
equal d0 4
#act
inc d5 4
#IF
equal d0 5
#act
inc d5 5

#IF
equal d1 1
#act
inc d5 1
#IF
equal d1 2
#act
inc d5 2
#IF
equal d1 3
#act
inc d5 3
#IF
equal d1 4
#act
inc d5 4
#IF
equal d1 5
#act
inc d5 5

#IF
equal d2 1
#act
inc d5 1
#IF
equal d2 2
#act
inc d5 2
#IF
equal d2 3
#act
inc d5 3
#IF
equal d2 4
#act
inc d5 4
#IF
equal d2 5
#act
inc d5 5
#IF
#act
sendmsg 7 提示:<$STR(d0)>+<$STR(d1)>+<$STR(d2)>=<$STR(d5)>

[@he00]
#if
equal d5 0
#ACT
set [005] 1
CLEARDELAYGOTO
sendmsg 7 您已成功激活,祝你游戏愉快!
close
#ELSEACT
goto @防假人一条龙机
close

[@he01]
#if
equal d5 1
#ACT
set [005] 1
CLEARDELAYGOTO
sendmsg 7 您已成功激活,祝你游戏愉快!
close
#ELSEACT
goto @防假人一条龙机
close

[@he02]
#if
equal d5 2
#ACT
set [005] 1
CLEARDELAYGOTO
sendmsg 7 您已成功激活,祝你游戏愉快!
close
#ELSEACT
goto @防假人一条龙机
close

[@he03]
#if
equal d5 3
#ACT
set [005] 1
CLEARDELAYGOTO
sendmsg 7 您已成功激活,祝你游戏愉快!
close
#ELSEACT
goto @防假人一条龙机
close

[@he04]
#if
equal d5 4
#ACT
set [005] 1
CLEARDELAYGOTO
sendmsg 7 您已成功激活,祝你游戏愉快!
close
#ELSEACT
goto @防假人一条龙机
close

[@he05]
#if
equal d5 5
#ACT
set [005] 1
CLEARDELAYGOTO
sendmsg 7 您已成功激活,祝你游戏愉快!
close
#ELSEACT
goto @防假人一条龙机
close

[@he06]
#if
equal d5 6
#ACT
set [005] 1
CLEARDELAYGOTO
sendmsg 7 您已成功激活,祝你游戏愉快!
close
#ELSEACT
goto @防假人一条龙机
close

[@he07]
#if
equal d5 7
#ACT
set [005] 1
CLEARDELAYGOTO
sendmsg 7 您已成功激活,祝你游戏愉快!
close
#ELSEACT
goto @防假人一条龙机
close

[@he08]
#if
equal d5 8
#ACT
set [005] 1
CLEARDELAYGOTO
sendmsg 7 您已成功激活,祝你游戏愉快!
close
#ELSEACT
goto @防假人一条龙机
close

[@he09]
#if
equal d5 9
#ACT
set [005] 1
CLEARDELAYGOTO
sendmsg 7 您已成功激活,祝你游戏愉快!
close
#ELSEACT
goto @防假人一条龙机
close

[@he10]
#if
equal d5 10
#ACT
set [005] 1
CLEARDELAYGOTO
sendmsg 7 您已成功激活,祝你游戏愉快!
close
#ELSEACT
goto @防假人一条龙机
close

[@he11]
#if
equal d5 11
#ACT
set [005] 1
CLEARDELAYGOTO
sendmsg 7 您已成功激活,祝你游戏愉快!
close
#ELSEACT
goto @防假人一条龙机
close

[@he12]
#if
equal d5 12
#ACT
set [005] 1
CLEARDELAYGOTO
sendmsg 7 您已成功激活,祝你游戏愉快!
close
#ELSEACT
goto @防假人一条龙机
close

[@he13]
#if
equal d5 13
#ACT
set [005] 1
CLEARDELAYGOTO
sendmsg 7 您已成功激活,祝你游戏愉快!
close
#ELSEACT
goto @防假人一条龙机
close

[@he14]
#if
equal d5 14
#ACT
set [005] 1
CLEARDELAYGOTO
sendmsg 7 您已成功激活,祝你游戏愉快!
close
#ELSEACT
goto @防假人一条龙机
close

[@he15]
#if
equal d5 15
#ACT
set [005] 1
CLEARDELAYGOTO
sendmsg 7 您已成功激活,祝你游戏愉快!
close
#ELSEACT
goto @防假人一条龙机
close


[@去僵尸]
#ACT
set [005] 1
CLEARDELAYGOTO
sendmsg 7 您已成功激活,祝你游戏愉快!
close

[@防假人一条龙机]
#IF
CHECKVAR HUMAN 僵尸攻击 < 3
#act
mov d5 0
mov d0 0
mov d1 0
mov d2 0
CALCVAR HUMAN 僵尸攻击 + 1
SAVEVAR HUMAN 僵尸攻击 ..\QuestDiary\僵尸攻击.txt
SENDMSG 5 因为您没有正常激活登陆,被系统默认为恶意僵尸攻击<$HUMAN(僵尸攻击)>次,警告2次后将会封掉您的IP。
MESSAGEBOX  为了防止恶意刷屏和最新一条龙僵尸攻击\所有未激活的玩家全部踢出下线,不便之处请原谅。
KICK
#IF
CHECKVAR HUMAN 僵尸攻击 > 2
#act
addIPLIST ..\QuestDiary\KickList.txt
SENDMSG 7 您被系统默认为恶意僵尸攻击<$HUMAN(僵尸攻击)>次,本系统已封掉您的IP,请联系管理员QQ:<$QQ>。
MESSAGEBOX  为了防止恶意刷屏和最新一条龙僵尸攻击\所有未激活的玩家全部踢出下线,不便之处请原谅。
KICK
break
}



提示:

此脚本为默认M2 晋升M2

如果换其他的M2 注意修改脚本命令(老LFM2不支持)

飘飘M2或飞尔M2 :

DELAYCALL 15000  替换成 DELAYGOTO 15



SKY M2 :

DELAYCALL 15000  替换成 DELAYCALL 15
;了解更多游戏脚本、传奇一条龙技术文章、传奇服务端传奇论坛登陆器等游戏工具,加入 腾飞科技gm基地
赵凌 | 2014-3-17 14:08:02 | 显示全部楼层
以后就跟楼主混了!
刘洋 | 2014-3-17 14:29:38 | 显示全部楼层
视死如归的架势啊!
爱斌纪 | 2014-3-17 14:07:27 | 显示全部楼层
楼主写的很经典!
宋烈 | 2014-3-17 14:18:52 | 显示全部楼层
在哪里跌倒,就在那里多爬一会儿!
张娟 | 2014-3-17 14:40:14 | 显示全部楼层
谢谢楼主的分享!
延续 | 2014-5-16 11:55:12 | 显示全部楼层
今天的心情很不错啊
huhu662 | 2014-5-16 12:19:42 | 显示全部楼层
楼主今年多大了?
十六夜 | 2014-5-16 12:19:24 | 显示全部楼层
经典!
枫易 | 2014-5-16 12:30:22 | 显示全部楼层
楼上的心情不错啊!
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则