传奇服务器设置验证码,简单设置传奇服务端支持二级密码的办法

(@@InPutString )

[@main]

#if

checkvar human EJMMSRCH =

#say

　\

\

\

\

\

\

\

\

#elsesay

\ \

　\

\

\

\

\

\

[@main1]

　\

\

\

\

\

\

\

\

[@CallInPutString52]

#if

checkvar HUMAN EJMMSRCH =

#say

\ \

　\

\

\

\

原密码验证通过，请输入新密码.\

\

#act

CALCVAR HUMAN EJMMSRSZ = 1

break

#elseact

CALCVAR HUMAN EJMMSRSZ = 0

CALCVAR HUMAN EJMMSRCS + 1

SAVEVAR HUMAN EJMMSRCS ..\QuestDiary\LoginPassWord.txt

#elsesay

对不起，密码验证失败。\

您已经累积输入密码错误次。\

累积输入错误5次后，每输错一次密码就将踢您下线。\

更改密码可以清空此数值。\

\

#if

checkvar human EJMMSRCS > 4

#act

kick

messagebox 对不起，您已经累积输入密码错误次。\系统自动踢您下线，以后每次登陆均只有一次输入密码的机会。\更改密码可以清空此数值。

break

[@清空常用IP]

#if

checkvar HUMAN EJMMSRSZ = 1

#act

clearnamelist ..\QuestDiary\BindIPList\.txt

messagebox 恭喜您成功清除常用IP，下次登陆时需要输入二级密码验证登陆。

break

#elsesay

对不起，原密码验证状态为失败，不能清空常用IP。\

\

[@CallInPutString53]

#if

checkvar HUMAN EJMMSRSZ = 1

#act

CALCVAR HUMAN EJMMSRSZ = 0

CALCVAR HUMAN EJMMSRCH =

SAVEVAR HUMAN EJMMSRCH ..\QuestDiary\LoginPassWord.txt

CALCVAR HUMAN EJMMSRCS = 0

SAVEVAR HUMAN EJMMSRCS ..\QuestDiary\LoginPassWord.txt

SENDMSG 6 您成功设置了二级密码：，请牢记此密码。

break

#act

MESSAGEBOX 恭喜您成功修改了二级登陆密码。当前密码为：\密码输入错误次数清零。\

break

#elseact

MESSAGEBOX 对不起，原密码验证状态为失败，不能进行新密码设置。\

break

[@CallInPutString50]

#if

checkvar HUMAN EJMMSRCH =

#act

addiplist ..\QuestDiary\BindIPList\.txt

CALCVAR HUMAN EJMMSRCH =

SAVEVAR HUMAN EJMMSRCH ..\QuestDiary\LoginPassWord.txt

CALCVAR HUMAN EJMMSRSZ = 0

SAVEVAR HUMAN EJMMSRSZ ..\QuestDiary\LoginPassWord.txt

CALCVAR HUMAN EJMMSRCS = 0

SAVEVAR HUMAN EJMMSRCS ..\QuestDiary\LoginPassWord.txt

SENDMSG 6 您成功设置了二级密码：，请牢记此密码。

break

#act

MESSAGEBOX 恭喜您成功设置二级密码。当前密码为：\

break

#elseact

MESSAGEBOX 对不起，您已经设置过二级密码，请点击修改密码进行修改。\

break