1.76复古版本二级密码保护账号完整脚本，HERO引擎二级密码脚本

NPC 设置：
MerChant.txt 内如下：
特殊NPC/二级密码设置  3  325  325  二级密码设置  0  8 0 0 0 3 1000 0

;--------------------------------------------------------------------------------------------

二级密码设置-3.txt 如下：
(@@InPutString )
[@main]
#if
checkvar human LoginPassWord =
#say
为了防止木马盗号事件为玩家造成损失，现在特采用双密码验证登
陆，当玩家登陆IP与之前登陆IP不同时会锁定玩家角色，需输入二
次密码解锁。现在检测你没有输入密码，请点击下面的设置密码设
置。密码可以为数字、字母、汉字、特殊字符，但必须是小写！！
请玩家不要将二次密码设置成与登陆密码一致！
设置好之后请不要泄漏给任何人。
　　　　　　　　　　　　　
#elsesay
为了防止木马盗号事件为玩家造成损失，现在特采用双密码验证登
陆，当玩家登陆IP与之前登陆IP不同时会锁定玩家角色，需输入二
次密码解锁。现在正在进行操作，请点击下面的修改密码
设置。密码可以为数字、字母、汉字、特殊字符，但必须是小写！
请玩家不要将二次密码设置成与登陆密码一致！
设置好之后请不要泄漏给任何人。
修改密码必须先验证"原二级密码"后方可修改.
　　　　　　　　　　　　　

[@main1]
为了防止木马盗号事件为玩家造成损失，现在特采用双密码验证登
陆，当玩家登陆IP与之前登陆IP不同时会锁定玩家角色，需输入二
次密码解锁。现在正在进行操作，请点击下面的验证密码
验证。密码可以为数字、字母、汉字、特殊字符，但必须是小写！
请玩家不要将二次密码设置成与登陆密码一致！
设置好之后请不要泄漏给任何人。
点击下方的验证密码进入原密码验证.
　　　　　　　　　　　　　

[@CallInPutString52]
#if
checkvar HUMAN LoginPassWord =
#say
为了防止木马盗号事件为玩家造成损失，现在特采用双密码验证登
陆，当玩家登陆IP与之前登陆IP不同时会锁定玩家角色，需输入二
次密码解锁。现在正在进行操作，请点击下面的验证密码
验证。密码可以为数字、字母、汉字、特殊字符，但必须是小写！
请玩家不要将二次密码设置成与登陆密码一致！
设置好之后请不要泄漏给任何人。
原密码验证通过，请输入新密码.。
　　　　　　
#act
CALCVAR HUMAN LoginPassWordStatus = 1
break
#elseact
CALCVAR HUMAN LoginPassWordStatus = 0
CALCVAR HUMAN LoginPassWordNum + 1
SAVEVAR HUMAN LoginPassWordNum ..QuestDiaryLoginPassWord.txt
#elsesay
对不起，密码验证失败。
您已经累积输入密码错误次。
累积输入错误5次后，每输错一次密码就将踢您下线。
更改密码可以清空此数值。



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

[@清空常用IP]
#if
checkvar HUMAN LoginPassWordStatus = 1
#act
clearnamelist ..QuestDiaryBindIPList.txt
messagebox 恭喜您成功清除常用IP，下次登陆时需要输入二级密码验证登陆。
break
#elsesay
对不起，原密码验证状态为失败，不能清空常用IP。



[@CallInPutString53]
#if
checkvar HUMAN LoginPassWordStatus = 1
#act
CALCVAR HUMAN LoginPassWordStatus = 0
CALCVAR HUMAN LoginPassWord =
SAVEVAR HUMAN LoginPassWord ..QuestDiaryLoginPassWord.txt
CALCVAR HUMAN LoginPassWordNum = 0
SAVEVAR HUMAN LoginPassWordNum ..QuestDiaryLoginPassWord.txt
SENDMSG 6 您成功设置了二级密码：，请牢记此密码。
break
#say
恭喜您成功修改了二级登陆密码。
当前密码为：
密码输入错误次数清零。


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



