[@Ʒ]
{
#IF
  equal G66 1
#ACT
  GOTO @KAIGOUKA
  BREAK
#ELSEACT
  GOTO @MEIKAGOU
  BREAK

[@KAIGOUKA]
#IF
#ACT
//1 ʾͨҪ
  OPENYBDEAL 0
  MOV S1 A499
  MOV S2 A499
  MOV N1 0
  MOV N2 0
  SET [009] 0
#SAY
ãʲôЧ͵ģ\
ҿΪṩ<$GAMEGOLDNAME>ĸ \
<ĵʮʹ>\

<ѯЭ/@rule1>                  <Ʒ/@dealybme>\
<ѯڳ۵Ʒ/@askybsell>            <Ʒ/@askybdeal>\
<ѯϢ/@askybdeallog>                  <ֵ߳/@ZAIXCZHI>\
<ѯ/@askybnum>              \ \
<رնԻ/@exit>

[@MEIKAGOU]
#IF
#ACT
//1 ʾͨҪ
  OPENYBDEAL 0
  MOV S1 A499
  MOV S2 A499
  MOV N1 0
  MOV N2 0
  SET [009] 0
#SAY
ãʲôЧ͵ģ\
ҿΪṩ<$GAMEGOLDNAME>ĸ \
<ĵʮʹ>\

<ѯЭ/@rule1>                  <Ʒ/@dealybme>\
<ѯڳ۵Ʒ/@askybsell>            <Ʒ/@askybdeal>\
<ѯϢ/@askybdeallog>                  <ֵ߳/@ZAIXCZHI>\
<ѯ/@askybnum>\ \
<رնԻ/@exit>

[@YUEKAFUW]
ѡҪĿ\ \
<ܿ/AUTOCOLOR=251><$STR(G69)> ң7ʱ䡣\
<¿/AUTOCOLOR=251><$STR(G70)> ң30ʱ䡣\
</AUTOCOLOR=251><$STR(G71)> ң90ʱ䡣\
<꿨/AUTOCOLOR=251><$STR(G72)> ң360ʱ䡣\ \


<ܿ/@ZHOUKA>  <¿/@YUEKA>  <򼾿/@JIKA>  <꿨/@NIANKA>      </@Ʒ>


[@NIANKA]
#IF
  checkgold G72
#ACT
  TAKE  G72
  give 꿨 1
  MESSAGEBOX ɹ\
  BREAK
#ELSEACT
  MESSAGEBOX ûôң\ 
  break

[@JIKA]
#IF
  checkgold G71
#ACT
  TAKE  G71
  give  1
  MESSAGEBOX ɹ\
  BREAK
#ELSEACT
  MESSAGEBOX ûôң\ 
  break

[@YUEKA]
#IF
  checkgold G70
#ACT
  TAKE  G70
  give ¿ 1
  MESSAGEBOX ɹ\
  BREAK
#ELSEACT
  MESSAGEBOX ûôң\ 
  break

[@ZHOUKA]
#IF
  checkgold G69
#ACT
  TAKE  G69
  give ܿ 1
  MESSAGEBOX ɹ\
  BREAK
#ELSEACT
  MESSAGEBOX ûôң\ 
  break

[@ZAIXCZHI]
ӭʹֵ߳ϵͳ\
ͨ<Ա><>йֵš\
ֵĳֵŻʱοɻóֵ͡\
ϵͷQQ<$QQ> \ \ 

<Ŀţ/@@InPutString1> <$STR(S1)>\
<Ŀܣ/@@InPutString2> <$STR(S2)>\ \ 
<ȷпʶ/@QUEDWUCZ>      </@Ʒ>\

[@QUEDWUCZ]
#IF
  CHECKCODELIST <$STR(S1)> <$STR(S2)> ..\QuestDiary\ֵϵͳ\10Ԫ.txt
#ACT
  MUL N1 10 G68
  MOV N2 10
  SET [009] 1
  GOTO @ʶ
  break
#IF
  CHECKCODELIST <$STR(S1)> <$STR(S2)> ..\QuestDiary\ֵϵͳ\50Ԫ.txt
#ACT
  MUL N1 50 G68
  MOV N2 50
  SET [009] 1
  GOTO @ʶ
  break
#IF
  CHECKCODELIST <$STR(S1)> <$STR(S2)> ..\QuestDiary\ֵϵͳ\100Ԫ.txt
#ACT
  MUL N1 100 G68
  MOV N2 100
  SET [009] 1
  GOTO @ʶ
  break
#IF
  CHECKCODELIST <$STR(S1)> <$STR(S2)> ..\QuestDiary\ֵϵͳ\300Ԫ.txt
#ACT
  MUL N1 300 G68
  MOV N2 300
  SET [009] 1
  GOTO @ʶ
  break
#IF
  CHECKCODELIST <$STR(S1)> <$STR(S2)> ..\QuestDiary\ֵϵͳ\500Ԫ.txt
#ACT
  MUL N1 500 G68
  MOV N2 500
  SET [009] 1
  GOTO @ʶ
  break
#ELSEACT
  MESSAGEBOX ޷ʶĿţ
  break

[@ʶ]
#IF
  equal G127 0
#ACT
  DELAYGOTO 100 @JBLEIXCZ
  break
#ELSEACT
  DELAYGOTO 100 @YBLEIXCZ
  break

[@YBLEIXCZ]
#ACT
  CLEARDELAYGOTO
#SAY
Ϊ <$STR(S1)>\
Ϊ <$STR(S2)>\ \

˿Ϊ<$STR(N2)>Ԫֵ\ 
˴γֵԻã<$STR(N1)> ң\ \

<ȷ޴/@KAISCZHI>

#ELSESAY
ĿŻ벻ԣ\
ȷǷ󣬵㷵룡 \ \

</@ZAIXCZHI>

[@JBLEIXCZ]
#ACT
  CLEARDELAYGOTO
#SAY
Ϊ <$STR(S1)>\
Ϊ <$STR(S2)>\ \

˿Ϊ<$STR(N2)>Ԫֵ\ 
˴γֵԻã<$STR(N1)> ң\ \

<ȷ޴/@KAISCZHI>

#ELSESAY
ĿŻ벻ԣ\
ȷǷ󣬵㷵룡 \ \

</@ZAIXCZHI>

[@KAISCZHI]
#IF
  equal G127 0
#ACT
  DELAYGOTO 100 @HUODECZJB
  break
#ELSEACT
  DELAYGOTO 100 @HUODECZYB
  break

[@HUODECZJB]
#IF
  equal G128 1
  check [009] 1
#ACT
  SET [009] 0
  GIVE  N1
  CLEARCODELIST <$STR(S1)> <$STR(S2)> ..\QuestDiary\ֵϵͳ\10Ԫ.txt
  CLEARCODELIST <$STR(S1)> <$STR(S2)> ..\QuestDiary\ֵϵͳ\50Ԫ.txt
  CLEARCODELIST <$STR(S1)> <$STR(S2)> ..\QuestDiary\ֵϵͳ\100Ԫ.txt
  CLEARCODELIST <$STR(S1)> <$STR(S2)> ..\QuestDiary\ֵϵͳ\300Ԫ.txt
  CLEARCODELIST <$STR(S1)> <$STR(S2)> ..\QuestDiary\ֵϵͳ\500Ԫ.txt
  CLEARDELAYGOTO
  CALCVAR HUMAN ֵ + <$STR(N1)>
  SAVEVAR HUMAN ֵ ..\QuestDiary\ļ\ֵ.txt
  GOTO @CGCZHIJL
  break
#IF
  equal G128 0
  check [009] 1
#ACT
  SET [009] 0
  GIVE  N1
  CLEARCODELIST <$STR(S1)> <$STR(S2)> ..\QuestDiary\ֵϵͳ\10Ԫ.txt
  CLEARCODELIST <$STR(S1)> <$STR(S2)> ..\QuestDiary\ֵϵͳ\50Ԫ.txt
  CLEARCODELIST <$STR(S1)> <$STR(S2)> ..\QuestDiary\ֵϵͳ\100Ԫ.txt
  CLEARCODELIST <$STR(S1)> <$STR(S2)> ..\QuestDiary\ֵϵͳ\300Ԫ.txt
  CLEARCODELIST <$STR(S1)> <$STR(S2)> ..\QuestDiary\ֵϵͳ\500Ԫ.txt
  CLEARDELAYGOTO
  GOTO @CGCZHIJL
  break
#ELSEACT
  GOTO @JCZUOBCZ
  break
[@CGCZHIJL]
#IF
#SAY
˴γֵɹԽ <$STR(N1)> תĸ˰У\ 
գϵͷQQ<$QQ>\ \

</@ZAIXCZHI>

[@JCZUOBCZ]
㵱ǰΪѾϵͳ¼\
¼Σ㽫ñ룡\ \

</@Ʒ>

[@HUODECZYB]
#IF
  equal G128 1
  check [009] 1
#ACT
  SET [009] 0
  GAMEGOLD + N1
  CLEARCODELIST <$STR(S1)> <$STR(S2)> ..\QuestDiary\ֵϵͳ\10Ԫ.txt
  CLEARCODELIST <$STR(S1)> <$STR(S2)> ..\QuestDiary\ֵϵͳ\50Ԫ.txt
  CLEARCODELIST <$STR(S1)> <$STR(S2)> ..\QuestDiary\ֵϵͳ\100Ԫ.txt
  CLEARCODELIST <$STR(S1)> <$STR(S2)> ..\QuestDiary\ֵϵͳ\300Ԫ.txt
  CLEARCODELIST <$STR(S1)> <$STR(S2)> ..\QuestDiary\ֵϵͳ\500Ԫ.txt
  CLEARDELAYGOTO
  CALCVAR HUMAN ֵ + <$STR(N1)>
  SAVEVAR HUMAN ֵ ..\QuestDiary\ļ\ֵ.txt
  GOTO @CGCZHIJL
  break
#IF
  equal G128 0
  check [009] 1
#ACT
  SET [009] 0
  GAMEGOLD + N1
  CLEARCODELIST <$STR(S1)> <$STR(S2)> ..\QuestDiary\ֵϵͳ\10Ԫ.txt
  CLEARCODELIST <$STR(S1)> <$STR(S2)> ..\QuestDiary\ֵϵͳ\50Ԫ.txt
  CLEARCODELIST <$STR(S1)> <$STR(S2)> ..\QuestDiary\ֵϵͳ\100Ԫ.txt
  CLEARCODELIST <$STR(S1)> <$STR(S2)> ..\QuestDiary\ֵϵͳ\300Ԫ.txt
  CLEARCODELIST <$STR(S1)> <$STR(S2)> ..\QuestDiary\ֵϵͳ\500Ԫ.txt
  CLEARDELAYGOTO
  GOTO @CGCZHIJLYB
  break
#ELSEACT
  GOTO @JCZUOBCZ
  break
[@CGCZHIJLYB]
#SAY
˴γֵɹԽ <$STR(N1)> תĸУ\ 
뿴ԲգϵͷQQ<$QQ>\ \

</@ZAIXCZHI>

[@InPutString2]
#ACT
  MOV S2 S2
  GOTO @ZAIXCZHI
  break

[@InPutString1]
#ACT
  MOV S1 S1
  GOTO @ZAIXCZHI
  break

[@askybsell]
#ACT
QUERYYBSELL

[@askybdeal]
#ACT
QUERYYBDEAL

[@askybdeallog]
<$QUERYYBDEALLOG>

[@askybnum]
<$GAMEGOLDNAME>Ϊ<$GAMEGOLD>\ \ \

</@Ʒ>

[@rule]
˶֪귨½\
Ҫͨ<$GAMEGOLDNAME>۵ߣ֧1<$GAMEGOLDNAME>\
ҽΪṩáķ\ \
<Ķͬ⽻Э/@openybsell>\
<ͬ/@exit>

[@rule1]
ȷϸĶˡ<$GAMEGOLDNAME>Э顷Эڵ\
1һʹ<$GAMEGOLDNAME>ף뿪ͨ<$GAMEGOLDNAME>׹ܲNPC֧1<$GAMEGOLDNAME>\
2ֵ<$GAMEGOLDNAME>ʺŽеģ\
ʺͬĽɫʹЩ<$GAMEGOLDNAME>\
3ƷNPC۳3죬׽ֹ\
ͬʱȡƷʱ֧1<$GAMEGOLDNAME>\
4򷽽ɫͽʱעȷĽɫ\
Լʧɵʧϵͳв\
<һҳ/@rule2>

[@rule2]
5һʽδɵ£˫ٴν<$GAMEGOLDNAME>\
6ʺڵЯ:2000000000\
<$GAMEGOLDNAME>ν׶߲99999999\
7׳ɹԶӦ<$GAMEGOLDNAME>\
8ҿѯһε<$GAMEGOLDNAME>׼¼\
ȡ׻ܽƷʱ,㹻ռ䣬Ʒȡ\
</@Ʒ>

[@AskYBSellFail]
ûвѯָļ¼\
</@Ʒ>
[@AskYBDealFail]
ûвѯָļ¼\
</@Ʒ> 
}