(@@InPutInteger @@InPutString )
[@main]
#IF
ISADMIN
#say
𾴵ĹԱ<$USERNAME>  <ĳǹ/@ĳǹ>\
<нĻҪ۵5%Ӷ><ӵԪ><$GAMEGOLD>\
水ָʾѡҪעѡ\
2</@>   <˫/@˫>\
3</@>   </@>   <С/@С>\
6<һ/@һ> </@> </@> <ĵ/@ĵ> </@> </@>\ \
뿪ʱ仹ʣ<$STR(G77)>룬ץʱע\
<Ϥ/@Ϥ>     <鿴ע/@鿴ע>             </@ص>  <رմ/@exit>

#ELSESAY
װң<$USERNAME>\
<нĻҪ۵5%Ӷ𡣡><ӵԪ><$GAMEGOLD>\
ʾѡҪעѡ\
2</@>   <˫/@˫>\
3</@>   </@>   <С/@С>\
6<һ/@һ> </@> </@> <ĵ/@ĵ> </@> </@>\ \
뿪ʱ仹ʣ<$STR(G77)>룬ץʱע\
<Ϥ/@Ϥ>     <鿴ע/@鿴ע>             </@ص>  <رմ/@exit>

[@ĳǹ]
#IF
  ISADMIN
#say
һУ<$STR(G75)>˴β˶ĲԽ<$STR(G74)>Ԫ<$STR(G73)>Ԫ\ \


<뿪ĵ/@@InPutInteger71>   <նĳ/@նĳ>       <رնĳ/@ĳ> \ 
<ӮԪϳ/@@InPutInteger70><$STR(G70)> <жͶ/@@InPutInteger77><$STR(G77)>\<ĳ鿴/@> \ \ \ \ 
                                                   </@main>
#elseact
messagebox Բ!!!㲻ǹԱ!!!!!!!

[@նĳ]
#IF
  ISADMIN
#act
MOV G73 0
MOV G74 0
MOV G75 0
MOV G78 0
MOV G79 0
MOV G80 0
MOV G81 0
MOV G82 0
MOV G83 0
MOV G84 0
MOV G85 0
MOV G86 0
MOV G87 0
MOV G88 0
MOV G89 0
MOV G90 0
MOV G91 0
MOV G92 0
MOV G93 0
MOV G94 0
MOV G95 0
MOV G96 0
MOV G97 0
MOV G98 0
MOV G99 0
messagebox նĳݳɹ

[@ĳ]
#if
equal G76 1
#ACT
#SAY
ĳ״Ϊ\ \
<رնĳ/@guanducn>      </@ĳǹ>
#ELSESAY
ĳ״Ϊر\ \
<ĳ/@kaiducn>      </@ĳǹ>
[@guanducn]
#if
ISADMIN
#ACT
mov G76 0
#ACT
SENDMSG 0 ĳѹرգλҵȴ´λʱ䣡
SENDMSG 0 ĳѹرգλҵȴ´λʱ䣡
SENDMSG 0 ĳѹرգλҵȴ´λʱ䣡
SENDMSG 0 ĳѹرգλҵȴ´λʱ䣡
SENDMSG 0 ĳѹرգλҵȴ´λʱ䣡
#ELSEACT
MESSAGEBOX ֻйԱʹô˹ܣ
[@kaiducn]
#if
ISADMIN
#ACT
mov G76 1
#ACT
mov G77 60
SENDMSG 0  ˹ά˹ĳǿ
SENDMSG 0  ˹ά˹ĳǿ
SENDMSG 0  ˹ά˹ĳǿ
SENDMSG 0  ˹ά˹ĳǿ
SENDMSG 0  ˹ά˹ĳǿ
SENDMSG 0  ˹ά˹ĳǿ
#ELSEACT
MESSAGEBOX ֻйԱʹô˹ܣ

[@InPutInteger71]
#IF
ISADMIN
#Act
DelayGoto 1 ~InPutInteger71
#ELSEsay
ٺ٣ƭ
[~InPutInteger71]
#IF
ISADMIN
LARGE N71 0
SMALL N71 7
#Act
mov G71 <$STR(N71)>
#say
óɹ!        </@ĳǹ>
#ELSEact
messagebox 1-6֮ףʧܣ
goto @main
break

