[@main]
#say
<Img:25:9:0:8>\
<װ:/SCOLOR=154><𾴵ң㵱ǰֵΪ:/AUTOCOLOR=254,251,168,191,250,70,245,249,253><$GAMEGOLDEX>\
      <Ա:/SCOLOR=70><𾴵!/SCOLOR=251><лһ·/SCOLOR=242>\
</SCOLOR=83>\
<IMG:157:9:-9:-12|250#ϵСɻ1Ԫ+1ֵ^^ɫ^ħ^^ʿ^֮^^ָ^ϱ^ָ̩̹^ͷ^^սʿ^սʿѥ^սʿʯ^ʦ^ʦѥ^ʦʯ^ʿ^ʿѥ^ʿʯ/@Ԫ><IMG:158:9:-17:-12|250#ϵСɻ2+1ֵ^^ɫ^ħ^^ʿ^֮^^ָ^ϱ^ָ̩̹^ͷ^^սʿ^սʿѥ^սʿʯ^ʦ^ʦѥ^ʦʯ^ʿ^ʿѥ^ʿʯ/@><IMG:159:9:-25:-12|250#ϵСɻ5Ԫ+2ֵ^^þ֮^Ȩ^ƽ/@Ԫ><IMG:160:9:-33:-12|250#ϵСɻ3+2ֵ^^þ֮^Ȩ^ƽ/@>\\
<IMG:161:9:-9:-12|250#ϵСɻ20Ԫ+4ֵ^^ʥսͷ^ʥս^ʥս^ʥսָ^ͷ^^^ָ^ͷ^^^ָ^ʥս^ʥսսѥ^ʥսʯ^^ħѥ^ʯ^^ѥ^ʯ/@Ԫ><IMG:162:9:-17:-12|250#ϵСɻ4+4ֵ^^ʥսͷ^ʥս^ʥս^ʥսָ^ͷ^^^ָ^ͷ^^^ָ^ʥս^ʥսսѥ^ʥսʯ^^ħѥ^ʯ^^ѥ^ʯ/@><IMG:163:9:-25:-12|250#װ·ϵСɻ40Ԫ+10ֵ^^ħ^ʥս^^^^ʦ/@װԪ><IMG:164:9:-33:-12|250#װ·ϵСɻ10+10ֵ^^ħ^ʥս^^^^ʦ/@װ>\
</SCOLOR=83>\
<IMG:165:9:-5:-10|250#Ҫ/@@InPutInteger8(Ҫʯ)><IMG:166:9:-5:-10|250#Ҫȡ/@@InPutInteger9(Ҫȡֵ)>                  <IMG:167:9:-26:-10|251#ÿɶһ5W^251#53ȡ롣/@@InPutInteger66(Ҫʹõľ)>\

[@Ԫ]
#IF
#ACT
MOV N1 0
MOV N2 0
MOV N3 0
MOV N4 0

#IF
#ACT
TakeBagItem ɫ|ħ||ʿ|֮||ָ|ϱ|ָ̩̹|ͷ||սʿ|սʿѥ|սʿʯ|ʦ|ʦѥ|ʦʯ|ʿ|ʿѥ|ʿʯ 46 0 0 0 0 N1 0

#IF
large N1 > 0
#ACT
MUL N2 N1 1
MUL N3 N1 1
MUL N4 N1 1
GAMEGOLD + <$STR(N3)>
GAMEGOLDEX + <$STR(N4)>
SENDMSG 0 ʾ<$USERNAME>ɹ<$STR(N1)>װ,<$STR(N3)>Ԫ+<$STR(N4)>ֵ.
break
#ELSEACT
SENDMSG 7 ʾ㱳ûװ.
break

[@]
#IF
#ACT
MOV N1 0
MOV N2 0
MOV N3 0
MOV N4 0

#IF
#ACT
TakeBagItem ɫ|ħ||ʿ|֮||ָ|ϱ|ָ̩̹|ͷ||սʿ|սʿѥ|սʿʯ|ʦ|ʦѥ|ʦʯ|ʿ|ʿѥ|ʿʯ 46 0 0 0 0 N1 0

#IF
large N1 > 0
#ACT
MUL N2 N1 1
MUL N3 N1 2
MUL N4 N1 1
GIVE  <$STR(N3)>
GAMEGOLDEX + <$STR(N4)>
SENDMSG 0 ʾ<$USERNAME>ɹ<$STR(N1)>װ,<$STR(N3)>+<$STR(N4)>ֵ.
break
#ELSEACT
SENDMSG 7 ʾ㱳ûװ.
break

[@Ԫ]
#IF
#ACT
MOV N1 0
MOV N2 0
MOV N3 0
MOV N4 0

#IF
#ACT
TakeBagItem þ֮|Ȩ|ƽ 46 0 0 0 0 N1 0

#IF
large N1 > 0
#ACT
MUL N2 N1 1
MUL N3 N1 5
MUL N4 N1 2
GAMEGOLD + <$STR(N3)>
GAMEGOLDEX + <$STR(N4)>
SENDMSG 0 ʾ<$USERNAME>ɹ<$STR(N1)>,<$STR(N3)>Ԫ+<$STR(N4)>ֵ.
break
#ELSEACT
SENDMSG 7 ʾ㱳û.
break

[@]
#IF
#ACT
MOV N1 0
MOV N2 0
MOV N3 0
MOV N4 0

#IF
#ACT
TakeBagItem þ֮|Ȩ|ƽ 46 0 0 0 0 N1 0

