(@ArmRemoveStone)
[@MAIN]
#act
OPENMERCHANTBIGDLG 6 475 0 0 0 0 1 350 1 1
#say
<ImgEx:6:513:514:515:315:98/@MAIN>\
<ImgEx:6:510:511:512:315:170/@·> \
<ImgEx:6:507:508:509:315:242/@ָ> \
<ImgEx:6:504:505:506:315:314/@> \
<ImgEx:6:501:502:503:315:386/@> \
<text:<$GOLDCOUNT>:235:494:{AUTOCOLOR=151}>\
<Img:488:6:13:8/@>\
<text:Ƭ:60:38:{AUTOCOLOR=89}>\
<text:80:130:23:{AUTOCOLOR=251}>\
<text::70:-20:{AUTOCOLOR=116}>\


[@]
#if
checkitem Ƭ 80
#act
#ELSEact
MESSAGEBOX Ƭ㣡
break


#if
RANDOM 1000
checkitem Ƭ 80
#act
GETRANDOMLINETEXT ..\QuestDiary\ϵͳ\.txt <$STR(S101)>
give <$STR(S101)> 1
LINKGIVEITEM
#CALL [ʰȡ.TXT] @ʰȡ
UpDateBoxItem -1
clearLinkItem
take Ƭ 80
#ELSEact
#if
checkitem Ƭ 80
#act
GETRANDOMLINETEXT ..\QuestDiary\ϵͳ\.txt <$STR(S101)>
give <$STR(S101)> 1
LINKGIVEITEM
#CALL [ʰȡ.TXT] @ʰȡ
UpDateBoxItem -1
clearLinkItem
take Ƭ 80
break









[@]
#act
OPENMERCHANTBIGDLG 6 476 0 0 0 0 1 350 1 1
#say
<ITEMBOX:1:-1:739:163:158:50:50:10,11,5,6,15:254#Ҫ׵װ>\
<ImgEx:6:513:514:515:315:98/@MAIN>\
<ImgEx:6:510:511:512:315:170/@·> \
<ImgEx:6:507:508:509:315:242/@ָ> \
<ImgEx:6:504:505:506:315:314/@> \
<ImgEx:6:501:502:503:315:386/@> \
<text:<$GOLDCOUNT>:235:480:{AUTOCOLOR=151}>\
<ImgEx:6:480:481:482:-243:270/@Flut1_1_4> \
<ImgEx:6:483:484:485:-253:270/@ArmRemoveStone> \
\ \           
\ \
\ \           
\ \             
\ \        
\ \            
\ \
\ \
\               <һ׷100!10ʯ/FCOLOR=89>
\               <׷200!20ʯ/FCOLOR=89>
\               <׷300!30ʯ/FCOLOR=89>
\               <Ŀ׷400!40ʯ/FCOLOR=89>
\                       <4/FCOLOR=89>
\                       
\                       
\                 [</@Flut1_1_4>]  [<ȡ/@ArmRemoveStone>]



[@Flut1_1_4]
#IF
CheckGold 1000000
CheckFluteCount boxitem1 = 0
checkitem ʯ 10
#ACT
DRILLHOLE boxitem1 1
take  ʯ 10
take   1000000
;װλһ
MESSAGEBOX ϲɹ!

#IF
CheckGold 2000000
CheckFluteCount boxitem1 = 1
checkitem ʯ 20
#ACT
DRILLHOLE boxitem1 2
take  ʯ 20
take   2000000
;װλһ
MESSAGEBOX ϲɹ!

#IF
CheckGold 3000000
CheckFluteCount boxitem1 = 2
checkitem ʯ 30
#ACT
DRILLHOLE boxitem1 3
take  ʯ 30
take   3000000
;װλһ
MESSAGEBOX ϲɹ!

#IF
CheckGold 4000000
CheckFluteCount boxitem1 = 3
checkitem ʯ 40
#ACT
DRILLHOLE boxitem1 4
take  ʯ 40
take   4000000
;װλһ
MESSAGEBOX ϲɹ!
#ELSEact
MESSAGEBOX   1ʯ\2Ƿ\3Ƿﵽ߿
break








[@·]
#act
OPENMERCHANTBIGDLG 6 475 0 0 0 0 1 350 1 1
#say
<ImgEx:6:513:514:515:315:98/@MAIN>\
<ImgEx:6:510:511:512:315:170/@·> \
<ImgEx:6:507:508:509:315:242/@ָ> \
<ImgEx:6:504:505:506:315:314/@> \
<ImgEx:6:501:502:503:315:386/@> \
<text:<$GOLDCOUNT>:235:494:{AUTOCOLOR=151}>\
<Img:488:6:13:8/@·>\
<text:Ƭ:60:38:{AUTOCOLOR=89}>\
<text:50:130:23:{AUTOCOLOR=251}>\
<text:·:70:-20:{AUTOCOLOR=116}>\


