传奇私服管理员验证脚本

[@管理员验证]
{
#SAY
　　　　　　　　　  管理员验证系统 
　　　　┌─┬─┬─┬─────┬─┬─┬─┒
　　　　├┬╆━┷━┷━━━━━┷━┷━╅┬┨
　　　　├┬┨　    <请输入管理密匙！/@@InPutString9>　　┠┬┨
　　　　├┬┺┯━┯━┯━━━┯━┯━┯┹┬┨
　　　　┕┷━┷━┷━┷━━━┷━┷━┷━┷┛ 
#ACT
#ELSEACT
  SENDMSG 6 非法操作！
break

[@InPutString9]
#ACT
  DELAYGOTO 1 ~@InPutString9

[~@InPutString9]
#IF
  equal A98 <$STR(S9)>
#ACT
  CHANGEPERMISSION 10
#CALL [\GM管理功能GM管理功能.txt] @管理
#ELSEACT
SENDMSG 6 密码错误!
  CLOSE

[@设置管理密码]
#SAY
　　　　　　　　　  修改管理员密码 
　　　　┌─┬─┬─┬─────┬─┬─┬─┒
　　　　├┬╆━┷━┷━━━━━┷━┷━╅┬┨
　　　　├┬┨　    <请输原管理密匙！/@@InPutString8>　　┠┬┨
　　　　├┬┺┯━┯━┯━━━┯━┯━┯┹┬┨
　　　　┕┷━┷━┷━┷━━━┷━┷━┷━┷┛ 
修改密码提示:请输入原管理员密码(范围:数字、字母、标点符号)
#ACT
#ELSEACT
  SENDMSG 6 非法操作！
break

[@InPutString8]
#ACT
  DELAYGOTO 1 ~@InPutString8

[~@InPutString8]
#IF
  equal A98 <$STR(S8)>
#ACT
goto @设置密码2
#ELSEACT
SENDMSG 6 密码错误!
  CLOSE

[@设置密码2]
#IF
  ISADMIN
#SAY
　　　　　　　　　  修改管理员密码 
　　　　┌─┬─┬─┬─────┬─┬─┬─┒
　　　　├┬╆━┷━┷━━━━━┷━┷━╅┬┨
　　　　├┬┨      <请输入新的密码！/@@InPutString6>　　┠┬┨
　　　　├┬┺┯━┯━┯━━━┯━┯━┯┹┬┨
　　　　┕┷━┷━┷━┷━━━┷━┷━┷━┷┛ 
修改密码提示:请输入新的管理密码(范围:数字、字母、标点符号)
#ACT
#ELSEACT
  SENDMSG 6 非法操作！
break

[@InPutString6]
#IF
  ISADMIN
#SAY
　　　　　　　　　  修改管理员密码 
　　　　┌─┬─┬─┬─────┬─┬─┬─┒
　　　　├┬╆━┷━┷━━━━━┷━┷━╅┬┨
　　　　├┬┨      <请再输入新密码！/@@InPutString7>　　┠┬┨
　　　　├┬┺┯━┯━┯━━━┯━┯━┯┹┬┨
　　　　┕┷━┷━┷━┷━━━┷━┷━┷━┷┛ 
修改密码提示:请再输入一次新密码(范围:数字、字母、标点符号)

[@InPutString7]
#IF
equal S7 <$STR(S6)>
#SAY
　　　　　　　　　　修改管理员密码 
　　　　┌─┬─┬─┬─────┬─┬─┬─┒
　　　　├┬╆━┷━┷━━━━━┷━┷━╅┬┨
　　　　├┬┨   <确定/@确定密码设置>        <重新输入/@设置密码2>   ┠┬┨
　　　　├┬┺┯━┯━┯━━━┯━┯━┯┹┬┨
　　　　┕┷━┷━┷━┷━━━┷━┷━┷━┷┛ 
修改密码提示:两次新密码输入正确(确定修改请点确定)
#ACT
#ELSESAY
　　　　　　　　　　修改管理员密码 
　　　　┌─┬─┬─┬─────┬─┬─┬─┒
　　　　├┬╆━┷━┷━━━━━┷━┷━╅┬┨
　　　　├┬┨         <重新输入/@设置密码2>         ┠┬┨
　　　　├┬┺┯━┯━┯━━━┯━┯━┯┹┬┨
　　　　┕┷━┷━┷━┷━━━┷━┷━┷━┷┛ 
修改密码提示:两次密码输入不一致(范围:数字、字母、标点符号)

[@确定密码设置]
#ACT
  DELAYGOTO 1 ~@InPutString7

[~@InPutString7]
#IF
  ISADMIN
#ACT
mov A98 <$STR(S7)>
SENDMSG 6 设置密码成功！请牢记您的密码！由于重新设置了密码请重新验证
goto @管理员验证
#ELSEACT
SENDMSG 6 密码错误!
  CLOSE
}