传奇私服 发表于 2017-9-25 16:36:52

传奇超级智能化防假人脚本

预备工作:
建立文本文件:
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 文件里
[@验证]
{
#IF
Check 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 1
CLEARDELAYGOTO
sendmsg 7 您已成功激活,祝你游戏痛快!
close
#ELSEACT
goto @防假人挂机
close
[@he01]
#if
equal d5 1
#ACT
set 1
CLEARDELAYGOTO
sendmsg 7 您已成功激活,祝你游戏痛快!
close
#ELSEACT
goto @防假人挂机
close
[@he02]
#if
equal d5 2
#ACT
set 1
CLEARDELAYGOTO
sendmsg 7 您已成功激活,祝你游戏痛快!
close
#ELSEACT
goto @防假人挂机
close
[@he03]
#if
equal d5 3
#ACT
set 1
CLEARDELAYGOTO
sendmsg 7 您已成功激活,祝你游戏痛快!
close
#ELSEACT
goto @防假人挂机
close
[@he04]
#if
equal d5 4
#ACT
set 1
CLEARDELAYGOTO
sendmsg 7 您已成功激活,祝你游戏痛快!
close
#ELSEACT
goto @防假人挂机
close
[@he05]
#if
equal d5 5
#ACT
set 1
CLEARDELAYGOTO
sendmsg 7 您已成功激活,祝你游戏痛快!
close
#ELSEACT
goto @防假人挂机
close
[@he06]
#if
equal d5 6
#ACT
set 1
CLEARDELAYGOTO
sendmsg 7 您已成功激活,祝你游戏痛快!
close
#ELSEACT
goto @防假人挂机
close
[@he07]
#if
equal d5 7
#ACT
set 1
CLEARDELAYGOTO
sendmsg 7 您已成功激活,祝你游戏痛快!
close
#ELSEACT
goto @防假人挂机
close
[@he08]
#if
equal d5 8
#ACT
set 1
CLEARDELAYGOTO
sendmsg 7 您已成功激活,祝你游戏痛快!
close
#ELSEACT
goto @防假人挂机
close
[@he09]
#if
equal d5 9
#ACT
set 1
CLEARDELAYGOTO
sendmsg 7 您已成功激活,祝你游戏痛快!
close
#ELSEACT
goto @防假人挂机
close
[@he10]
#if
equal d5 10
#ACT
set 1
CLEARDELAYGOTO
sendmsg 7 您已成功激活,祝你游戏痛快!
close
#ELSEACT
goto @防假人挂机
close
[@he11]
#if
equal d5 11
#ACT
set 1
CLEARDELAYGOTO
sendmsg 7 您已成功激活,祝你游戏痛快!
close
#ELSEACT
goto @防假人挂机
close
[@he12]
#if
equal d5 12
#ACT
set 1
CLEARDELAYGOTO
sendmsg 7 您已成功激活,祝你游戏痛快!
close
#ELSEACT
goto @防假人挂机
close
[@he13]
#if
equal d5 13
#ACT
set 1
CLEARDELAYGOTO
sendmsg 7 您已成功激活,祝你游戏痛快!
close
#ELSEACT
goto @防假人挂机
close
[@he14]
#if
equal d5 14
#ACT
set 1
CLEARDELAYGOTO
sendmsg 7 您已成功激活,祝你游戏痛快!
close
#ELSEACT
goto @防假人挂机
close
[@he15]
#if
equal d5 15
#ACT
set 1
CLEARDELAYGOTO
sendmsg 7 您已成功激活,祝你游戏痛快!
close
#ELSEACT
goto @防假人挂机
close
[@去僵尸]
#ACT
set 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

页: [1]
查看完整版本: 传奇超级智能化防假人脚本