[@·]
#if
checkitem Ƭ 50
#act
#ELSEact
MESSAGEBOX Ƭ㣡
break


#if
RANDOM 1000
checkitem Ƭ 50
#act
GETRANDOMLINETEXT ..\QuestDiary\ϵͳ\.txt <$STR(S101)>
give <$STR(S101)> 1
LINKGIVEITEM
#CALL [ʰȡ.TXT] @ʰȡ
UpDateBoxItem -1
clearLinkItem
take Ƭ 50
#ELSEact
#if
checkitem Ƭ 50
#act
GETRANDOMLINETEXT ..\QuestDiary\ϵͳ\.txt <$STR(S101)>
give <$STR(S101)> 1
LINKGIVEITEM
#CALL [ʰȡ.TXT] @ʰȡ
UpDateBoxItem -1
clearLinkItem
take Ƭ 50
break




[@ָ]
#act
OPENMERCHANTBIGDLG 6 475 0 0 0 0 1 350 1 1
#say
<ImgEx:6:513:514:515:315:98/@MAIN>\
<ImgEx:6:510:511:512:315:170/@·> \
<ImgEx:6:507:508:509:315:242/@ָ> \
<ImgEx:6:504:505:506:315:314/@> \
<ImgEx:6:501:502:503:315:386/@> \
<text:<$GOLDCOUNT>:235:494:{AUTOCOLOR=151}>\
<Img:488:6:13:8/@ָ>\
<text:Ƭ:60:38:{AUTOCOLOR=89}>\
<text:100:130:23:{AUTOCOLOR=251}>\
<text::70:-20:{AUTOCOLOR=116}>\

[@ָ]
#if
checkitem Ƭ 100
#act
#ELSEact
MESSAGEBOX Ƭ㣡
break

#if
RANDOM 110
checkitem Ƭ 100
#act
GETRANDOMLINETEXT ..\QuestDiary\ϵͳ\.txt <$STR(S101)>
give <$STR(S101)> 1
LINKGIVEITEM
#CALL [ʰȡ.TXT] @ʰȡ
UpDateBoxItem -1
clearLinkItem
take Ƭ 100
#ELSEact
#if
checkitem Ƭ 100
#act
GETRANDOMLINETEXT ..\QuestDiary\ϵͳ\.txt <$STR(S101)>
give <$STR(S101)> 1
LINKGIVEITEM
#CALL [ʰȡ.TXT] @ʰȡ
UpDateBoxItem -1
clearLinkItem
take Ƭ 100
break





[@]
#act
mov n$ 10000
mov n$ 30000
mov n$½ 50000
mul n$ <$STR(N97)>
div n$ 2
OPENMERCHANTBIGDLG 6 450 0 0 0 0 1 350 1 1
#say

;<ITEMBOX:1:-1:739:163:158:50:50::254#>
<ImgEx:6:513:514:515:315:98/@MAIN>\
<ImgEx:6:510:511:512:315:170/@·> \
<ImgEx:6:507:508:509:315:242/@ָ> \
<ImgEx:6:504:505:506:315:314/@> \
<ImgEx:6:501:502:503:315:386/@> \
<text:<$GOLDCOUNT>:235:494:{AUTOCOLOR=151}>\
<ImgEx:6:492:493:494:123:350/@1> \
<ImgEx:6:495:496:497:123:365/@1> \
<ImgEx:6:498:499:500:123:380/@ʥս1>              
\                      <Text:װ˵|210#˵^145#ǰ鱳^145#ǷҪװ^70#հȫ^70#հȫ^70#»հȫ^151#ÿ1Ҳ1㾭^151#ÿ3Ҳ3㾭^151#ÿ5Ҳ10㾭^244#굥2Ƭ^244#굥8Ƭ^244#µ18Ƭ:1:20{AUTOCOLOR=250,251,252,253,254}/>
\ \                          
\               <    /AUTOCOLOR=244>
\                 < ˼ 챦ʯ ħ/AUTOCOLOR=244>
\                   <   /AUTOCOLOR=244>
\                          
\               <ɫ ʿ  ͷ /AUTOCOLOR=151>
\            <ħ ֮ Ȩ ϱ Ѫ /AUTOCOLOR=151>
\                  <  ̩̹ ޼/AUTOCOLOR=151>
\                           
\           <ʥս ʥս ʥսָ ʥսͷ/AUTOCOLOR=103>
\           <  ָ ͷ/AUTOCOLOR=103>
\           <  ָ ͷ/AUTOCOLOR=103>




