◇逍遥◆MIR2◇ 发表于 2022-8-10 23:22:32

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

(@@InPutString )

[@main]
#if
checkvar human EJMMSRCH =
#say
< 二代密码/SCOLOR=254> <Hot~/SCOLOR=58>< 【以人为本】【用心做服】【公平公正】/SCOLOR=21>\
<……………………………………………………………………………/SCOLOR=152>\
<为了防止木马盗号事件为玩家造成损失,现在特采用双密码验证登/SCOLOR=149>\
<陆,当玩家登陆IP与之前登陆IP不同时会锁定玩家角色,需输入二/SCOLOR=149>\
<次密码解锁。/SCOLOR=254><现在检测你没有输入密码,请点击下面的设置密码设/SCOLOR=149>\
<置。密码可以为数字、字母、汉字、特殊字符,但必须是小写!!/SCOLOR=149>\
<请玩家不要将二次密码设置与登陆密码一致!/SCOLOR=22>\
<……………………………………………………………………………/SCOLOR=152>\
<密码设置/@@InPutString50>                   <关闭对话/@exit>
#elsesay
\ \
< 二代密码/SCOLOR=254> <Hot~/SCOLOR=58>< 【以人为本】【用心做服】【公平公正】/SCOLOR=21>\
<……………………………………………………………………………/SCOLOR=152>\
<为了防止木马盗号事件为玩家造成损失,现在特采用双密码验证登/SCOLOR=149>\
<陆,当玩家登陆IP与之前登陆IP不同时会锁定玩家角色,需输入二/SCOLOR=149>\
<代密码解锁。/SCOLOR=149>\
<……………………………………………………………………………/SCOLOR=152>\
<修改密码/@main1>                            <关闭对话/@exit>

[@main1]
< 二代密码/SCOLOR=254> <Hot~/SCOLOR=58>< 【以人为本】【用心做服】【公平公正】/SCOLOR=21>\
<……………………………………………………………………………/SCOLOR=152>\
<为了防止木马盗号事件为玩家造成损失,现在特采用双密码验证登/SCOLOR=149>\
<陆,当玩家登陆IP与之前登陆IP不同时会锁定玩家角色,需输入二/SCOLOR=149>\
<次密码解锁。/SCOLOR=149><现在检测你没有输入密码,请点击下面的设置密码设/SCOLOR=149>\
<置。密码可以为数字、字母、汉字、特殊字符,但必须是小写!!/SCOLOR=149>\
<请玩家不要将二次密码设置与登陆密码一致!/SCOLOR=22>\
<……………………………………………………………………………/SCOLOR=152>\
<开始验证密码/@@InPutString52>                   <关闭对话/@exit>

[@CallInPutString52]
#if
checkvar HUMAN EJMMSRCH = <$STR(S52)>
#say
\ \
< 二代密码/SCOLOR=254> <Hot~/SCOLOR=58>< 【以人为本】【用心做服】【公平公正】/SCOLOR=21>\
<……………………………………………………………………………/SCOLOR=152>\
<为了防止木马盗号事件为玩家造成损失,现在特采用双密码验证登/SCOLOR=149>\
<陆,当玩家登陆IP与之前登陆IP不同时会锁定玩家角色,需输入二/SCOLOR=149>\
<次密码解锁。/SCOLOR=149> 原密码验证通过,请输入新密码.\
<……………………………………………………………………………/SCOLOR=152>\
<输入新密码/@@InPutString53>       <清空常用IP/@清空常用IP>              <关闭对话/@exit>
#act
CALCVAR HUMAN EJMMSRSZ = 1
break
#elseact
CALCVAR HUMAN EJMMSRSZ = 0
CALCVAR HUMAN EJMMSRCS + 1
SAVEVAR HUMAN EJMMSRCS ..\QuestDiary\LoginPassWord.txt
#elsesay
对不起,密码验证失败。\
您已经累积输入密码错误<$HUMAN(EJMMSRCS)>次。\
累积输入错误5次后,每输错一次密码就将踢您下线。\
更改密码可以清空此数值。\
<返回./@main1>\
<退出./@exit>

#if
checkvar human EJMMSRCS > 4
#act
kick
messagebox 对不起,您已经累积输入密码错误<$HUMAN(EJMMSRCS)>次。\系统自动踢您下线,以后每次登陆均只有一次输入密码的机会。\更改密码可以清空此数值。
break

[@清空常用IP]
#if
checkvar HUMAN EJMMSRSZ = 1
#act
clearnamelist ..\QuestDiary\BindIPList\<$USERNAME>.txt
messagebox 恭喜您成功清除常用IP,下次登陆时需要输入二级密码验证登陆。
break
#elsesay
对不起,原密码验证状态为失败,不能清空常用IP。\
<返回./@main>\
<退出./@exit>

[@CallInPutString53]
#if
checkvar HUMAN EJMMSRSZ = 1
#act
CALCVAR HUMAN EJMMSRSZ = 0
CALCVAR HUMAN EJMMSRCH = <$STR(S53)>
SAVEVAR HUMAN EJMMSRCH ..\QuestDiary\LoginPassWord.txt
CALCVAR HUMAN EJMMSRCS = 0
SAVEVAR HUMAN EJMMSRCS ..\QuestDiary\LoginPassWord.txt
SENDMSG 6 您成功设置了二级密码:<$STR(S53)>,请牢记此密码。
break
#act
MESSAGEBOX 恭喜您成功修改了二级登陆密码。当前密码为:<$STR(S53)>\密码输入错误次数清零。\
break
#elseact
MESSAGEBOX 对不起,原密码验证状态为失败,不能进行新密码设置。\
break

[@CallInPutString50]
#if
checkvar HUMAN EJMMSRCH =
#act
addiplist ..\QuestDiary\BindIPList\<$USERNAME>.txt
CALCVAR HUMAN EJMMSRCH = <$STR(S50)>
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 您成功设置了二级密码:<$STR(S50)>,请牢记此密码。
break
#act
MESSAGEBOX 恭喜您成功设置二级密码。当前密码为:<$STR(S50)>\
break
#elseact
MESSAGEBOX 对不起,您已经设置过二级密码,请点击修改密码进行修改。\
break

jdflfl87 发表于 2022-8-10 23:57:38

感恩无私的分享与奉献 :)

mabel7777 发表于 2022-8-11 03:56:56

感恩无私的分享与奉献 :)

b7823282 发表于 2022-8-12 04:19:08

强烈支持楼主ing……

websun01 发表于 2022-8-12 14:14:45

真是被感动的痛哭流涕……

tttcy 发表于 2022-8-12 20:02:38

真是被感动的痛哭流涕……

295608944 发表于 2022-8-13 20:29:18

感恩无私的分享与奉献 :)

trulytry 发表于 2022-8-14 23:45:08

真是难得给力的帖子啊。

40381438 发表于 2022-8-15 03:30:58

淡定,淡定,淡定……

vidrxua 发表于 2022-8-16 18:29:43

激动人心,无法言表!
页: [1] 2 3 4 5 6
查看完整版本: 简单设置传奇服务端支持二级密码的办法