;;ѧԺ  college.e-168.cn 2005-4-12
[@]
{
#IF
#ACT
   LOADVALUE D1 "QuestDiary\\\ݿ.txt" [%USERNAME] []
#IF
#SAY
ǰΪ{FCOLOR/1}<$OUTPUT(D1)>{FCOLOR/12}.\
ǲֿ?ҿ԰롣\
{FCOLOR/1}Ҫ100.{FCOLOR/12}\
<ֿ롽/@@*10_Change_stgpasswd>{FCOLOR/10}(ӢĻ10λ){FCOLOR/12}\
<رա/@exit>\

[@@*10_Change_stgpasswd]
#ACT
mov A4 %INPUTSTR
#SAY
<ٴ롽/@@*10_confirm_passwd>\
[@@*10_confirm_passwd]
#ACT
mov A5 %INPUTSTR
#IF
equal A4 %A5
large  D1 99
#ACT
   DEC    D1  100
SavePasswd  %A4
SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
#SAY
ѾĲֿΪ: {FCOLOR/10}<$OUTPUT(A4)>{FCOLOR/12}\
ĿǰʣΪ{FCOLOR/1}<$OUTPUT(D1)>{FCOLOR/12} .\
<رա/@exit>\

#ELSESAY
ʣΪ{FCOLOR/1}<$OUTPUT(D1)>{FCOLOR/12}.Ҫ100ֲ롣\
<رա/@exit>\
}
;;ѧԺ  college.e-168.cn 2005-4-12