[@InPutInteger70]
#IF
ISADMIN
#Act
DelayGoto 1 ~InPutInteger70
#ELSEsay
ٺ٣ƭ
[~InPutInteger70]
#IF
ISADMIN
LARGE N70 0
SMALL N70 10000000
#Act
mov G70 <$STR(N70)>
#say
óɹ!        </@ĳǹ>
#ELSEact
messagebox 1-10000000ֲ֣֮ʧܣ
goto @main
break

[@InPutInteger77]
#IF
ISADMIN
#Act
DelayGoto 1 ~InPutInteger77
#ELSEsay
ٺ٣ƭ
[~InPutInteger77]
#IF
ISADMIN
LARGE N77 0
SMALL N77 60
#Act
mov G77 <$STR(N77)>
#say
óɹ!        </@ĳǹ>
#ELSEact
messagebox 1-60ֲ֣֮ʧܣ
goto @main
break

[@Ϥ]
#IF
#ACT
messagebox ѺС˫123456ѺµԪ\Ҷעȫºãҡӣ\нҿɻӦע𣬼нĻҪ۵5%Ӷ\ĵµĵһ,ע\һʤϵͳԶѽӵϣ\Ϸвǿ˳,Ҳлͼ\ȻᵼͶע޷,Ϊн,\ϣסÿοоȻ¶ע\С飬ΪףԸҽã
[@鿴ע]
ǰѡ<>һУ<$STR(G78)>ˣһУ<$STR(G89)>ע\
ǰѡ<>һУ<$STR(G79)>ˣһУ<$STR(G90)>ע\
ǰѡ<С>һУ<$STR(G80)>ˣһУ<$STR(G91)>ע\
ǰѡ<>һУ<$STR(G81)>ˣһУ<$STR(G92)>ע\
ǰѡ<˫>һУ<$STR(G82)>ˣһУ<$STR(G93)>ע\
ǰѡ<һ>һУ<$STR(G83)>ˣһУ<$STR(G94)>ע\
ǰѡ<>һУ<$STR(G84)>ˣһУ<$STR(G95)>ע\
ǰѡ<>һУ<$STR(G85)>ˣһУ<$STR(G96)>ע\
                                           <һҳ/@鿴ע1> </@main>
[@鿴ע1]
ǰѡ<ĵ>һУ<$STR(G86)>ˣһУ<$STR(G97)>ע\
ǰѡ<>һУ<$STR(G87)>ˣһУ<$STR(G98)>ע\
ǰѡ<>һУ<$STR(G88)>ˣһУ<$STR(G99)>ע\ \ \ \ \ \
                                           <һҳ/@鿴ע> </@main>


[@ص]
#IF
#ACT
mapmove 3 330 330
break

[@]
ǰѡ<>һУ<$STR(G78)>\
ǰѡ<>ĶעһУ<$STR(G89)>ע\
ӵԪ<$GAMEGOLD>\ \
<ҪѡѺעԪ/@@InPutInteger89>\ \ \

                                                    </@main>
[@InPutInteger89]
#If
CHECKGAMEGOLD > 1
#Act
DelayGoto 1 ~InPutInteger89
#ELSEAct
MessageBox Ԫ㣡ֵ

[~InPutInteger89]
#If
Check [65] 0
CHECKGAMEGOLD > <$STR(N89)>
LARGE N89 1
small N89 10000001
#Act
Set [65] 1
CLEARDELAYGOTO
GameGold - <$STR(N89)>
mov N78 <$STR(N89)>
mov P66 3
MUL N78 <$STR(N78)> <$STR(P66)>
MOV P78 <$STR(N78)>
dec P78 <$STR(N89)>
MUL P78 <$STR(P78)> 5
DIV P78 <$STR(P78)> 100
dec N78 <$STR(P78)>
inc G78 1
inc G89 <$STR(N89)>
inc G75 1
inc G74 <$STR(N89)>
addnamelist ..\QuestDiary\һƯ\ƹݶĲ.TXT
SENDMSG 4 [%s]Ѻˣ<$STR(N89)>ע󡿣֣
#SAY
ϲעɹ\
Ѻˣ<$STR(N89)>ע󡿣\
<$STR(P66)>нĻ۵5%Ӷ㻹Ի<$STR(N78)>Ԫ\
ǰѡ<>һУ<$STR(G78)>\
ǰѡ<>ĶעһУ<$STR(G89)>ע\
ʣԪ<$GAMEGOLD>\
</@main>
#ELSEsay
עԪӦ2-10000000֮䣬Ԫ㣬\Ѿ¹ע


