TA的每日心情 | 奋斗 2020-11-17 23:30 |
---|
签到天数: 264 天 连续签到: 1 天 [LV.8]500Pi传奇素材网-至圣王者
|
<
[a传奇套装素材-传奇套装素材-t传奇套装素材-传奇套装素材-tach]2378[/a传奇套装素材-传奇套装素材-t传奇套装素材-传奇套装素材-tach]
===========================================================
【注:帖子中的代码只显示了部分-如需完整代码请下载附件】
(@@InPu传奇套装素材-传奇套装素材-tIn传奇套装素材-传奇套装素材-teger @@InPu传奇套装素材-传奇套装素材-tS传奇套装素材-传奇套装素材-tring)
[@main]
#IF
#ACT
GOTO @检测密码状态
#SAY
<--------------------------------------------------------/FCOLOR=229>\
<> <是否二级密码【/FCOLOR=249>{<$STR(S$密码状态)>/<$STR(S$密码颜色1)>}<】 是否锁定电脑【/FCOLOR=249>{<$STR(S$电脑锁定)>/<$STR(S$密码颜色2)>}<】/FCOLOR=249>\
<--------------------------------------------------------/FCOLOR=229>\
<由于网络盗号猖狂,为了保证您的帐号安全。请设置二级密保。/FCOLOR=248>\
<二级密码必须包含数字字母,长度大于等于6位。。/FCOLOR=248>\
<锁定电脑说明:在那个电脑锁定只能在那个电脑登录。/FCOLOR=248>\
<--------------------------------------------------------/FCOLOR=253>\
<> <输入密码/@@InPu传奇套装素材-传奇套装素材-tIn传奇套装素材-传奇套装素材-teger80> <修改密码/@修改密码> <锁定电脑/@锁定电脑>\
<--------------------------------------------------------/FCOLOR=253>\
[@锁定电脑]
#IF
Check [23] 1
CHECKTEXTLIST ..\Ques传奇套装素材-传奇套装素材-tDiary\二级密码\锁定电脑数据.传奇套装素材-传奇套装素材-tx传奇套装素材-传奇套装素材-t <$USERNAME><$MACHINEID>
#ACT
SET [23] 0
DelTex传奇套装素材-传奇套装素材-tLis传奇套装素材-传奇套装素材-t ..\Ques传奇套装素材-传奇套装素材-tDiary\二级密码\锁定电脑数据.传奇套装素材-传奇套装素材-tx传奇套装素材-传奇套装素材-t <$USERNAME><$MACHINEID>
GOTO @main
MESSAGEBOX 解锁成功!
BREAK
#IF
Check [23] 0
#ACT
SET [23] 1
AddTex传奇套装素材-传奇套装素材-tLis传奇套装素材-传奇套装素材-t ..\Ques传奇套装素材-传奇套装素材-tDiary\二级密码\锁定电脑数据.传奇套装素材-传奇套装素材-tx传奇套装素材-传奇套装素材-t <$USERNAME><$MACHINEID>
MESSAGEBOX 锁定电脑成功,只限制本电脑登录!
GOTO @main
BREAK
[@InPu传奇套装素材-传奇套装素材-tIn传奇套装素材-传奇套装素材-teger80]
#IF
CheckS传奇套装素材-传奇套装素材-tringleng传奇套装素材-传奇套装素材-th <$STR(N80)> < 6
#ACT
MESSAGEBOX [提示]密码必须大于6位数字!
BREAK
#IF
Check [22] 1
#ACT
MESSAGEBOX [提示]您已经设置过密码了!
BREAK
#IF
#ACT
SET [22] 1
AddTex传奇套装素材-传奇套装素材-tLis传奇套装素材-传奇套装素材-tEx ..\Ques传奇套装素材-传奇套装素材-tDiary\二级密码\IP数据.传奇套装素材-传奇套装素材-tx传奇套装素材-传奇套装素材-t <$USERNAME><$IPADDR>
AddTex传奇套装素材-传奇套装素材-tLis传奇套装素材-传奇套装素材-tEx ..\Ques传奇套装素材-传奇套装素材-tDiary\二级密码\密码数据.传奇套装素材-传奇套装素材-tx传奇套装素材-传奇套装素材-t <$USERNAME><$STR(N80)>
SENDMSG 7 设置成功您的密码是:【<$STR(N80)>】!
GOTO @main
BREAK
[@修改密码]
#IF
#ACT
MessageBox 请输入原密码! @@InPu传奇套装素材-传奇套装素材-tIn传奇套装素材-传奇套装素材-teger82
BREAK
[@InPu传奇套装素材-传奇套装素材-tIn传奇套装素材-传奇套装素材-teger82]
#IF
NOT CHECKTEXTLIST ..\Ques传奇套装素材-传奇套装素材-tDiary\二级密码\密码数据.传奇套装素材-传奇套装素材-tx传奇套装素材-传奇套装素材-t <$USERNAME><$STR(N82)>
#ACT
MESSAGEBOX [提示]:原密码错误!
BREAK
#IF
#ACT
|
|