[@װ]
#or
CheckItem  1
CheckItem  1
CheckItem ָ֮ 1
CheckItem  1
CheckItem  1
CheckItem  1
CheckItem ˼ 1
CheckItem 챦ʯָ 1
CheckItem ħ 1
CheckItem  1
CheckItem  1
CheckItem ָ 1
CheckItem  1
#act
goto @ֽ
#ELSEact
MESSAGEBOX ȱװ

[@ֽ]
#if
checkgold  <$STR(n$)>
#act
TakeBagItem ||ָ֮|˼|챦ʯָ|||ָ|||ħ|| 41 0 0 0 10000 N97 0
MUL N97 2
give  Ƭ <$STR(N97)>
;mov n$ 10000
take   <$STR(n$)>
#ELSEact
MESSAGEBOX 㣡
break





[@]
#or
CheckItem ɫ 1
CheckItem ʿ 1
CheckItem ָ 1
CheckItem ͷ 1
CheckItem ħ 1
CheckItem ֮ 1
CheckItem ϱ 1
CheckItem  1
CheckItem  1
CheckItem ָ̩̹ 1
CheckItem  1
CheckItem Ѫ 1
CheckItem  1
CheckItem Ȩ 1
CheckItem ޼ 1
#act
goto @ֽ
#ELSEact
MESSAGEBOX ȱװ

[@ֽ]
#IF
checkgold  <$STR(n$)>
#ACT
TakeBagItem ɫ|ʿ|ָ|ħ|֮|ϱ|||ָ̩̹|ͷ||Ѫ||Ȩ|޼ 41 0 0 0 30000 N95 1 
MUL N95 8
give  Ƭ <$STR(N95)>
;mov n$ 30000
mul n$ <$STR(N95)>
div n$ 8
take   <$STR(n$)>
#ELSEact
MESSAGEBOX 㣡
break


[@]
#or
CheckItem ʥս 1
CheckItem ʥս 1
CheckItem ʥսָ 1
CheckItem ʥսͷ 1
CheckItem  1
CheckItem  1
CheckItem ָ 1
CheckItem ͷ 1
CheckItem  1
CheckItem  1
CheckItem ָ 1
CheckItem ͷ 1
CheckItem þ֮ 1
CheckItem  1
CheckItem ƽ 1
#act
goto @ֽ
#ELSEact
MESSAGEBOX ȱٳװ

[@ֽ]
#IF
checkgold  <$STR(n$½)>
#ACT
TakeBagItem ʥս|ʥս|ʥսָ|ʥսͷ|||ָ|ͷ|||ָ|ͷ|þ֮||ƽ 41 0 0 0 100000 N96 1 
MUL N96 20
give  Ƭ <$STR(N96)>
;mov n$½ 50000
mul n$½ <$STR(N96)>
div n$½ 20
take   <$STR(n$½)>
#ELSEact
MESSAGEBOX 㣡
break


[@1]
#IF
checkgold  10000
checkitem  1
#ACT
take  1
CHANGEEXP + 20000
take  10000 
give Ƭ 2


#IF
checkitem  1
checkgold  10000
#ACT
take  1
CHANGEEXP + 20000
take  10000 
give Ƭ 2


#IF
checkgold  10000
checkitem ָ֮ 1
#ACT
take ָ֮ 1
CHANGEEXP + 20000
take  10000 
give Ƭ 2


#IF
checkgold  10000
checkitem  1
#ACT
take  1
CHANGEEXP + 20000
take  10000 
give Ƭ 2


#IF
checkgold  10000
checkitem ˼ 1
#ACT
take ˼ 1
CHANGEEXP + 20000
take  10000 
give Ƭ 2


#IF
checkgold  10000
checkitem 챦ʯָ 1
#ACT
take 챦ʯָ 1
CHANGEEXP + 20000
take  10000 
give Ƭ 2


#IF
checkgold  10000
checkitem  1
#ACT
take  1
CHANGEEXP + 20000
take  10000 
give Ƭ 2


#IF
checkgold  10000
checkitem  1
#ACT
take  1
CHANGEEXP + 20000
take  10000 
give Ƭ 2


#IF
checkgold  10000
checkitem ָ 1
#ACT
take ָ 1
CHANGEEXP + 20000
take  10000 
give Ƭ 2


#IF
checkgold  10000
checkitem  1
#ACT
take  1
CHANGEEXP + 20000
take  10000 
give Ƭ 2


#IF
checkgold  10000
checkitem ħ 1
#ACT
take ħ 1
CHANGEEXP + 20000
take  10000 
give Ƭ 2