[@]
ǰѡ<>һУ<$STR(G79)>\
ǰѡ<>ĶעһУ<$STR(G90)>ע\
ӵԪ<$GAMEGOLD>\ \
<ҪѡѺעԪ/@@InPutInteger90>\ \ \

                                                    </@main>
[@InPutInteger90]
#If
CHECKGAMEGOLD > 1
#Act
DelayGoto 1 ~InPutInteger90
#ELSEAct
MessageBox Ԫ㣡ֵ

[~InPutInteger90]
#If
Check [65] 0
CHECKGAMEGOLD > <$STR(N90)>
small N90 10000001
LARGE N90 1
#Act
Set [65] 1
CLEARDELAYGOTO
GameGold - <$STR(N90)>
mov N79 <$STR(N90)>
mov P65 3
MUL N79 <$STR(N79)> <$STR(P65)>
MOV P79 <$STR(N79)>
dec P79 <$STR(N90)>
MUL P79 <$STR(P79)> 5
DIV P79 <$STR(P79)> 100
dec N79 <$STR(P79)>
inc G79 1
inc G90 <$STR(N90)>
inc G75 1
inc G74 <$STR(N90)>
addnamelist ..\QuestDiary\һƯ\ƹݶĲ.TXT
SENDMSG 4 [%s]Ѻˣ<$STR(N90)>עС֣
#SAY
ϲעɹ\
Ѻˣ<$STR(N90)>עС\
<$STR(P65)>нĻ۵5%Ӷ㻹Ի<$STR(N79)>Ԫ\
ǰѡ<>һУ<$STR(G79)>\
ǰѡ<>ĶעһУ<$STR(G90)>ע\
ʣԪ<$GAMEGOLD>\
</@main>
#ELSEsay
עԪӦ2-10000000֮䣬Ԫ㣬\Ѿ¹ע



[@С]
ǰѡ<С>һУ<$STR(G80)>\
ǰѡ<С>ĶעһУ<$STR(G91)>ע\
ӵԪ<$GAMEGOLD>\ \
<ҪѡѺСעԪ/@@InPutInteger91>\ \ \

                                                    </@main>
[@InPutInteger91]
#If
CHECKGAMEGOLD > 1
#Act
DelayGoto 1 ~InPutInteger91
#ELSEAct
MessageBox Ԫ㣡ֵ

[~InPutInteger91]
#If
Check [65] 0
CHECKGAMEGOLD > <$STR(N91)>
small N91 10000001
LARGE N91 1
#Act
Set [65] 1
CLEARDELAYGOTO
GameGold - <$STR(N91)>
mov N80 <$STR(N91)>
mov P64 3
MUL N80 <$STR(N80)> <$STR(P64)>
MOV P80 <$STR(N80)>
dec P80 <$STR(N91)>
MUL P80 <$STR(P80)> 5
DIV P80 <$STR(P80)> 100
dec N80 <$STR(P80)>
inc G80 1
inc G91 <$STR(N91)>
inc G75 1
inc G74 <$STR(N91)>
addnamelist ..\QuestDiary\һƯ\ƹݶĲ.TXT
SENDMSG 4 [%s]Ѻˣ<$STR(N91)>עС֣
#SAY
ϲעɹ\
Ѻˣ<$STR(N91)>עС\
<$STR(P64)>нĻ۵5%Ӷ㻹Ի<$STR(N80)>Ԫ\
ǰѡ<С>һУ<$STR(G80)>\
ǰѡ<С>ĶעһУ<$STR(G91)>ע\
ʣԪ<$GAMEGOLD>\
</@main>
#ELSEsay
עԪӦ2-10000000֮䣬Ԫ㣬\Ѿ¹ע

[@]
ǰѡ<>һУ<$STR(G81)>\
ǰѡ<>ĶעһУ<$STR(G92)>ע\
ӵԪ<$GAMEGOLD>\ \
<ҪѡѺעԪ/@@InPutInteger92>\ \ \

                                                    </@main>
[@InPutInteger92]
#If
CHECKGAMEGOLD > 1
#Act
DelayGoto 1 ~InPutInteger92
#ELSEAct
MessageBox Ԫ㣡ֵ

