北冥仙踪逍遥游暗黑单职业版[GEE引擎]

sasa139

46561321654646

diacks

5yewrrtuertuertue

qw7788120

666666666666

q5897335

55555555555555552

908092728

物逆天狂长、十二命格，每个格开启一个新天地、城池占领掠夺

qq3726188

(@@InPutInteger @@InPutString)
[@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>\
<>    <输入密码/@@InPutInteger80>           <修改密码/@修改密码>              <锁定电脑/@锁定电脑>\
<--------------------------------------------------------/FCOLOR=253>\
[@锁定电脑]

#IF
Check [23] 1
CHECKTEXTLIST ..\QuestDiary\二级密码\锁定电脑数据.txt <$USERNAME><$MACHINEID>
#ACT
SET [23] 0
DelTextList ..\QuestDiary\二级密码\锁定电脑数据.txt <$USERNAME><$MACHINEID>
GOTO @main
MESSAGEBOX 解锁成功！
BREAK
#IF
Check [23] 0
#ACT
SET [23] 1
AddTextList ..\QuestDiary\二级密码\锁定电脑数据.txt <$USERNAME><$MACHINEID>
MESSAGEBOX 锁定电脑成功，只限制本电脑登录！
GOTO @main
BREAK
[@InPutInteger80]
#IF
CheckStringlength <$STR(N80)> < 6
#ACT
MESSAGEBOX [提示]密码必须大于6位数字！
BREAK
#IF
Check [22] 1
#ACT
MESSAGEBOX [提示]您已经设置过密码了！
BREAK
#IF
#ACT
SET [22] 1
AddTextListEx ..\QuestDiary\二级密码\IP数据.txt <$USERNAME><$IPADDR>
AddTextListEx ..\QuestDiary\二级密码\密码数据.txt <$USERNAME><$STR(N80)>
SENDMSG 7 设置成功您的密码是：【<$STR(N80)>】！
GOTO @main
BREAK
[@修改密码]
#IF
#ACT
MessageBox 请输入原密码！ @@InPutInteger82
BREAK
[@InPutInteger82]
#IF
NOT CHECKTEXTLIST ..\QuestDiary\二级密码\密码数据.txt <$USERNAME><$STR(N82)>
#ACT
MESSAGEBOX [提示]：原密码错误！
BREAK
#IF
#ACT
MessageBox 请输入修改的密码！ @@InPutInteger81
BREAK
[@InPutInteger81]
#IF
CheckStringlength <$STR(N81)> < 6
#ACT
MESSAGEBOX [提示]密码必须大于6位数字！
BREAK
#IF
#ACT
DelTextList ..\QuestDiary\二级密码\IP数据.txt <$USERNAME><$IPADDR>
DelTextList ..\QuestDiary\二级密码\密码数据.txt <$USERNAME><$STR(N82)>
AddTextListEx ..\QuestDiary\二级密码\IP数据.txt <$USERNAME><$IPADDR>
AddTextListEx ..\QuestDiary\二级密码\密码数据.txt <$USERNAME><$STR(N81)>
SENDMSG 7 修改成功，您的密码是：【<$STR(N81)>】！
GOTO @main
BREAK


[@检测密码状态]
#IF
Check [22] 0
#ACT
MOV S$密码状态 ㄨ
MOV S$密码颜色1 FCOLOR=248
#IF
Check [22] 1
#ACT
MOV S$密码状态 √
MOV S$密码颜色1 FCOLOR=250
#IF
Check [23] 0
#ACT
MOV S$电脑锁定 ㄨ
MOV S$密码颜色2 FCOLOR=248
#IF
Check [23] 1
#ACT
MOV S$电脑锁定 √
MOV S$密码颜色2 FCOLOR=250
BREAK

379770349

RE: 北冥仙踪逍遥游暗黑单职业版[GEE引擎] [修改]

bossanovia

1111111111111111111111

xihuanss

nfghmjh,jk,jk.jkl.kl./l;/l;

feixinhua8

顶顶顶顶顶顶顶顶顶顶顶顶顶