GEE引擎脚本-二级密码保护

GEE引擎脚本-二级密码保护
===================================================
Gm版本库\二级密码保护   x3      204        103     二级密码保护              0       10006   0
===================================================
以下为NPC脚本：

[@main]
#IF
#ACT
MOV P1 58
;sucai.pak编号
OPENMERCHANTBIGDLG <$str(p1)> 240 0 0 -7 0 1 1160 0 1
#SAY
<Img:9:58:285:-33/@exit>\
\<Text:强烈要求玩家设置二级密码,杜绝木马盗号:-10:5{FCOLOR=31}>\
\<Text:密保为4-6位的数字密码，设置后可以随意修改:-10:23{FCOLOR=239}>\
\<Text:设置密保后每次上线都需要输入密保，不输入掉线处理:-10:41{FCOLOR=70}>\
\<Text:为了你的装备和元宝，建议你设置密保，请勿随便告诉他人！:-10:64{FCOLOR=57}>\
<ImgEx:58:241:242:243:-10:90/@@InPutString100>   <ImgEx:58:244:245:246:0:90/@@InPutString98(请输入旧密码)>  \



[@InPutString98]
#IF
EQUAL S98 <$STR(T25)>
#ACT
GOTO @修改密保
MOV S98
#elseact
MESSAGEBOX 密码错误不能修改
CLOSE


[@修改密保]
#IF
#ACT
MOV P1 58
;sucai.pak编号
OPENMERCHANTBIGDLG <$str(p1)> 240 0 0 -7 0 1 1160 0 1
#SAY
<Img:9:58:285:-33/@exit>\
\ \
\ \
\ \
\ \
<ImgEx:58:244:245:246:65:90/@@InPutString99(请输入旧密码)>  \






[@InPutString99]
#IF
CheckStringlength <$STR(S99)> > 5
CheckStringlength <$STR(S99)> < 9
#ACT
MOV T25 <$STR(S99)>
MESSAGEBOX 【设置密保成功，请牢记您的密保：[<$STR(S99)>]】
GuildNoticeMsg 254 200 【设置密保成功，请牢记您的密保：[<$STR(S99)>] SELF
GOTO @@InPutString98
MOV S99
BREAK
CLOSE

[@InPutString100]
#IF
CheckStringlength <$STR(S100)> > 5
CheckStringlength <$STR(S100)> < 9
EQUAL T25
#ACT
MOV T25 <$STR(S100)>
MESSAGEBOX 【设置密保成功，请牢记您的密保：[<$STR(S100)>]】
GuildNoticeMsg 254 200 【设置密保成功，请牢记您的密保：[<$STR(S100)>] SELF
MOV S100
BREAK
CLOSE