[@ͨ]
{
#act
CloseBigDialogBox
Close
OPENMERCHANTBIGDLG 6 244 1  0  1 1 1 330 34  1
#say
\<ItemShow::0:13:120:0/@Ʒ1>
\<text:<$STR(S$ʱItemList1)>:55:100:{AUTOCOLOR=116}>













[@@InPutInteger50]
#If
CHECKGAMEDIAMOND > <$STR(n55)>
#Act
DelayGoto 100 @InPutInteger50
break

[@InPutInteger50]
#IF
large n55 0
small n55 10001
#ACT
GOTO @Ҷһ1
#ELSEACT
MESSAGEBOX ÿʳֵ10000Ԫͳֵ1Ԫ
break

[@Ҷһ]
#IF
CHECKGAMEDIAMOND > <$STR(n55)>
#ACT 
MOV n$Ҷһ <$STR(n55)>
GAMEDIAMOND - <$STR(n$Ҷһ)>
MUL n$Ҷһ 100
GAMEGOLD + <$STR(n$Ҷһ)>
SENDMSG 0 <$USERNAME>ֵڱ<$STR(n$Ҷһ)>
Goto @Main
MESSAGEBOX ֵɹ
#ELSEACT
MESSAGEBOX ĳֵ㣡
break







}