[~InPutInteger92]
#If
Check [65] 0
CHECKGAMEGOLD > <$STR(N92)>
LARGE N92 1
small N92 10000001
#Act
Set [65] 1
CLEARDELAYGOTO
GameGold - <$STR(N92)>
mov N81 <$STR(N92)>
mov P74 2
MUL N81 <$STR(N81)> <$STR(P74)>
MOV P81 <$STR(N92)>
MUL P81 <$STR(P81)> 5
DIV P81 <$STR(P81)> 100
dec N81 <$STR(P81)>
inc G81 1
inc G92 <$STR(N92)>
inc G75 1
inc G74 <$STR(N92)>
addnamelist ..\QuestDiary\һƯ\ƹݶĲ.TXT
SENDMSG 4 [%s]Ѻˣ<$STR(N92)>ע֣
#SAY
ϲעɹ\
Ѻˣ<$STR(N92)>ע\
<$STR(P74)>нĻ۵5%Ӷ㻹Ի<$STR(N81)>Ԫ\
ǰѡ<>һУ<$STR(G81)>\
ǰѡ<>ĶעһУ<$STR(G92)>ע\
ʣԪ<$GAMEGOLD>\
</@main>
#ELSEsay
עԪӦ2-10000000֮䣬Ԫ㣬\Ѿ¹ע


[@˫]
ǰѡ<˫>һУ<$STR(G82)>\
ǰѡ<˫>ĶעһУ<$STR(G93)>ע\
ӵԪ<$GAMEGOLD>\ \
<ҪѡѺ˫עԪ/@@InPutInteger93>\ \ \

                                                    </@main>
[@InPutInteger93]
#If
CHECKGAMEGOLD > 1
#Act
DelayGoto 1 ~InPutInteger93
#ELSEAct
MessageBox Ԫ㣡ֵ

[~InPutInteger93]
#If
Check [65] 0
CHECKGAMEGOLD > <$STR(N93)>
small N93 10000001
LARGE N93 1
#Act
Set [65] 1
CLEARDELAYGOTO
GameGold - <$STR(N93)>
mov N82 <$STR(N93)>
mov P73 2
MUL N82 <$STR(N82)> <$STR(P73)>
MOV P82 <$STR(N93)>
MUL P82 <$STR(P82)> 5
DIV P82 <$STR(N82)> 100
dec N82 <$STR(P82)>
inc G82 1
inc G93 <$STR(N93)>
inc G75 1
inc G74 <$STR(N93)>
addnamelist ..\QuestDiary\һƯ\ƹݶĲ.TXT
SENDMSG 4 [%s]Ѻˣ<$STR(N93)>ע˫֣
#SAY
ϲעɹ\
Ѻˣ<$STR(N93)>ע˫\
<$STR(P73)>нĻ۵5%Ӷ㻹Ի<$STR(N82)>Ԫ\
ǰѡ<˫>һУ<$STR(G82)>\
ǰѡ<˫>ĶעһУ<$STR(G93)>ע\
ʣԪ<$GAMEGOLD>\
</@main>
#ELSEsay
עԪӦ2-10000000֮䣬Ԫ㣬\Ѿ¹ע


[@һ]
ǰѡ<һ>һУ<$STR(G83)>\
ǰѡ<һ>ĶעһУ<$STR(G94)>ע\
ӵԪ<$GAMEGOLD>\ \
<ҪѡѺһעԪ/@@InPutInteger94>\ \ \

                                                    </@main>
[@InPutInteger94]
#If
CHECKGAMEGOLD > 1
#Act
DelayGoto 1 ~InPutInteger94
#ELSEAct
MessageBox Ԫ㣡ֵ

[~InPutInteger94]
#If
Check [65] 0
CHECKGAMEGOLD > <$STR(N94)>
small N94 10000001
LARGE N94 1
#Act
Set [65] 1
CLEARDELAYGOTO
GameGold - <$STR(N94)>
mov N83 <$STR(N94)>
mov P72 6
MUL N83 <$STR(N83)> <$STR(P72)>
MOV P83 <$STR(N83)>
dec P83 <$STR(N94)>
MUL P83 <$STR(P83)> 5
DIV P83 <$STR(P83)> 100
dec N83 <$STR(P83)>
inc G83 1
inc G94 <$STR(N94)>
inc G75 1
inc G74 <$STR(N94)>
addnamelist ..\QuestDiary\һƯ\ƹݶĲ.TXT
SENDMSG 4 [%s]Ѻˣ<$STR(N94)>עһ㡿֣
#SAY
ϲעɹ\
Ѻˣ<$STR(N94)>עһ㡿\
<$STR(P72)>нĻ۵5%Ӷ㻹Ի<$STR(N83)>Ԫ\
ǰѡ<һ>һУ<$STR(G83)>\
ǰѡ<һ>ĶעһУ<$STR(G94)>ע\
ʣԪ<$GAMEGOLD>\
</@main>
#ELSEsay
עԪӦ2-10000000֮䣬Ԫ㣬\Ѿ¹ע



