(@@InPutInteger @@InPutString )
[@ʼ]
{
#IF
ISADMIN
#SAY
ûӭ,ԭʼ!<COLOR=clFuchsia ʹ @ ֱӲ뾺>\
԰ҪϷװ!\
һüǮ!\
ϷҪȡ ļ<COLOR=clLime  1% > ķã  <COLOR=clRed ע:ļҶ>\
ĳɹϵͳȡ ׶<COLOR=clLime  10%> ľ˰  <COLOR=clRed ע:>\
<ļ۸/@ļ۸>       <ĳɹ/@ĳɹ>       <ʧ/@ʧ>       <ʱ/@ʱ>\  
<COLOR=clSkyBlue ǰװ><$STR(A10)><COLOR=clSkyBlue :><$STR(G9)>Ԫ<COLOR=clSkyBlue      ǰǣ><$STR(A9)>\ 
<COLOR=#242 ǰң><$STR(A8)>   ʧܺƷ</@>\
<Ҫ/@>  <ȡƷ/@ȡ>  <Ʒ/@ȡ>  < /@exit>\
#ACT
BREAK


#IF
EQUAL G9 0
#SAY
ûӭ,ԭʼ!<COLOR=clFuchsia ʹ @ ֱӲ뾺>\
԰ҪϷװ!\
һüǮ!\
ϷҪȡ ļ<COLOR=clLime  1% > ķã  <COLOR=clRed ע:ļҶ>\
ĳɹϵͳȡ ׶<COLOR=clLime  10%> ľ˰  <COLOR=clRed ע:>\
<ļ۸/@ļ۸>       <ĳɹ/@ĳɹ>       <ʧ/@ʧ>       <ʱ/@ʱ>\ \ 
#ACT
;mov M5 0
BREAK

#IF
#SAY
ûӭ,ԭʼ!<COLOR=clFuchsia ʹ @ ֱӲ뾺>\
԰ҪϷװ!\
һüǮ!\
ϷҪȡ ļ<COLOR=clLime  1% > ķã  <COLOR=clRed ע:ļҶ>\
ĳɹϵͳȡ ׶<COLOR=clLime  10%> ľ˰  <COLOR=clRed ע:>\
<ļ۸/@ļ۸>       <ĳɹ/@ĳɹ>       <ʧ/@ʧ>       <ʱ/@ʱ>\  
<COLOR=clSkyBlue ǰװ><$STR(A10)><COLOR=clSkyBlue :><$STR(G9)>Ԫ<COLOR=clSkyBlue      ǰǣ><$STR(A9)>\ 
<COLOR=#242 ǰң><$STR(A8)>\
<Ҫ/@>  <ȡƷ/@ȡ>  <Ʒ/@ȡ>  < /@exit>\


[@ʱ]
\ \ 
ÿҾʱ60\
ʱΪ0ʱ\
ʣʱ䣺<$STR(G8)>!\ \
<ˢ/@ʱ>\
</@ʼ>

[@]
#IF
large G8 0
#ACT
QUERYVALUE 6 1 10 ~Ʒ Ʒĵ׼:λ(Ԫ)<$STR(G9)>Ԫ QF
#ELSEACT
goto @ʼ
SENDMSG 6 [ʾ:]˾ʱѽ
BREAK

[~Ʒ]
#IF
large M6 <$STR(G9)>
#ACT
goto @Ԫ2
#ELSEACT
goto @ʼ
SENDMSG 5 [ʾ:]<$STR(G9)>Ԫ!ȷ
BREAK


[@Ԫ2]
#IF
EQUAL G50 1
CHECKGAMEGOLD ? $STR(M6)
#ACT
<$STR(A8)>.GAMEGOLD + <$STR(G9)>
mov A8 <$USERNAME>
mov G9 <$STR(M6)>
GAMEGOLD - <$STR(M6)>
INC G8 60
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>ıʯ<$STR(A10)>,ļۣ<$STR(G9)>Ԫ,ʣʱ䣺%t 255 245 <$STR(G8)>
SENDMSG 0 <$STR(A10)>Ʒ:+<$STR(G10)>,ħ+<$STR(M11)>,+<$STR(M12)>,ħ+<$STR(M13)>,+<$STR(M14)>,־=<$STR(M16)> 255 245 <$STR(G8)>
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>ģ<$STR(A10)>,ļۣ<$STR(G9)>Ԫ!
goto @ʼ
BREAK

#IF
EQUAL G51 1
CHECKGAMEGOLD ? $STR(M6)
#ACT
<$STR(A8)>.GAMEGOLD + <$STR(G9)>
mov A8 <$USERNAME>
mov G9 <$STR(M6)>
GAMEGOLD - <$STR(M6)>
INC G8 60
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME><$STR(A10)>,ļۣ<$STR(G9)>Ԫ,ʣʱ䣺%t 255 245 <$STR(G8)>
SENDMSG 0 <$STR(A10)>Ʒ:+<$STR(G10)>,ħ+<$STR(M11)>,+<$STR(M12)>,ħ+<$STR(M13)>,+<$STR(M14)>,־=<$STR(M16)> 255 245 <$STR(G8)>
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>ģ<$STR(A10)>,ļۣ<$STR(G9)>Ԫ!
goto @ʼ
BREAK

#IF
EQUAL G52 1
CHECKGAMEGOLD ? $STR(M6)
#ACT
<$STR(A8)>.GAMEGOLD + <$STR(G9)>
mov A8 <$USERNAME>
mov G9 <$STR(M6)>
GAMEGOLD - <$STR(M6)>
INC G8 60
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>ѥӣ<$STR(A10)>,ļۣ<$STR(G9)>Ԫ,ʣʱ䣺%t 255 245 <$STR(G8)>
SENDMSG 0 <$STR(A10)>Ʒ:+<$STR(G10)>,ħ+<$STR(M11)>,+<$STR(M12)>,ħ+<$STR(M13)>,+<$STR(M14)>,־=<$STR(M16)> 255 245 <$STR(G8)>
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>ģ<$STR(A10)>,ļۣ<$STR(G9)>Ԫ!
goto @ʼ
BREAK

#IF
EQUAL G53 1
CHECKGAMEGOLD ? $STR(M6)
#ACT
<$STR(A8)>.GAMEGOLD + <$STR(G9)>
mov A8 <$USERNAME>
mov G9 <$STR(M6)>
GAMEGOLD - <$STR(M6)>
INC G8 60
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>ѫ£<$STR(A10)>,ļۣ<$STR(G9)>Ԫ,ʣʱ䣺%t 255 245 <$STR(G8)>
SENDMSG 0 <$STR(A10)>Ʒ:+<$STR(G10)>,ħ+<$STR(M11)>,+<$STR(M12)>,ħ+<$STR(M13)>,+<$STR(M14)>,־=<$STR(M16)> 255 245 <$STR(G8)>
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>ģ<$STR(A10)>,ļۣ<$STR(G9)>Ԫ!
goto @ʼ
BREAK


#IF
EQUAL G54 1
CHECKGAMEGOLD ? $STR(M6)
#ACT
<$STR(A8)>.GAMEGOLD + <$STR(G9)>
mov A8 <$USERNAME>
mov G9 <$STR(M6)>
GAMEGOLD - <$STR(M6)>
INC G8 60
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>ͷ<$STR(A10)>,ļۣ<$STR(G9)>Ԫ,ʣʱ䣺%t 255 245 <$STR(G8)>
SENDMSG 0 <$STR(A10)>Ʒ:+<$STR(G10)>,ħ+<$STR(M11)>,+<$STR(M12)>,ħ+<$STR(M13)>,+<$STR(M14)>,־=<$STR(M16)> 255 245 <$STR(G8)>
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>ģ<$STR(A10)>,ļۣ<$STR(G9)>Ԫ!
goto @ʼ
BREAK


#IF
EQUAL G55 1
CHECKGAMEGOLD ? $STR(M6)
#ACT
<$STR(A8)>.GAMEGOLD + <$STR(G9)>
mov A8 <$USERNAME>
mov G9 <$STR(M6)>
GAMEGOLD - <$STR(M6)>
INC G8 60
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>ķװ<$STR(A10)>,ļۣ<$STR(G9)>Ԫ,ʣʱ䣺%t 255 245 <$STR(G8)>
SENDMSG 0 <$STR(A10)>Ʒ:+<$STR(G10)>,ħ+<$STR(M11)>,+<$STR(M12)>,ħ+<$STR(M13)>,+<$STR(M14)>,־=<$STR(M16)> 255 245 <$STR(G8)>
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>ģ<$STR(A10)>,ļۣ<$STR(G9)>Ԫ!
goto @ʼ
BREAK


#IF
EQUAL G56 1
CHECKGAMEGOLD ? $STR(M6)
#ACT
<$STR(A8)>.GAMEGOLD + <$STR(G9)>
mov A8 <$USERNAME>
mov G9 <$STR(M6)>
GAMEGOLD - <$STR(M6)>
INC G8 60
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME><$STR(A10)>,ļۣ<$STR(G9)>Ԫ,ʣʱ䣺%t 255 245 <$STR(G8)>
SENDMSG 0 <$STR(A10)>Ʒ:+<$STR(G10)>,ħ+<$STR(G11)>,+<$STR(G12)>,+<$STR(G13)>,׼ȷ+<$STR(G14)>,־=<$STR(G16)> 255 245 <$STR(G8)>
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>ģ<$STR(A10)>,ļۣ<$STR(G9)>Ԫ!
goto @ʼ
BREAK



#IF
EQUAL G57 1
CHECKGAMEGOLD ? $STR(M6)
#ACT
<$STR(A8)>.GAMEGOLD + <$STR(G9)>
mov A8 <$USERNAME>
mov G9 <$STR(M6)>
GAMEGOLD - <$STR(M6)>
INC G8 60
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME><$STR(A10)>,ļۣ<$STR(G9)>Ԫ,ʣʱ䣺%t 255 245 <$STR(G8)>
SENDMSG 0 <$STR(A10)>Ʒ:+<$STR(G10)>,ħ+<$STR(M11)>,+<$STR(M12)>,ħ+<$STR(M13)>,+<$STR(M14)>,־=<$STR(M16)> 255 245 <$STR(G8)>
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>ģ<$STR(A10)>,ļۣ<$STR(G9)>Ԫ!
goto @ʼ
BREAK


#IF
EQUAL G58 1
CHECKGAMEGOLD ? $STR(M6)
#ACT
<$STR(A8)>.GAMEGOLD + <$STR(G9)>
mov A8 <$USERNAME>
mov G9 <$STR(M6)>
GAMEGOLD - <$STR(M6)>
INC G8 60
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME><$STR(A10)>,ļۣ<$STR(G9)>Ԫ,ʣʱ䣺%t 255 245 <$STR(G8)>
SENDMSG 0 <$STR(A10)>Ʒ:+<$STR(G10)>,ħ+<$STR(M11)>,+<$STR(M12)>,ħ+<$STR(M13)>,+<$STR(M14)>,־=<$STR(M16)> 255 245 <$STR(G8)>
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>ģ<$STR(A10)>,ļۣ<$STR(G9)>Ԫ!
goto @ʼ
BREAK


#IF
EQUAL G59 1
CHECKGAMEGOLD ? $STR(M6)
#ACT
<$STR(A8)>.GAMEGOLD + <$STR(G9)>
mov A8 <$USERNAME>
mov G9 <$STR(M6)>
GAMEGOLD - <$STR(M6)>
INC G8 60
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>Ľָ<$STR(A10)>,ļۣ<$STR(G9)>Ԫ,ʣʱ䣺%t 255 245 <$STR(G8)>
SENDMSG 0 <$STR(A10)>Ʒ:+<$STR(G10)>,ħ+<$STR(M11)>,+<$STR(M12)>,ħ+<$STR(M13)>,+<$STR(M14)>,־=<$STR(M16)> 255 245 <$STR(G8)>
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>ģ<$STR(A10)>,ļۣ<$STR(G9)>Ԫ!
goto @ʼ
BREAK


#IF
CHECKGAMEGOLD ? $STR(M6)
#ACT
<$STR(A8)>.GAMEGOLD + <$STR(G9)>
mov A8 <$USERNAME>
mov G9 <$STR(M6)>
GAMEGOLD - <$STR(M6)>
INC G8 60
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>Ʒ<$STR(A10)>,ļۣ<$STR(G9)>Ԫ,ʣʱ䣺%t 255 245 <$STR(G8)>
SENDMSG 0 <$STR(A10)>Ʒ:+<$STR(G10)>,+<$STR(M11)>,+<$STR(M12)>,+<$STR(M13)>,+<$STR(M14)>,+<$STR(M16)> 255 245 <$STR(G8)>
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>ģ<$STR(A10)>,ļۣ<$STR(G9)>Ԫ!
goto @ʼ
#ELSEACT
goto @ʼ
MESSAGEBOX Ԫ֧ۣ
BREAK

[@ļ۸]
#IF
EQUAL A10 
#ACT
QUERYVALUE 5 1 10 ~qbjg Ʒĵ׼:λ(Ԫ)ףԪ QF
#ELSEACT
goto @ʼ
MESSAGEBOX ޷ٴ
BREAK

[~qbjg]
#IF
large M5 9
EQUAL A10 
#ACT
goto @Ԫ
#ELSEACT
goto @ʼ
SENDMSG 6 [ʾ:]ףԪ!ȷѾ
BREAK


[@Ԫ]
#IF
;EQUAL A10 
#SAY
ûӭ,ԭʼ!<COLOR=clFuchsia ʹ @ ֱӲ뾺>\
԰ҪϷװ!\
һüǮ!\
ϷҪȡ ļ<COLOR=clLime  1% > ķã  <COLOR=clRed ע:ļҶ>\
ĳɹϵͳȡ ׶<COLOR=clLime  10%> ľ˰  <COLOR=clRed ע:>\
<ļ۸/@ļ۸>       <ĳɹ/@ĳɹ>       <ʧ/@ʧ>       <ʱ/@ʱ>\ \  
ļ۸<$STR(G9)>\ 
ҪϷ߷ŵ潻ں ϣ˼\
#ACT
DELAYCALL 50 @1ʼ1
mov G9 <$STR(M5)>


[@1ʼ1]
#IF
EQUAL A10 
#ACT
QUERYITEMDLG Ҫװ @1ʼ2 0
#ELSEACT
goto @ʼ
MESSAGEBOX  [ʾ:]Ƚеȴֽ!
#ELSEACT
goto @ʼ
MESSAGEBOX ޷ٴ
BREAK

[@1ʼ2]
#IF
EQUAL A10 
CHECKGAMEGOLD > 0
#ACT
goto @װ
#ELSEACT
goto @ʼ
MESSAGEBOX  [ʾ:]Ƚеȴֽ!\Ԫ֧!
BREAK

[@װ]
#IF
CHECKDLGITEMTYPE BUJUK
CHECKDLGITEMNAME <$DLGITEMNAME>
#ACT
mov A10 <$DLGITEMNAME>
GAMEGOLD - 1
GETDLGITEMVALUE M10 0
GETDLGITEMVALUE M11 1
GETDLGITEMVALUE M12 2
GETDLGITEMVALUE M13 3
GETDLGITEMVALUE M14 4
GETDLGITEMVALUE M16 14
TAKEDLGITEM
mov A9 <$USERNAME>
mov G10 <$STR(M10)>
mov G11 <$STR(M11)>
mov G12 <$STR(M12)>
mov G13 <$STR(M13)>
mov G14 <$STR(M14)>
mov G16 <$STR(M16)>
mov G7 0
DelayCall 1000 @ʱʯ
MESSAGEBOX ĿʼǰҪɡļ1%ķã\\ļѾ
SENDMSG 0 <$USERNAME>ģ<$STR(A10)>,ļۣ<$STR(G9)>Ԫ!
goto @ʼ
Break


#IF
CHECKDLGITEMTYPE BELT
CHECKDLGITEMNAME <$DLGITEMNAME>
#ACT
mov A10 <$DLGITEMNAME>
GAMEGOLD - 1
GETDLGITEMVALUE M10 0
GETDLGITEMVALUE M11 1
GETDLGITEMVALUE M12 2
GETDLGITEMVALUE M13 3
GETDLGITEMVALUE M14 4
GETDLGITEMVALUE M16 14
TAKEDLGITEM
mov A9 <$USERNAME>
mov G10 <$STR(M10)>
mov G11 <$STR(M11)>
mov G12 <$STR(M12)>
mov G13 <$STR(M13)>
mov G14 <$STR(M14)>
mov G16 <$STR(M16)>
mov G7 0
DelayCall 1000 @ʱ
MESSAGEBOX ĿʼǰҪɡļ1%ķã\\ļѾ
SENDMSG 0 <$USERNAME>ģ<$STR(A10)>,ļۣ<$STR(G9)>Ԫ!
goto @ʼ
Break

#IF
CHECKDLGITEMTYPE BOOTS
CHECKDLGITEMNAME <$DLGITEMNAME>
#ACT
mov A10 <$DLGITEMNAME>
GAMEGOLD - 1
GETDLGITEMVALUE M10 0
GETDLGITEMVALUE M11 1
GETDLGITEMVALUE M12 2
GETDLGITEMVALUE M13 3
GETDLGITEMVALUE M14 4
GETDLGITEMVALUE M16 14
TAKEDLGITEM
mov A9 <$USERNAME>
mov G10 <$STR(M10)>
mov G11 <$STR(M11)>
mov G12 <$STR(M12)>
mov G13 <$STR(M13)>
mov G14 <$STR(M14)>
mov G16 <$STR(M16)>
mov G7 0
DelayCall 1000 @ʱѥ
MESSAGEBOX ĿʼǰҪɡļ1%ķã\\ļѾ
SENDMSG 0 <$USERNAME>ģ<$STR(A10)>,ļۣ<$STR(G9)>Ԫ!
goto @ʼ
Break

#IF
CHECKDLGITEMTYPE MEDAL
CHECKDLGITEMNAME <$DLGITEMNAME>
#ACT
mov A10 <$DLGITEMNAME>
GAMEGOLD - 1
GETDLGITEMVALUE M10 0
GETDLGITEMVALUE M11 1
GETDLGITEMVALUE M12 2
GETDLGITEMVALUE M13 3
GETDLGITEMVALUE M14 4
GETDLGITEMVALUE M16 14
TAKEDLGITEM
mov A9 <$USERNAME>
mov G10 <$STR(M10)>
mov G11 <$STR(M11)>
mov G12 <$STR(M12)>
mov G13 <$STR(M13)>
mov G14 <$STR(M14)>
mov G16 <$STR(M16)>
mov G7 0
DelayCall 1000 @ʱѫ
MESSAGEBOX ĿʼǰҪɡļ1%ķã\\ļѾ
SENDMSG 0 <$USERNAME>ģ<$STR(A10)>,ļۣ<$STR(G9)>Ԫ!
goto @ʼ
Break

#IF
CHECKDLGITEMTYPE HELMET
CHECKDLGITEMNAME <$DLGITEMNAME>
#ACT
mov A10 <$DLGITEMNAME>
GAMEGOLD - 1
GETDLGITEMVALUE M10 0
GETDLGITEMVALUE M11 1
GETDLGITEMVALUE M12 2
GETDLGITEMVALUE M13 3
GETDLGITEMVALUE M14 4
GETDLGITEMVALUE M16 14
TAKEDLGITEM
mov A9 <$USERNAME>
mov G10 <$STR(M10)>
mov G11 <$STR(M11)>
mov G12 <$STR(M12)>
mov G13 <$STR(M13)>
mov G14 <$STR(M14)>
mov G16 <$STR(M16)>
mov G7 0
DelayCall 1000 @ʱͷ
MESSAGEBOX ĿʼǰҪɡļ1%ķã\\ļѾ
SENDMSG 0 <$USERNAME>ģ<$STR(A10)>,ļۣ<$STR(G9)>Ԫ!
goto @ʼ
Break

#IF
CHECKDLGITEMTYPE DRESS
CHECKDLGITEMNAME <$DLGITEMNAME>
#ACT
mov A10 <$DLGITEMNAME>
GAMEGOLD - 1
GETDLGITEMVALUE M10 0
GETDLGITEMVALUE M11 1
GETDLGITEMVALUE M12 2
GETDLGITEMVALUE M13 3
GETDLGITEMVALUE M14 4
GETDLGITEMVALUE M16 14
TAKEDLGITEM
mov A9 <$USERNAME>
mov G10 <$STR(M10)>
mov G11 <$STR(M11)>
mov G12 <$STR(M12)>
mov G13 <$STR(M13)>
mov G14 <$STR(M14)>
mov G16 <$STR(M16)>
mov G7 0
DelayCall 1000 @ʱ·
MESSAGEBOX ĿʼǰҪɡļ1%ķã\\ļѾ
SENDMSG 0 <$USERNAME>ģ<$STR(A10)>,ļۣ<$STR(G9)>Ԫ!
goto @ʼ
Break

#IF
CHECKDLGITEMNAME <$DLGITEMNAME>
CHECKDLGITEMTYPE WEAPON
#ACT
mov A10 <$DLGITEMNAME>
GAMEGOLD - 1
GETDLGITEMVALUE M10 0
GETDLGITEMVALUE M11 1
GETDLGITEMVALUE M12 2
GETDLGITEMVALUE M13 3
GETDLGITEMVALUE M14 5
GETDLGITEMVALUE M16 14
TAKEDLGITEM
mov A9 <$USERNAME>
mov G10 <$STR(M10)>
mov G11 <$STR(M11)>
mov G12 <$STR(M12)>
mov G13 <$STR(M13)>
mov G14 <$STR(M14)>
mov G16 <$STR(M16)>
mov G7 0
DelayCall 1000 @ʱ
MESSAGEBOX ĿʼǰҪɡļ1%ķã\\ļѾ
SENDMSG 0 <$USERNAME>ģ<$STR(A10)>,ļۣ<$STR(G9)>Ԫ!
goto @ʼ
Break

#IF
CHECKDLGITEMNAME <$DLGITEMNAME>
CHECKDLGITEMTYPE NECKLACE
#ACT
mov A10 <$DLGITEMNAME>
GAMEGOLD - 1
GETDLGITEMVALUE M10 0
GETDLGITEMVALUE M11 1
GETDLGITEMVALUE M12 2
GETDLGITEMVALUE M13 3
GETDLGITEMVALUE M14 4
GETDLGITEMVALUE M16 14
TAKEDLGITEM
mov A9 <$USERNAME>
mov G10 <$STR(M10)>
mov G11 <$STR(M11)>
mov G12 <$STR(M12)>
mov G13 <$STR(M13)>
mov G14 <$STR(M14)>
mov G16 <$STR(M16)>
mov G7 0
DelayCall 1000 @ʱ
MESSAGEBOX ĿʼǰҪɡļ1%ķã\\ļѾ
SENDMSG 0 <$USERNAME>ģ<$STR(A10)>,ļۣ<$STR(G9)>Ԫ!
goto @ʼ
Break

#IF
CHECKDLGITEMNAME <$DLGITEMNAME>
CHECKDLGITEMTYPE ARMRING
#ACT
mov A10 <$DLGITEMNAME>
GAMEGOLD - 1
GETDLGITEMVALUE M10 0
GETDLGITEMVALUE M11 1
GETDLGITEMVALUE M12 2
GETDLGITEMVALUE M13 3
GETDLGITEMVALUE M14 4
GETDLGITEMVALUE M16 14
TAKEDLGITEM
mov A9 <$USERNAME>
mov G10 <$STR(M10)>
mov G11 <$STR(M11)>
mov G12 <$STR(M12)>
mov G13 <$STR(M13)>
mov G14 <$STR(M14)>
mov G16 <$STR(M16)>
mov G7 0
DelayCall 1000 @ʱ
MESSAGEBOX ĿʼǰҪɡļ1%ķã\\ļѾ
SENDMSG 0 <$USERNAME>ģ<$STR(A10)>,ļۣ<$STR(G9)>Ԫ!
goto @ʼ
Break

#IF
CHECKDLGITEMNAME <$DLGITEMNAME>
CHECKDLGITEMTYPE RING
#ACT
mov A10 <$DLGITEMNAME>
GAMEGOLD - 1
GETDLGITEMVALUE M10 0
GETDLGITEMVALUE M11 1
GETDLGITEMVALUE M12 2
GETDLGITEMVALUE M13 3
GETDLGITEMVALUE M14 4
GETDLGITEMVALUE M16 14
TAKEDLGITEM
mov A9 <$USERNAME>
mov G10 <$STR(M10)>
mov G11 <$STR(M11)>
mov G12 <$STR(M12)>
mov G13 <$STR(M13)>
mov G14 <$STR(M14)>
mov G16 <$STR(M16)>
mov G7 0
DelayCall 1000 @ʱָ
MESSAGEBOX ĿʼǰҪɡļ1%ķã\\ļѾ
SENDMSG 0 <$USERNAME>ģ<$STR(A10)>,ļۣ<$STR(G9)>Ԫ!
goto @ʼ
Break

#IF
CHECKDLGITEMNAME <$DLGITEMNAME>
#ACT
mov A10 <$DLGITEMNAME>
GAMEGOLD - 1
GETDLGITEMVALUE M10 0
GETDLGITEMVALUE M11 1
GETDLGITEMVALUE M12 2
GETDLGITEMVALUE M13 3
GETDLGITEMVALUE M14 4
GETDLGITEMVALUE M16 14
TAKEDLGITEM
mov A9 <$USERNAME>
mov G10 <$STR(M10)>
mov G11 <$STR(M11)>
mov G12 <$STR(M12)>
mov G13 <$STR(M13)>
mov G14 <$STR(M14)>
mov G16 <$STR(M16)>
mov G7 0
DelayCall 1000 @ʱԶ
MESSAGEBOX ĿʼǰҪɡļ1%ķã\\ļѾ
SENDMSG 0 <$USERNAME>ģ<$STR(A10)>,ļۣ<$STR(G9)>Ԫ!
goto @ʼ
BREAK

#IF
CHECKDLGITEMNAME <$STR(S10)>
#ACT
mov A10 <$STR(S10)>
GAMEGOLD - 1
GETDLGITEMVALUE M10 0
GETDLGITEMVALUE M11 1
GETDLGITEMVALUE M12 2
GETDLGITEMVALUE M13 3
GETDLGITEMVALUE M14 4
GETDLGITEMVALUE M16 14
TAKEDLGITEM
mov A9 <$USERNAME>
mov G10 <$STR(M10)>
mov G11 <$STR(M11)>
mov G12 <$STR(M12)>
mov G13 <$STR(M13)>
mov G14 <$STR(M14)>
mov G16 <$STR(M16)>
mov G7 0
DelayCall 1000 @ʱԶ
MESSAGEBOX ĿʼǰҪɡļ1%ķã\\ļѾ
SENDMSG 0 <$USERNAME>ģ<$STR(A10)>,ļۣ<$STR(G9)>Ԫ!
goto @ʼ
BREAK
#ELSECAT
#ELSESAY
\ \
<$DLGITEMNAME>ʱ޹̶\
ԶҪƷ:\
<Ʒ/@@InPutString10>




[@@InPutString10]
#If
CheckLevelEx > 0
#Act
DelayGoto 1 ~InPutString10
[~InPutString10]
#ACT
QUERYITEMDLG Ҫװ @1ʼ2 0
goto @ʼ
MESSAGEBOX Զװǣ[<$STR(S10)>]·װɿʼ!
BREAK

[@ȡ]
#IF
EQUAL A9 <$USERNAME>
EQUAL G8 0
EQUAL A8 
#ACT
GiveEx <$STR(A10)> 1 0=<$STR(G10)>,1=<$STR(G11)>,2=<$STR(G12)>,3=<$STR(G13)>,5=<$STR(G14)>,14=<$STR(G16)>
MESSAGEBOX ɹȡ<$STR(A10)>
SENDMSG 0 <$USERNAME>ʧܣȡ<$STR(A10)>
mov A10 
mov A9 
mov G10 0
mov G11 0
mov G12 0
mov G13 0
mov G14 0
Mov G9 0
Mov G8 0
mov G16 0
mov G50 0
mov G51 0
mov G52 0
mov G53 0
mov G54 0
mov G55 0
mov G56 0
mov G57 0
mov G58 0
mov G59 0
goto @ʼ
#ELSEACT
MESSAGEBOX ȡʧԭ\1.۲˾\2.㲻\3.Ľʱδ

[@ȡ]
#IF
EQUAL A8 <$USERNAME>
EQUAL G8 0
#ACT
SENDMSG 0 <$USERNAME>ɹĵ<$STR(A10)>,ļۣ<$STR(G9)>ԪѷŵУ
SENDMSG 0 <$USERNAME>ɹĵ<$STR(A10)>,ļۣ<$STR(G9)>ԪѷŵУ
GiveEx <$STR(A10)> 1 0=<$STR(G10)>,1=<$STR(G11)>,2=<$STR(G12)>,3=<$STR(G13)>,5=<$STR(G14)>,14=<$STR(G16)>
MESSAGEBOX ۳ɹȡ<$STR(A10)>
MOV G4 <$STR(G9)>
DIV G9 10
DEC G4 <$STR(G9)>
<$STR(A9)>.GAMEGOLD + <$STR(G4)>
mov A10 
mov A8 
mov A9 
mov G10 0
mov G11 0
mov G12 0
mov G13 0
mov G14 0
Mov G9 0
mov G16 0
mov G50 0
mov G51 0
mov G52 0
mov G53 0
mov G54 0
mov G55 0
mov G56 0
mov G57 0
mov G58 0
mov G59 0
goto @ʼ
#ELSEACT
MESSAGEBOX ʱδû۳ɹôõ<$STR(A10)>

[@]
#ACT
mov A10 
mov A8 
mov A9 
mov G10 0
mov G11 0
mov G12 0
mov G13 0
mov G14 0
Mov G9 0
Mov G8 0
mov G16 0
mov G50 0
mov G51 0
mov G52 0
mov G53 0
mov G54 0
mov G55 0
mov G56 0
mov G57 0
mov G58 0
mov G59 0
MESSAGEBOX ã


[@ʱʯ]
#IF
#ACT
mov G50 1
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>ʯ<$STR(A10)>,ļۣ<$STR(G9)>Ԫ,ʣʱ䣺%t 255 245 <$STR(G8)>
SENDMSG 0 <$STR(A10)>Ʒ:+<$STR(G10)>,ħ+<$STR(M11)>,+<$STR(M12)>,ħ+<$STR(M13)>,+<$STR(M14)>,־=<$STR(M16)> 255 245 <$STR(G8)>
SENDMSG 0 =========================================================== 255 245 10
[@ʱ]
#IF
#ACT
mov G51 1
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME><$STR(A10)>,ļۣ<$STR(G9)>Ԫ,ʣʱ䣺%t 255 245 <$STR(G8)>
SENDMSG 0 <$STR(A10)>Ʒ:+<$STR(G10)>,ħ+<$STR(M11)>,+<$STR(M12)>,ħ+<$STR(M13)>,+<$STR(M14)>,־=<$STR(M16)> 255 245 <$STR(G8)>
SENDMSG 0 =========================================================== 255 245 10
[@ʱѥ]
#IF
#ACT
mov G52 1
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>ѥӣ<$STR(A10)>,ļۣ<$STR(G9)>Ԫ,ʣʱ䣺%t 255 245 <$STR(G8)>
SENDMSG 0 <$STR(A10)>Ʒ:+<$STR(G10)>,ħ+<$STR(M11)>,+<$STR(M12)>,ħ+<$STR(M13)>,+<$STR(M14)>,־=<$STR(M16)> 255 245 <$STR(G8)>
SENDMSG 0 =========================================================== 255 245 10
[@ʱѫ]
#IF
#ACT
mov G53 1
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>ѫ£<$STR(A10)>,ļۣ<$STR(G9)>Ԫ,ʣʱ䣺%t 255 245 <$STR(G8)>
SENDMSG 0 <$STR(A10)>Ʒ:+<$STR(G10)>,ħ+<$STR(M11)>,+<$STR(M12)>,ħ+<$STR(M13)>,+<$STR(M14)>,־=<$STR(M16)> 255 245 <$STR(G8)>
SENDMSG 0 =========================================================== 255 245 10
[@ʱͷ]
#IF
#ACT
mov G54 1
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>ͷ<$STR(A10)>,ļۣ<$STR(G9)>Ԫ,ʣʱ䣺%t 255 245 <$STR(G8)>
SENDMSG 0 <$STR(A10)>Ʒ:+<$STR(G10)>,ħ+<$STR(M11)>,+<$STR(M12)>,ħ+<$STR(M13)>,+<$STR(M14)>,־=<$STR(M16)> 255 245 <$STR(G8)>
SENDMSG 0 =========================================================== 255 245 10
[@ʱԶ]
#IF
#ACT
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>Ʒ<$STR(A10)>,ļۣ<$STR(G9)>Ԫ,ʣʱ䣺%t 255 245 <$STR(G8)>
SENDMSG 0 <$STR(A10)>Ʒ:+<$STR(G10)>,+<$STR(M11)>,+<$STR(M12)>,+<$STR(M13)>,+<$STR(M14)>,+<$STR(M16)> 255 245 <$STR(G8)>
SENDMSG 0 =========================================================== 255 245 10
[@ʱ·]
#IF
#ACT
mov G55 1
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>װ<$STR(A10)>,ļۣ<$STR(G9)>Ԫ,ʣʱ䣺%t 255 245 <$STR(G8)>
SENDMSG 0 <$STR(A10)>Ʒ:+<$STR(G10)>,ħ+<$STR(M11)>,+<$STR(M12)>,ħ+<$STR(M13)>,+<$STR(M14)>,־=<$STR(M16)> 255 245 <$STR(G8)>
SENDMSG 0 =========================================================== 255 245 10
[@ʱ]
#IF
#ACT
mov G56 1
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME><$STR(A10)>,ļۣ<$STR(G9)>Ԫ,ʣʱ䣺%t 255 245 <$STR(G8)>
SENDMSG 0 <$STR(A10)>Ʒ:+<$STR(G10)>,ħ+<$STR(M11)>,+<$STR(M12)>,+<$STR(M13)>,׼ȷ+<$STR(M14)>,־=<$STR(M16)> 255 245 <$STR(G8)>
SENDMSG 0 =========================================================== 255 245 10
[@ʱ]
#IF
#ACT
mov G57 1
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME><$STR(A10)>,ļۣ<$STR(G9)>Ԫ,ʣʱ䣺%t 255 245 <$STR(G8)>
SENDMSG 0 <$STR(A10)>Ʒ:+<$STR(G10)>,ħ+<$STR(M11)>,+<$STR(M12)>,ħ+<$STR(M13)>,+<$STR(M14)>,־=<$STR(M16)> 255 245 <$STR(G8)>
SENDMSG 0 =========================================================== 255 245 10
[@ʱ]
#IF
#ACT
mov G58 1
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME><$STR(A10)>,ļۣ<$STR(G9)>Ԫ,ʣʱ䣺%t 255 245 <$STR(G8)>
SENDMSG 0 <$STR(A10)>Ʒ:+<$STR(G10)>,ħ+<$STR(M11)>,+<$STR(M12)>,ħ+<$STR(M13)>,+<$STR(M14)>,־=<$STR(M16)> 255 245 <$STR(G8)>
SENDMSG 0 =========================================================== 255 245 10
[@ʱָ]
#IF
#ACT
mov G59 1
SENDMSG 0 =========================================================== 255 245 10
SENDMSG 0 <$USERNAME>ָ<$STR(A10)>,ļۣ<$STR(G9)>Ԫ,ʣʱ䣺%t 255 245 <$STR(G8)>
SENDMSG 0 <$STR(A10)>Ʒ:+<$STR(G10)>,ħ+<$STR(M11)>,+<$STR(M12)>,ħ+<$STR(M13)>,+<$STR(M14)>,־=<$STR(M16)> 255 245 <$STR(G8)>
SENDMSG 0 =========================================================== 255 245 10
[@ĳɹ]
#ACT
MESSAGEBOX ĿʼʣʱΪ0ǰҾ۵Ļ\\Ϊĳɹ\\վĳɹҿȡƷ\\ȡƷԪԶ

[@ʧ]
#ACT
MESSAGEBOX ĿʼʣʱΪ0ǰҾ۵Ļ\\ıΪֿգʧ\\ҿϷ
}