[@CallInPutString50]
#if
checkvar HUMAN LoginPassWord =
#act
addiplist ..QuestDiaryBindIPList.txt
CALCVAR HUMAN LoginPassWord =
SAVEVAR HUMAN LoginPassWord ..QuestDiaryLoginPassWord.txt
CALCVAR HUMAN LoginPassWordStatus = 0
SAVEVAR HUMAN LoginPassWordStatus ..QuestDiaryLoginPassWord.txt
CALCVAR HUMAN LoginPassWordNum = 0
SAVEVAR HUMAN LoginPassWordNum ..QuestDiaryLoginPassWord.txt
SENDMSG 6 您成功设置了二级密码：，请牢记此密码。
break
#say
恭喜您成功设置二级密码。
当前密码为：


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



;------------------------------------------------------------------------------
下面是QMange.txt 内容也是最重要的添加

[@Login]
#if
isnewhuman
#act
CreateFile QuestDiaryBindIPList.txt   
;上面的是表示如果是新人，则在 QuestDiary 文件夹下的 BindIPList文件夹下 建立 玩家姓名.txt 并保存其玩家第登录IP
;BindIPList文件夹需自己手动建立.
#IF
CHECKLEVELEX > 0
#ACT
VAR String HUMAN LoginPassWord
VAR Integer HUMAN LoginPassWordStatus
VAR Integer HUMAN LoginPassWordNum
LOADVAR HUMAN LoginPassWord ..QuestDiaryLoginPassWord.txt
LOADVAR HUMAN LoginPassWordStatus ..QuestDiaryLoginPassWord.txt
LOADVAR HUMAN LoginPassWordNum ..QuestDiaryLoginPassWord.txt
;LoginPassWord.txt 这个txt 文件手动建立.
;#CALL [登陆登陆脚本.txt] @登陆设置
;#CALL [登陆封号设置.txt] @封号设置
;#CALL [元宝捐款爵位封号.txt] @爵位封号
;#CALL [专业制作排行刷新.txt] @排行刷新
;#CALL [游戏登陆脱机系统.txt] @脱机
goto @LastIP
;以上#CALL 都是我版本里原来的,并且我已经注释掉了，我上面所发的 VAR LOADVAR 都是针对二级密码脚本的你只需复制进
;去和你版本里的#call组合起来就可以了



[@LastIP]
#if
checkvar human LoginPassWord =
#act
sendmsg 6 ═════════════════════════════
sendmsg 6 您还没有设置二级密码保护，请尽快前往土城二级密码特使处设置。
sendmsg 6 您还没有设置二级密码保护，请尽快前往土城二级密码特使处设置。
sendmsg 6 您还没有设置二级密码保护，请尽快前往土城二级密码特使处设置。
sendmsg 6 ═════════════════════════════
break

#if
checkiplist ..QuestDiaryBindIPList.txt
#act
sendmsg 6 本次登陆的IP地址与您以前登陆的IP符合，通过验证。
break
#elsesay
由于检测到您目前的登陆IP段与以前不同。
请输入您的二级密码以正常游戏。  
【】
#elseact
ChangeModeEx 10 60 60
DelayCall 60000 @KICKIPLIST
messagebox 由于检测到您目前的登陆IP段与以前不同。请在60秒内输入您的二级密码以正常游戏。
break

[@CallInPutString51]
#if
checkvar human LoginPassWord =
#ACT
ADDIPLIST ..QuestDiaryBindIPList.txt
SENDMSG 6 二级登陆密码验证通过，当前IP地址已经加入到常用IP列表中。
sendmsg 7 如果您是网吧用户，为了防止同网吧盗号现象，您可以到二级密码特使处清除常用IP列表，下次登陆时需要输入二级密码方能正常游戏。
ChangeModeEx 10 1 0
ClearDelayGoto 0
close
break
#elseact
CALCVAR HUMAN LoginPassWordNum + 1
SAVEVAR HUMAN LoginPassWordNum ..QuestDiaryLoginPassWord.txt

#if
checkvar human LoginPassWordNum > 4
#say
密码输入错误次数过多，请小退后重新登陆。
您已经输入密码错误次，系统自动踢您下线。
#act
ClearDelayGoto 0
kick
messagebox 对不起，您已经累积输入密码错误次。系统将自动踢您下线，以后每次登陆均只有一次输入密码的机会。更改密码可以清空此数值，请到二级密码特使处更改密码。
break
#elsesay
对不起，您的密码输入有误，请重新输入！
您已经输入密码错误次，达到5次系统自动踢您下线。
请输入您的二级密码以正常游戏。  
【】


[@KICKIPLIST]
#IF
CHECKLEVELEX > 0
#ACT
kick
MESSAGEBOX 对不起，您没有通过二级密码输入验证，系统踢您下线。
break