;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
[@PayNumber]
{
#ACT
mov  B1 ""
mov  B2 ""
goto @充值开始12
break

[@充值开始12]
#say
Welcome to use the sufficient value card system\
{FCOLOR/14}Please inputs your sufficient value  number and the secret  cipher:{FCOLOR/12}\\
You input the card number is {FCOLOR/1}<$OUTPUT(B1)>{FCOLOR/12} <Input card number/@@CardNumber>\
You input the secret cipher is {FCOLOR/10}<$OUTPUT(B2)>{FCOLOR/12} <Input secret cipher/@@CardPassword>\\
{FCOLOR/14}The input finishes please clicks starts the sufficient value{FCOLOR/12}\
<Starts the sufficient value/@输入完毕1>\\
<Return/@main>\

[@@CardNumber]
#ACT
   mov  B1  %INPUTSTR
   goto @充值开始12
   break
[@@CardPassword]
#ACT
   mov  B2  %INPUTSTR
   goto @充值开始12
   break


[@输入完毕1]
  #act
          Delaygoto [local] 5 @卡号检测
  #say
_{FCOLOR/10}Please wait while I Process the Data...{FCOLOR/12}\

[@卡号检测]
  #IF
     HLSCRIPTCMD CHECKCARD %B1 %B2
  #ACT
  goto @卡号正确
  break
  #elsesay
  _{FCOLOR/10}Sorry, you input the sufficient value number and the secret  cipher is not correct, please verifications!{FCOLOR/12}\\
  <退出/@exit>  \

[@卡号正确]
  #ACT
     HLSCRIPTCMD PAYCARD %B1 %B2
#say
_{FCOLOR/10}The sufficient value card sufficient value succeeds{FCOLOR/12}\\
_Your current integral points: {FCOLOR/10}<$HLPOINT>{FCOLOR/12} Points\\
_<Return/@main>
#ELSESAY
    Your Points are Insufficient \ \
		<Exit/@exit>

}
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;