陈陈430 发表于 2023-5-4 15:48:42

传奇版本游戏中二级密码设置脚本


[@二级密码1]
{
#IF
#ACT
OPENMERCHANTBIGDLG17 70 3 4 0 -120 1 730 110
#SAY
\ \

<><ImgEx:17:72:72:72:360:347|251#‘请设置为3-6个汉字’/@@InPutString97>               <ImgEx:17:74:74:74:340:347|251#‘请输入原二级密码’/@@InPutString98(请输入旧密码)>\




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


[@修改密保]
#IF
#ACT
OPENMERCHANTBIGDLG17 70 3 4 0 -120 1 730 110
#SAY
\ \
<><ImgEx:17:72:72:72:460:347|251#‘请设置新二级密码’^-^254#必须为3-6个汉字/@@InPutString99>



[@InPutString99]
#IF
CheckStringlength <$STR(S99)> < 6
#ACT
MESSAGEBOX 密码最少输入3个汉字,最多6个汉字!
break

#IF
CheckStringlength <$STR(S99)> > 12
#ACT
MESSAGEBOX 密码最少输入3个汉字,最多6个汉字!
break

#or
CheckContainsText <$STR(S99)> @
CheckContainsText <$STR(S99)> (
CheckContainsText <$STR(S99)> )
CheckContainsText <$STR(S99)> [
CheckContainsText <$STR(S99)> ]
CheckContainsText <$STR(S99)> {
CheckContainsText <$STR(S99)> }
CheckContainsText <$STR(S99)> *
CheckContainsText <$STR(S99)> /
CheckContainsText <$STR(S99)> \
CheckContainsText <$STR(S99)> $
CheckContainsText <$STR(S99)> &
CheckContainsText <$STR(S99)> 0
CheckContainsText <$STR(S99)> 1
CheckContainsText <$STR(S99)> 2
CheckContainsText <$STR(S99)> 3
CheckContainsText <$STR(S99)> 4
CheckContainsText <$STR(S99)> 5
CheckContainsText <$STR(S99)> 6
CheckContainsText <$STR(S99)> 7
CheckContainsText <$STR(S99)> 8
CheckContainsText <$STR(S99)> 9
CheckContainsText <$STR(S99)> a
CheckContainsText <$STR(S99)> b
CheckContainsText <$STR(S99)> c
CheckContainsText <$STR(S99)> d
CheckContainsText <$STR(S99)> e
CheckContainsText <$STR(S99)> f
CheckContainsText <$STR(S99)> g
CheckContainsText <$STR(S99)> h
CheckContainsText <$STR(S99)> i
CheckContainsText <$STR(S99)> j
CheckContainsText <$STR(S99)> k
CheckContainsText <$STR(S99)> l
CheckContainsText <$STR(S99)> m
CheckContainsText <$STR(S99)> n
CheckContainsText <$STR(S99)> o
CheckContainsText <$STR(S99)> p
CheckContainsText <$STR(S99)> q
CheckContainsText <$STR(S99)> r
CheckContainsText <$STR(S99)> s
CheckContainsText <$STR(S99)> t
CheckContainsText <$STR(S99)> u
CheckContainsText <$STR(S99)> v
CheckContainsText <$STR(S99)> w
CheckContainsText <$STR(S99)> x
CheckContainsText <$STR(S99)> y
CheckContainsText <$STR(S99)> z
#act
MESSAGEBOX 二级密码必须设置为汉字!!!
break

#if
#act
MOV T25 <$STR(S99)>
MESSAGEBOX 【设置密保成功,请牢记您的密保:[<$STR(S99)>]】
GuildNoticeMsg 254 200 【设置密保成功,请牢记您的密保:[<$STR(S99)>] SELF
GOTO @@InPutString98
MOV S99
CLOSE

[@InPutString97]
#IF
CheckStringlength <$STR(S97)> < 6
#ACT
MESSAGEBOX 密码最少输入3个汉字,最多6个汉字!
break

#IF
CheckStringlength <$STR(S97)> > 12
#ACT
MESSAGEBOX 密码最少输入3个汉字,最多6个汉字!
break

#or
CheckContainsText <$STR(S97)> @
CheckContainsText <$STR(S97)> (
CheckContainsText <$STR(S97)> )
CheckContainsText <$STR(S97)> [
CheckContainsText <$STR(S97)> ]
CheckContainsText <$STR(S97)> {
CheckContainsText <$STR(S97)> }
CheckContainsText <$STR(S97)> *
CheckContainsText <$STR(S97)> /
CheckContainsText <$STR(S97)> \
CheckContainsText <$STR(S97)> $
CheckContainsText <$STR(S97)> &
CheckContainsText <$STR(S97)> 0
CheckContainsText <$STR(S97)> 1
CheckContainsText <$STR(S97)> 2
CheckContainsText <$STR(S97)> 3
CheckContainsText <$STR(S97)> 4
CheckContainsText <$STR(S97)> 5
CheckContainsText <$STR(S97)> 6
CheckContainsText <$STR(S97)> 7
CheckContainsText <$STR(S97)> 8
CheckContainsText <$STR(S97)> 9
CheckContainsText <$STR(S97)> a
CheckContainsText <$STR(S97)> b
CheckContainsText <$STR(S97)> c
CheckContainsText <$STR(S97)> d
CheckContainsText <$STR(S97)> e
CheckContainsText <$STR(S97)> f
CheckContainsText <$STR(S97)> g
CheckContainsText <$STR(S97)> h
CheckContainsText <$STR(S97)> i
CheckContainsText <$STR(S97)> j
CheckContainsText <$STR(S97)> k
CheckContainsText <$STR(S97)> l
CheckContainsText <$STR(S97)> m
CheckContainsText <$STR(S97)> n
CheckContainsText <$STR(S97)> o
CheckContainsText <$STR(S97)> p
CheckContainsText <$STR(S97)> q
CheckContainsText <$STR(S97)> r
CheckContainsText <$STR(S97)> s
CheckContainsText <$STR(S97)> t
CheckContainsText <$STR(S97)> u
CheckContainsText <$STR(S97)> v
CheckContainsText <$STR(S97)> w
CheckContainsText <$STR(S97)> x
CheckContainsText <$STR(S97)> y
CheckContainsText <$STR(S97)> z
#act
MESSAGEBOX 二级密码必须设置为汉字!!!
break

#if
NOT equal T25
#act
MESSAGEBOX  你已经设置过二级密码!!\ \ 如果要修改密码请点击修改密码按钮!!
break

#IF
#ACT
MOV T25 <$STR(S97)>
MESSAGEBOX 【设置密保成功,请牢记您的密保:[<$STR(S97)>]】
GuildNoticeMsg 254 200 【设置密保成功,请牢记您的密保:[<$STR(S97)>] SELF
MOV S97
CLOSE
}

良辰743 发表于 2023-5-4 16:42:03

楼主,大恩不言谢了!GM爱好者:www.gmahz.com是最棒的!

a3583028 发表于 2023-5-4 16:50:04

努力赚币中。。。

高山花环 发表于 2023-5-4 16:50:08

论坛不能没有像楼主这样的人才啊!我会一直支持GM爱好者:www.gmahz.com

麦子971 发表于 2023-5-4 16:50:28

这东西我收了!谢谢楼主!GM爱好者:www.gmahz.com真好!

weiiscol 发表于 2023-5-4 16:50:54

没薪没费 发表于 2023-5-6 00:24:43

感谢楼主的无私分享!要想GM爱好者:www.gmahz.com好 就靠你我他

luly靓 发表于 2023-5-7 00:18:37

楼主太厉害了!楼主,I*老*虎*U!我觉得GM爱好者:www.gmahz.com真是个好地方

1508043935 发表于 2023-5-11 16:58:56

金币我要攒金币!!!

一米天堂 发表于 2023-5-16 06:07:07

我看不错噢 谢谢楼主!GM爱好者:www.gmahz.com越来越好!
页: [1] 2
查看完整版本: 传奇版本游戏中二级密码设置脚本