#IF
large N1 > 0
#ACT
MUL N2 N1 1
MUL N3 N1 3
MUL N4 N1 2
GIVE  <$STR(N3)>
GAMEGOLDEX + <$STR(N4)>
SENDMSG 0 ʾ<$USERNAME>ɹ<$STR(N1)>,<$STR(N3)>+<$STR(N4)>ֵ.
break
#ELSEACT
SENDMSG 7 ʾ㱳û.
break

[@Ԫ]
#IF
#ACT
MOV N1 0
MOV N2 0
MOV N3 0
MOV N4 0

#IF
#ACT
TakeBagItem ʥսͷ|ʥս|ʥս|ʥսָ|ͷ|||ָ|ͷ|||ָ|ʥս|ʥսսѥ|ʥսʯ||ħѥ|ʯ||ѥ|ʯ 46 0 0 0 0 N1 0

#IF
large N1 > 0
#ACT
MUL N2 N1 1
MUL N3 N1 20
MUL N4 N1 4
GAMEGOLD + <$STR(N3)>
GAMEGOLDEX + <$STR(N4)>
SENDMSG 0 ʾ<$USERNAME>ɹ<$STR(N1)>װ,<$STR(N3)>Ԫ+<$STR(N4)>ֵ.
break
#ELSEACT
SENDMSG 7 ʾ㱳ûгװ.
break

[@]
#IF
#ACT
MOV N1 0
MOV N2 0
MOV N3 0
MOV N4 0

#IF
#ACT
TakeBagItem ʥսͷ|ʥս|ʥս|ʥսָ|ͷ|||ָ|ͷ|||ָ|ʥս|ʥսսѥ|ʥսʯ||ħѥ|ʯ||ѥ|ʯ 46 0 0 0 0 N1 0

#IF
large N1 > 0
#ACT
MUL N2 N1 1
MUL N3 N1 4
MUL N4 N1 4
GIVE  <$STR(N3)>
GAMEGOLDEX + <$STR(N4)>
SENDMSG 0 ʾ<$USERNAME>ɹ<$STR(N1)>װ,<$STR(N3)>+<$STR(N4)>ֵ.
break
#ELSEACT
SENDMSG 7 ʾ㱳ûгװ.
break

[@װԪ]
#IF
#ACT
MOV N1 0
MOV N2 0
MOV N3 0
MOV N4 0

#IF
#ACT
TakeBagItem ħ|ʥս||||ʦ 46 0 0 0 0 N1 0

#IF
large N1 > 0
#ACT
MUL N2 N1 1
MUL N3 N1 40
MUL N4 N1 10
GAMEGOLD + <$STR(N3)>
GAMEGOLDEX + <$STR(N4)>
SENDMSG 0 ʾ<$USERNAME>ɹ<$STR(N1)>װ·,<$STR(N3)>Ԫ+<$STR(N4)>ֵ.
break
#ELSEACT
SENDMSG 7 ʾ㱳ûװ·.
break

[@װ]
#IF
#ACT
MOV N1 0
MOV N2 0
MOV N3 0
MOV N4 0

#IF
#ACT
TakeBagItem ħ|ʥս||||ʦ 46 0 0 0 0 N1 0

#IF
large N1 > 0
#ACT
MUL N2 N1 1
MUL N3 N1 10
MUL N4 N1 10
GIVE  <$STR(N3)>
GAMEGOLDEX + <$STR(N4)>
SENDMSG 0 ʾ<$USERNAME>ɹ<$STR(N1)>װ·,<$STR(N3)>+<$STR(N4)>ֵ.
break
#ELSEACT
SENDMSG 7 ʾ㱳ûװ·.
break

[@InPutInteger8]
#IF
SMALL N8 1
#ACT
MESSAGEBOX ʾ뷶Χ1-999
BREAK

#IF
LARGE N8 999
#ACT
MESSAGEBOX ʾ뷶Χ1-999
BREAK

#IF
checkitem ʯ <$STR(N8)>
#ACT
TAKE ʯ <$STR(N8)>
GAMEGOLDEX + <$STR(N8)>
GOTO @MAIN
#ELSEACT
MESSAGEBOX ʾ㵱ǰʯ<$STR(N8)>,޷.
break

[@InPutInteger9]
#IF
SMALL N9 1
#ACT
MESSAGEBOX ʾ뷶Χ1-999
BREAK

#IF
LARGE N9 999
#ACT
MESSAGEBOX ʾ뷶Χ1-999
BREAK

#IF
CHECKGAMEGOLDEX ? <$STR(N9)>
#ACT
GAMEGOLDEX - <$STR(N9)>
GIVE ʯ <$STR(N9)>
GOTO @MAIN
#ELSEACT
MESSAGEBOX ʾ㵱ǰ<$STR(N9)>,޷ȡ.
break

[@InPutInteger66]
#IF
SMALL N66 1
#ACT
MESSAGEBOX ʾ뷶Χ1-999
BREAK

#IF
LARGE N66 999
#ACT
MESSAGEBOX ʾ뷶Χ1-999
BREAK

#IF
CHECKLEVELEX > 52
checkitem  <$STR(N66)>
#ACT
TAKE  <$STR(N66)>
MUL N67 N66 25000
CHANGEEXP + <$STR(N67)>
GOTO @MAIN
break

#IF
CHECKLEVELEX < 53
checkitem  <$STR(N66)>
#ACT
TAKE  <$STR(N66)>
MUL N67 N66 50000
CHANGEEXP + <$STR(N67)>
GOTO @MAIN
break

#ELSEACT
MESSAGEBOX ʾ㵱ǰ<$STR(N66)>,޷ʹ.
break