[@]
ǰѡ<>һУ<$STR(G84)>\
ǰѡ<>ĶעһУ<$STR(G95)>ע\
ӵԪ<$GAMEGOLD>\ \
<ҪѡѺעԪ/@@InPutInteger95>\ \ \

                                                    </@main>
[@InPutInteger95]
#If
CHECKGAMEGOLD > 1
#Act
DelayGoto 1 ~InPutInteger95
#ELSEAct
MessageBox Ԫ㣡ֵ

[~InPutInteger95]
#If
Check [65] 0
CHECKGAMEGOLD > <$STR(N95)>
small N95 10000001
LARGE N95 1
#Act
Set [65] 1
CLEARDELAYGOTO
GameGold - <$STR(N95)>
mov N84 <$STR(N95)>
mov P71 6
MUL N84 <$STR(N84)> <$STR(P71)>
MOV P84 <$STR(N84)>
dec P84 <$STR(N95)>
MUL P84 <$STR(P84)> 5
DIV P84 <$STR(P84)> 100
dec N84 <$STR(P84)>
inc G84 1
inc G95 <$STR(N95)>
inc G75 1
inc G74 <$STR(N95)>
addnamelist ..\QuestDiary\һƯ\ƹݶĲ.TXT
SENDMSG 4 [%s]Ѻˣ<$STR(N95)>ע㡿֣
#SAY
ϲעɹ\
Ѻˣ<$STR(N95)>ע㡿\
<$STR(P71)>нĻ۵5%Ӷ㻹Ի<$STR(N84)>Ԫ\
ǰѡ<>һУ<$STR(G84)>\
ǰѡ<>ĶעһУ<$STR(G95)>ע\
ʣԪ<$GAMEGOLD>\
</@main>
#ELSEsay
עԪӦ2-10000000֮䣬Ԫ㣬\Ѿ¹ע



[@]
ǰѡ<>һУ<$STR(G85)>\
ǰѡ<>ĶעһУ<$STR(G96)>ע\
ӵԪ<$GAMEGOLD>\ \
<ҪѡѺעԪ/@@InPutInteger96>\ \ \

                                                    </@main>
[@InPutInteger96]
#If
CHECKGAMEGOLD > 1
#Act
DelayGoto 1 ~InPutInteger96
#ELSEAct
MessageBox Ԫ㣡ֵ

[~InPutInteger96]
#If
Check [65] 0
CHECKGAMEGOLD > <$STR(N96)>
small N96 10000001
LARGE N96 1
#Act
Set [65] 1
CLEARDELAYGOTO
GameGold - <$STR(N96)>
mov N85 <$STR(N96)>
mov P70 6
MUL N85 <$STR(N85)> <$STR(P70)>
MOV P85 <$STR(N85)>
dec P85 <$STR(N96)>
MUL P85 <$STR(P85)> 5
DIV P85 <$STR(P85)> 100
dec N85 <$STR(P85)>
inc G85 1
inc G96 <$STR(N96)>
inc G75 1
inc G74 <$STR(N96)>
addnamelist ..\QuestDiary\һƯ\ƹݶĲ.TXT
SENDMSG 4 [%s]Ѻˣ<$STR(N96)>ע㡿֣
#SAY
ϲעɹ\
Ѻˣ<$STR(N96)>ע㡿\
<$STR(P70)>нĻ۵5%Ӷ㻹Ի<$STR(N85)>Ԫ\
ǰѡ<>һУ<$STR(G85)>\
ǰѡ<>ĶעһУ<$STR(G96)>ע\
ʣԪ<$GAMEGOLD>\
</@main>
#ELSEsay
עԪӦ2-10000000֮䣬Ԫ㣬\Ѿ¹ע




