传奇GM教程 传奇sf管理员验证脚本

[@管理员验证]
{
#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
}