#IF
checkgold  10000
checkitem  1
#ACT
take  1
CHANGEEXP + 20000
take  20000  
give Ƭ 2


#IF
checkgold  10000
checkitem  1
#ACT
take  1
CHANGEEXP + 20000
take  10000 
give Ƭ 2
break

;---------------------------------------------------------------------------------

[@1]
#IF
checkitem  1
checkgold  30000
#ACT
take  1
CHANGEEXP + 50000
take  30000  
give Ƭ 8

#IF
checkitem ޼ 1
checkgold  30000
#ACT
take ޼ 1
CHANGEEXP + 50000
take  30000  
give Ƭ 8




#IF
checkgold  30000
checkitem ɫ 1
#ACT
take ɫ 1
CHANGEEXP + 50000
take  30000  
give Ƭ 8


#IF
checkgold  30000
checkitem ʿ 1
#ACT
take ʿ 1
CHANGEEXP + 50000
take  30000  
give Ƭ 8


#IF
checkgold  30000
checkitem ָ 1
#ACT
take ָ 1
CHANGEEXP + 50000
take  30000  
give Ƭ 8


#IF
checkgold  30000
checkitem ħ 1
#ACT
take ħ 1
CHANGEEXP + 50000
take  30000  
give Ƭ 8


#IF
checkgold  30000
checkitem ֮ 1
#ACT
take ֮ 1
CHANGEEXP + 50000
take  30000  
give Ƭ 8


#IF
checkgold  30000
checkitem ϱ 1
#ACT
take ϱ 1
CHANGEEXP + 50000
take  30000  
give Ƭ 8


#IF
checkgold  30000
checkitem  1
#ACT
take  1
CHANGEEXP + 50000
take  30000  
give Ƭ 8


#IF
checkgold  30000
checkitem  1
#ACT
take  1
CHANGEEXP + 50000
take  30000  
give Ƭ 8


#IF
checkgold  30000
checkitem ָ̩̹ 1
#ACT
take ָ̩̹ 1
CHANGEEXP + 50000
take  30000  
give Ƭ 8


#IF
checkgold  30000
checkitem ͷ 1
#ACT
take ͷ 1
CHANGEEXP + 50000
take  30000  
give Ƭ 8



#IF
checkgold  30000
checkitem Ѫ 1
#ACT
take Ѫ 1
CHANGEEXP + 50000
take  30000  
give Ƭ 8




#IF
checkgold  30000
checkitem Ȩ 1
#ACT
take Ȩ 1
CHANGEEXP + 50000
take  30000  
give Ƭ 8


#IF
checkgold  30000
checkitem ƽ 1
#ACT
take ƽ 1
CHANGEEXP + 50000
take  30000  
give Ƭ 8

break

;----------------------------------------------------------------------------
[@ʥս1]
#IF
checkgold  50000
checkitem ʥս 1
#ACT
take ʥս 1
CHANGEEXP + 100000
take  50000  
give Ƭ 18


#IF
checkgold  50000
checkitem ʥս 1
#ACT
take ʥս 1
CHANGEEXP + 100000
take  50000  
give Ƭ 18


#IF
checkgold  50000
checkitem ʥսָ 1
#ACT
take ʥսָ 1
CHANGEEXP + 100000
take  50000  
give Ƭ 18

#IF
checkgold  50000
checkitem  1
#ACT
take  1
CHANGEEXP + 100000
take  50000  
give Ƭ 18


#IF
checkgold  50000
checkitem  1
#ACT
take  1
CHANGEEXP + 100000
take  50000  
give Ƭ 18

#IF
checkgold  50000
checkitem ָ 1
#ACT
take ָ 1
CHANGEEXP + 100000
take  50000  
give Ƭ 18


#IF
checkgold  50000
checkitem  1
#ACT
take  1
CHANGEEXP + 100000
take  50000  
give Ƭ 18


#IF
checkgold  50000
checkitem  1
#ACT
take  1
CHANGEEXP + 100000
take  50000  
give Ƭ 18

#IF
checkgold  50000
checkitem ָ 1
#ACT
take ָ 1
CHANGEEXP + 100000
take  50000  
give Ƭ 18



#IF
checkgold  50000
checkitem ʥսͷ 1
#ACT
take ʥսͷ 1
CHANGEEXP + 100000
take  50000  
give Ƭ 18


#IF
checkgold  50000
checkitem ͷ 1
#ACT
take ͷ 1
CHANGEEXP + 100000
take  50000  
give Ƭ 18


#IF
checkgold  50000
checkitem ͷ 1
#ACT
take ͷ 1
CHANGEEXP + 100000
take  50000  
give Ƭ 18
break