[@ĵ]
ǰѡ<ĵ>һУ<$STR(G86)>\
ǰѡ<ĵ>ĶעһУ<$STR(G97)>ע\
ӵԪ<$GAMEGOLD>\ \
<ҪѡѺĵעԪ/@@InPutInteger97>\ \ \

                                                    </@main>
[@InPutInteger97]
#If
CHECKGAMEGOLD > 1
#Act
DelayGoto 1 ~InPutInteger97
#ELSEAct
MessageBox Ԫ㣡ֵ

[~InPutInteger97]
#If
Check [65] 0
CHECKGAMEGOLD > <$STR(N97)>
small N97 10000001
LARGE N97 1
#Act
Set [65] 1
CLEARDELAYGOTO
GameGold - <$STR(N97)>
mov N86 <$STR(N97)>
mov P69 6
MUL N86 <$STR(N86)> <$STR(P69)>
MOV P86 <$STR(N86)>
dec P86 <$STR(N97)>
MUL P86 <$STR(P86)> 5
DIV P86 <$STR(P86)> 100
dec N86 <$STR(P86)>
inc G86 1
inc G97 <$STR(N97)>
inc G75 1
inc G74 <$STR(N97)>
addnamelist ..\QuestDiary\һƯ\ƹݶĲ.TXT
SENDMSG 4 [%s]Ѻˣ<$STR(N97)>עĵ㡿֣
#SAY
ϲעɹ\
Ѻˣ<$STR(N97)>עĵ㡿\
<$STR(P69)>нĻ۵5%Ӷ㻹Ի<$STR(N86)>Ԫ\
ǰѡ<ĵ>һУ<$STR(G86)>\
ǰѡ<ĵ>ĶעһУ<$STR(G97)>ע\
ʣԪ<$GAMEGOLD>\
</@main>
#ELSEsay
עԪӦ2-10000000֮䣬Ԫ㣬\Ѿ¹ע



[@]
ǰѡ<>һУ<$STR(G87)>\
ǰѡ<>ĶעһУ<$STR(G98)>ע\
ӵԪ<$GAMEGOLD>\ \
<ҪѡѺעԪ/@@InPutInteger98>\ \ \

                                                    </@main>
[@InPutInteger98]
#If
CHECKGAMEGOLD > 1
#Act
DelayGoto 1 ~InPutInteger98
#ELSEAct
MessageBox Ԫ㣡ֵ

[~InPutInteger98]
#If
Check [65] 0
CHECKGAMEGOLD > <$STR(N98)>
small N98 10000001
LARGE N98 1
#Act
Set [65] 1
CLEARDELAYGOTO
GameGold - <$STR(N98)>
mov N87 <$STR(N98)>
mov P68 6
MUL N87 <$STR(N87)> <$STR(P68)>
MOV P87 <$STR(N87)>
dec P87 <$STR(N98)>
MUL P87 <$STR(P87)> 5
DIV P87 <$STR(P87)> 100
dec N87 <$STR(P87)>
inc G87 1
inc G98 <$STR(N98)>
inc G75 1
inc G74 <$STR(N98)>
addnamelist ..\QuestDiary\һƯ\ƹݶĲ.TXT
SENDMSG 4 [%s]Ѻˣ<$STR(N98)>ע㡿֣
#SAY
ϲעɹ\
Ѻˣ<$STR(N98)>ע㡿\
<$STR(P68)>нĻ۵5%Ӷ㻹Ի<$STR(N87)>Ԫ\
ǰѡ<>һУ<$STR(G87)>\
ǰѡ<>ĶעһУ<$STR(G98)>ע\
ʣԪ<$GAMEGOLD>\
</@main>
#ELSEsay
עԪӦ2-10000000֮䣬Ԫ㣬\Ѿ¹ע



[@]
ǰѡ<>һУ<$STR(G88)>\
ǰѡ<>ĶעһУ<$STR(G99)>ע\
ӵԪ<$GAMEGOLD>\ \
<ҪѡѺעԪ/@@InPutInteger99>\ \ \

                                                    </@main>
[@InPutInteger99]
#If
CHECKGAMEGOLD > 1
#Act
DelayGoto 1 ~InPutInteger99
#ELSEAct
MessageBox Ԫ㣡ֵ

