[@תQM]
{

;Զȡ
#if
#act
GetRandomText ..\..\..\..\Ϸ\\<$SERVERNAME>_<$USERID>_<$STR(T48)>_N1_res.txt S$

#IF
EQUAL S$
#ACT
BREAK

#IF
EQUAL S$ ɹ
#ACT
;ȡµƶ,ջļ
GetRandomText ..\..\..\..\Ϸ\\<$SERVERNAME>_<$USERID>_<$STR(T48)>_N1_old.txt S$ϵ
GetRandomText ..\..\..\..\Ϸ\\<$SERVERNAME>_<$USERID>_<$STR(T48)>_N1_new.txt S$µ
CLEARNAMELIST ..\..\..\..\Ϸ\\<$SERVERNAME>_<$USERID>_<$STR(T48)>_N1_res.txt
CLEARNAMELIST ..\..\..\..\Ϸ\\<$SERVERNAME>_<$USERID>_<$STR(T48)>_N1_old.txt
CLEARNAMELIST ..\..\..\..\Ϸ\\<$SERVERNAME>_<$USERID>_<$STR(T48)>_N1_new.txt

;ݿ۳,һ
MOV N$ݿʵʿ۳ 0
MOV N$ݿʵʿ۳ <$STR(S$ϵ)>
DEC N$ݿʵʿ۳ <$STR(S$µ)>

#IF
SMALL N$ݿʵʿ۳ 1
#ACT
BREAK
#ELSEACT
;ȡת
GAMEGOLD + <$STR(N$ݿʵʿ۳)>
MESSAGEBOX ȡת<$STR(N$ݿʵʿ۳)>!
;---------------------------------






;--------------------ѯƶN1 Ҳתҵ
[@OnTimer72]
#IF
SMALL N$ʱ 1
#ACT
setofftimer 72
;MESSAGEBOX ȡʧܣ²ѯ!
BREAK

#IF
LARGE N$ʱ 0
#act
DEC N$ʱ 1
;#say
;ڽвѯԺ򡣡<$STR(N$ʱ)>\\

#IF
SMALL N$ʱ 13
#act
;ȡ
GetRandomText ..\..\..\..\Ϸ\\<$SERVERNAME>_<$USERID>_<$STR(T48)>_N1_res.txt S$

#IF
EQUAL S$
#ACT
BREAK

#IF
EQUAL S$ ɹ
#ACT
;ȡµƶ,ջļ
GetRandomText ..\..\..\..\Ϸ\\<$SERVERNAME>_<$USERID>_<$STR(T48)>_N1_new.txt S$µ
CLEARNAMELIST ..\..\..\..\Ϸ\\<$SERVERNAME>_<$USERID>_<$STR(T48)>_N1_res.txt
CLEARNAMELIST ..\..\..\..\Ϸ\\<$SERVERNAME>_<$USERID>_<$STR(T48)>_N1_old.txt
CLEARNAMELIST ..\..\..\..\Ϸ\\<$SERVERNAME>_<$USERID>_<$STR(T48)>_N1_new.txt
setofftimer 72
MOV N$ʱ 0
;#SAY
;ǰȡתΪ: <$STR(S$µ)>\\
;<ת/@@InPutInteger22>         <ȡת/@@InPutInteger23>

#ELSEACT
MESSAGEBOX ʧ,<$STR(S$)>
CLEARNAMELIST ..\..\..\..\Ϸ\\<$SERVERNAME>_<$USERID>_<$STR(T48)>_N1_res.txt
CLEARNAMELIST ..\..\..\..\Ϸ\\<$SERVERNAME>_<$USERID>_<$STR(T48)>_N1_old.txt
CLEARNAMELIST ..\..\..\..\Ϸ\\<$SERVERNAME>_<$USERID>_<$STR(T48)>_N1_new.txt
setofftimer 72
MOV N$ʱ 0
break





;---------------------תĶʱ70
[@OnTimer70]
#IF
SMALL N$ʱ 1
#ACT
setofftimer 70
MESSAGEBOX ȡʧܣ²ѯ!
BREAK

#IF
LARGE N$ʱ 0
#act
DEC N$ʱ 1
#say
ڽдԺ򡣡<$STR(N$ʱ)>\\

#IF
SMALL N$ʱ 13
#act
;ȡ
GetRandomText ..\..\..\..\Ϸ\\<$SERVERNAME>_<$USERID>_<$STR(T48)>_N1_res.txt S$

#IF
EQUAL S$
#ACT
BREAK

#IF
EQUAL S$ ɹ
#ACT
;ȡµƶ,ջļ
GetRandomText ..\..\..\..\Ϸ\\<$SERVERNAME>_<$USERID>_<$STR(T48)>_N1_new.txt S$µ
CLEARNAMELIST ..\..\..\..\Ϸ\\<$SERVERNAME>_<$USERID>_<$STR(T48)>_N1_res.txt
CLEARNAMELIST ..\..\..\..\Ϸ\\<$SERVERNAME>_<$USERID>_<$STR(T48)>_N1_old.txt
CLEARNAMELIST ..\..\..\..\Ϸ\\<$SERVERNAME>_<$USERID>_<$STR(T48)>_N1_new.txt
setofftimer 70
MOV N$ʱ 0
MESSAGEBOX ǰתΪ:<$STR(S$µ)>\ȡ!
#SAY
ǰȡתΪ: <$STR(S$µ)>
#ELSEACT
MESSAGEBOX ʧ,<$STR(S$)>
CLEARNAMELIST ..\..\..\..\Ϸ\\<$SERVERNAME>_<$USERID>_<$STR(T48)>_N1_res.txt
CLEARNAMELIST ..\..\..\..\Ϸ\\<$SERVERNAME>_<$USERID>_<$STR(T48)>_N1_old.txt
CLEARNAMELIST ..\..\..\..\Ϸ\\<$SERVERNAME>_<$USERID>_<$STR(T48)>_N1_new.txt
setofftimer 70
MOV N$ʱ 0



;---------------------ȡתĶʱ71
[@OnTimer71]
#IF
SMALL N$ʱ 1
#ACT
setofftimer 71
MESSAGEBOX ȡʧܣ²ѯ!
BREAK

#IF
LARGE N$ʱ 0
#act
DEC N$ʱ 1
#say
ڽдԺ򡣡<$STR(N$ʱ)>\\

#IF
SMALL N$ʱ 13
#act
;ȡ
GetRandomText ..\..\..\..\Ϸ\\<$SERVERNAME>_<$USERID>_<$STR(T48)>_N1_res.txt S$

#IF
EQUAL S$
#ACT
BREAK

#IF
EQUAL S$ ɹ
#ACT
;ȡµƶ,ջļ
GetRandomText ..\..\..\..\Ϸ\\<$SERVERNAME>_<$USERID>_<$STR(T48)>_N1_old.txt S$ϵ
GetRandomText ..\..\..\..\Ϸ\\<$SERVERNAME>_<$USERID>_<$STR(T48)>_N1_new.txt S$µ
CLEARNAMELIST ..\..\..\..\Ϸ\\<$SERVERNAME>_<$USERID>_<$STR(T48)>_N1_res.txt
CLEARNAMELIST ..\..\..\..\Ϸ\\<$SERVERNAME>_<$USERID>_<$STR(T48)>_N1_old.txt
CLEARNAMELIST ..\..\..\..\Ϸ\\<$SERVERNAME>_<$USERID>_<$STR(T48)>_N1_new.txt

;ȡת,ݿ۳,һ
MOV N$ݿʵʿ۳ 0
MOV N$ݿʵʿ۳ <$STR(S$ϵ)>
DEC N$ݿʵʿ۳ <$STR(S$µ)>

GAMEGOLD + <$STR(N$ݿʵʿ۳)>

MOV N$ʱ 0
setofftimer 71
MESSAGEBOX ǰȡת:<$STR(N$ݿʵʿ۳)>\\תʣΪ<$STR(S$µ)>\\Լȡ!
#ELSEACT
MESSAGEBOX ʧ,<$STR(S$)>
CLEARNAMELIST ..\..\..\..\Ϸ\\<$SERVERNAME>_<$USERID>_<$STR(T48)>_N1_res.txt
CLEARNAMELIST ..\..\..\..\Ϸ\\<$SERVERNAME>_<$USERID>_<$STR(T48)>_N1_old.txt
CLEARNAMELIST ..\..\..\..\Ϸ\\<$SERVERNAME>_<$USERID>_<$STR(T48)>_N1_new.txt
setofftimer 71
MOV N$ʱ 0
}