[~InPutInteger99]
#If
Check [65] 0
CHECKGAMEGOLD > <$STR(N99)>
small N99 10000001
LARGE N99 1
#Act
Set [65] 1
CLEARDELAYGOTO
GameGold - <$STR(N99)>
mov N88 <$STR(N99)>
mov P67 6
MUL N88 <$STR(N88)> <$STR(P67)>
MOV P88 <$STR(N88)>
dec P88 <$STR(N99)>
MUL P88 <$STR(P88)> 5
DIV P88 <$STR(P88)> 100
dec N88 <$STR(P88)>
inc G88 1
inc G99 <$STR(N99)>
inc G75 1
inc G74 <$STR(N99)>
addnamelist ..\QuestDiary\һƯ\ƹݶĲ.TXT
SENDMSG 4 [%s]Ѻˣ<$STR(N99)>ע㡿֣
#SAY
ϲעɹ\
Ѻˣ<$STR(N99)>ע㡿\
<$STR(P67)>нĻ۵5%Ӷ㻹Ի<$STR(N88)>Ԫ\
ǰѡ<>һУ<$STR(G88)>\
ǰѡ<>ĶעһУ<$STR(G99)>ע\
ʣԪ<$GAMEGOLD>\
</@main>
#ELSEsay
עԪӦ2-10000000֮䣬Ԫ㣬\Ѿ¹ע

[@]
#if
Check [65] 0
#say
65=0\
G78<$STR(G78)>|G79<$STR(G79)>|G80<$STR(G80)>|G81<$STR(G81)>|G82<$STR(G82)>|G83<$STR(G83)>|G84<$STR(G84)>|G85<$STR(G85)>|G86<$STR(G86)>|\ 
G87<$STR(G87)>|G88<$STR(G88)>|G89<$STR(G89)> G90<$STR(G90)>|G91<$STR(G91)>|G92<$STR(G92)>|G93<$STR(G93)>|G94<$STR(G94)>|G95<$STR(G95)>|\ 
G96<$STR(G96)>|G97<$STR(G97)>|G98<$STR(G98)>|G99<$STR(G99)>|N71<$STR(N71)>|N78<$STR(N78)>|N79<$STR(N79)>|N80<$STR(N80)>|N81<$STR(N81)>|\ 
N82<$STR(N82)>|N83<$STR(N83)>|N84<$STR(N84)>|N85<$STR(N85)>|N86<$STR(N86)>|N87<$STR(N87)>|N88<$STR(N78)>|N89<$STR(N89)>|N90<$STR(N90)>|\ 
N91<$STR(N91)>|N92<$STR(N92)>|N93<$STR(N93)>|N94<$STR(N94)>|N95<$STR(N95)>|N96<$STR(N96)>|N97<$STR(N97)>|N98<$STR(N98)>|N99<$STR(N99)>|\ 
#if
Check [65] 1
#say
65=1\
N78<$STR(G78)>|G79<$STR(G79)>|G80<$STR(G80)>|G81<$STR(G81)>|G82<$STR(G82)>|G83<$STR(G83)>|G84<$STR(G84)>|G85<$STR(G85)>|G86<$STR(G86)>|\ 
G87<$STR(G87)>|G88<$STR(G78)>|G89<$STR(G89)> G90<$STR(G90)>|G91<$STR(G91)>|G92<$STR(G92)>|G93<$STR(G93)>|G94<$STR(G94)>|G95<$STR(G95)>|\ 
G96<$STR(G96)>|G97<$STR(G97)>|G98<$STR(G98)>|G99<$STR(G99)>|N71<$STR(N71)>|N78<$STR(N78)>|N79<$STR(N79)>|N80<$STR(N80)>|N81<$STR(N81)>|\ 
N82<$STR(N82)>|N83<$STR(N83)>|N84<$STR(N84)>|N85<$STR(N85)>|N86<$STR(N86)>|N87<$STR(N87)>|N88<$STR(N78)>|N89<$STR(N89)>|N90<$STR(N90)>|\ 
N91<$STR(N91)>|N92<$STR(N92)>|N93<$STR(N93)>|N94<$STR(N94)>|N95<$STR(N95)>|N96<$STR(N96)>|N97<$STR(N97)>|N98<$STR(N98)>|N99<$STR(N99)>|\ 
<65=0/@65=0>

[@65=0]
#act
 set [65] 0
 messagebox 65=0.
 break



