[@Ԫ]
{
1ʹԪ󣬱뵽NPCȡֵƷʯ\
2ڶ쾭ֵԪ뷶Χ1~300֮\
31ԪԶ30ӣ֮3Žʯ\
4ȼԽߣԪԽ࣬õľԽ\
5ͨ첻룬ѾĻԼþֵʯ\
<˽Ԫ򣬷/@main>
}
[@Ԫ]
{
Ҫǿ־һʼ첻Ƿ߶\
ûȷԼҪԪ\
1ԪԶ3ӣ֮3Žʯ\
һԪɹ󣬴˴ζ콫ֹܱ\
õľֵׯ԰ʦȡ\
ҪԪ죬ͱֹǰͨ\ \
<ͬԪĹԪ/@Ԫ>\
</@main>

[@Ԫ]
Ҫڶ쾭ֵԪ\
һ1~300Ԫ֮\
ԪԽ࣬õĶ⾭Խ\
ȡƷǰע㹻İҿռ䣬ᵼ²ȡ\ \
<ڶԪ/@@InPutInteger1>\
<ȡ/@exit>

[@@InPutInteger1]
#IF
TRUE
#ACT
DelayGoto 1 ~InPutInteger1

[~InPutInteger1]
#IF
Check [384] 1
#ACT
MESSAGEBOX ĿǰԪ죬ȴԪ롣
break

#IF
True
#ACT
MOV N1 <$STR(M1)>

#IF
CHECKVAR HUMAN ɽʯ > 0
#ACT
MESSAGEBOX Ľʯûȡ⡣
break

#IF
EQUAL <$STR(N1)> 0
#ACT
MESSAGEBOX ݵ0롣
break

#IF
LARGE <$STR(N1)> 300
#ACT
MESSAGEBOX ݳ300롣
break

#IF
CHECKGAMEGOLD > <$STR(N1)>
#ACT
MOV M5 3
MOV M6 3
MOV M3 200000
MOV M2 <$STR(N1)>

MUL M5 <$STR(N1)>
MUL M6 <$STR(N1)>
DIV M2 2
MUL M3 <$STR(N1)>
#SAY
<$USERNAME>ʹ <$STR(N1)> Ԫ쾭ֵ,<$STR(M3)>\
ң㽫ø: <$STR(M5)> Žʯ\
Ҫ <$STR(M2)> ӵʱ䣬\
ע⣬һʼ޷ֹ\
ɹҲøƷ:ʯ\
ȷϿʼ\
<ȷ϶/@ȷ϶>\

</@exit>
#ELSEACT
MESSAGEBOX 㲢ûôԪֵ

[@ȷ϶]
#IF 
CHECKGAMEGOLD < <$STR(N1)> 
#ACT 
MessageBox ԲԪ

#IF
#ACT
Set [384] 1
GAMEGOLD - <$STR(N1)>
CALCVAR HUMAN ʱ = 0
SAVEVAR HUMAN ʱ ..\QuestDiary\ļ\Save\.txt
CALCVAR HUMAN  + <$STR(M3)>
SAVEVAR HUMAN  ..\QuestDiary\ļ\Save\.txt
CALCVAR HUMAN Ԫʯ = 0
SAVEVAR HUMAN Ԫʯ ..\QuestDiary\ļ\Save\.txt
CALCVAR HUMAN  = 0
SAVEVAR HUMAN  ..\QuestDiary\ļ\Save\.txt
CALCVAR HUMAN ɽʯ = 0
SAVEVAR HUMAN ɽʯ ..\QuestDiary\ļ\Save\.txt
CALCVAR HUMAN Ԫ = <$STR(N1)>
SAVEVAR HUMAN Ԫ ..\QuestDiary\ļ\Save\.txt
CALCVAR HUMAN ʱ = <$STR(M2)>
SAVEVAR HUMAN ʱ ..\QuestDiary\ļ\Save\.txt
CALCVAR HUMAN Ԫʯ = <$STR(M5)>
SAVEVAR HUMAN Ԫʯ ..\QuestDiary\ļ\Save\.txt
CALCVAR HUMAN ɾ = 0
SAVEVAR HUMAN ɾ ..\QuestDiary\ļ\Save\.txt
SetOnTimer 1 30
SENDMSG 7 <$HUMAN(Ԫʯ)>Žʯ3Ӻʼ죡
#SAY
ϲԪʯɹ\ \
<뿪/@exit>

[@Ԫ]
#IF
CHECKVAR HUMAN Ԫʯ > 0
#ACT
CALCVAR HUMAN ʱ - 10
SAVEVAR HUMAN ʱ ..\QuestDiary\ļ\Save\.txt
CALCVAR HUMAN Ԫʯ - 3
SAVEVAR HUMAN Ԫʯ ..\QuestDiary\ļ\Save\.txt
CALCVAR HUMAN ɽʯ + 3
SAVEVAR HUMAN ɽʯ ..\QuestDiary\ļ\Save\.txt
CALCVAR HUMAN  + 3
SAVEVAR HUMAN  ..\QuestDiary\ļ\Save\.txt
CALCVAR HUMAN ɾ + 200000
SAVEVAR HUMAN ɾ ..\QuestDiary\ļ\Save\.txt
CALCVAR HUMAN  - 200000
SAVEVAR HUMAN  ..\QuestDiary\ļ\Save\.txt
SetOnTimer 1 30
#ELSEACT
Set [384] 0
CLEARDELAYGOTO
SETOFFTIMER 1
SENDMSG 5 ʾнʯɡ
}
[@ȡƷ]
{
#IF
CHECKVAR HUMAN ɽʯ > 0
#ACT
MOV P1 3
MUL P1 <$HUMAN(Ԫ)>
#SAY
<$USERNAME>ԪʯϢ£\
Ԫ<$HUMAN(Ԫ)> <$STR(P1)>\
Ѿ:<$HUMAN()>\
οȡ:<$HUMAN(ɽʯ)>\
οȡ:<$HUMAN(ɾ)>\
δ:<$HUMAN(Ԫʯ)>\
Ҫȡ\
<ȡ/@ʯ>\
</@main>
#ELSESAY
<$USERNAME>ԪʯϢ£\
<$STR(m6)>\
Ѿ:<$HUMAN()>\
οȡ:<$HUMAN(ɽʯ)>\
δ:<$HUMAN(Ԫʯ)>\ \

</@main>

[@ʯ]
#IF
True
#ACT
set [800] 0

#IF 
CHECKVAR HUMAN ɽʯ > 799
CHECK [800] 0
#ACT
SET [800] 1
GetRandomName ..\QuestDiary\V2\\7.txt S0
give <$STR(S0)>
SENDMSG 0 ϲ%sʯö⽱<$STR(S0)>

#IF 
CHECKVAR HUMAN ɽʯ > 599
CHECK [800] 0
#ACT
SET [800] 1
GetRandomName ..\QuestDiary\V2\\6.txt S0
give <$STR(S0)>
SENDMSG 0 ϲ%sʯö⽱<$STR(S0)>

#IF 
CHECKVAR HUMAN ɽʯ > 399
CHECK [800] 0
#ACT
SET [800] 1
GetRandomName ..\QuestDiary\V2\\5.txt S0
give <$STR(S0)>
SENDMSG 0 ϲ%sʯö⽱<$STR(S0)>

#IF 
CHECKVAR HUMAN ɽʯ > 199
CHECK [800] 0
#ACT
SET [800] 1
GetRandomName ..\QuestDiary\V2\\4.txt S0
give <$STR(S0)>
SENDMSG 0 ϲ%sʯö⽱<$STR(S0)>

#IF 
CHECKVAR HUMAN ɽʯ > 99
CHECK [800] 0
#ACT
SET [800] 1
GetRandomName ..\QuestDiary\V2\\3.txt S0
give <$STR(S0)>
SENDMSG 0 ϲ%sʯö⽱<$STR(S0)>

#IF 
CHECKVAR HUMAN ɽʯ > 49
CHECK [800] 0
#ACT
SET [800] 1
GetRandomName ..\QuestDiary\V2\\2.txt S0
give <$STR(S0)>
SENDMSG 0 ϲ%sʯö⽱<$STR(S0)>

#IF 
CHECKVAR HUMAN ɽʯ > 29
CHECK [800] 0
#ACT
SET [800] 1
GetRandomName ..\QuestDiary\V2\\1.txt S0
give <$STR(S0)>
SENDMSG 0 ϲ%sʯö⽱<$STR(S0)>

#IF 
CHECKVAR HUMAN ɽʯ > 11
CHECK [800] 0
#ACT
SET [800] 1
GetRandomName ..\QQ290382141\Ʒһ\ʯ.txt S0
give <$STR(S0)>
SENDMSG 0 ϲ%sʯö⽱<$STR(S0)>

#IF
CHECK [800] 1
#ACT
SET [800] 0

#IF
CHECKVAR HUMAN ɽʯ > 0
#ACT
MESSAGEBOX ɹýʯ<$HUMAN(ɽʯ)>ţ
GAMEDIAMOND + <$HUMAN(ɽʯ)>
CALCVAR HUMAN ɽʯ - <$HUMAN(ɽʯ)>
SAVEVAR HUMAN ɽʯ ..\QuestDiary\ļ\Save\.txt
CHANGEEXP + <$HUMAN(ɾ)>
CALCVAR HUMAN ɾ - <$HUMAN(ɾ)>
SAVEVAR HUMAN ɾ ..\QuestDiary\ļ\Save\.txt
DelayGoto 1 @Ԫ
close
}

[@ʯѯ]
{
㵱ǰĽʯǡ<$GAMEDIAMOND>\ \
</@main>
}
[@ʯȡ]
{
Խʯȡ㽻ף\
ȡٸʯѡȡ\
<ȡһʯ/@һʯ><ȡʮʯ/@ʮʯ><ʮʯ/@ʮʯ>\ \
<һٸʯ/@һٽʯ><ٸʯ/@ٽʯ><һǧʯ/@һǧʯ>\ \

[@һǧʯ]
#IF
CHECKGAMEDIAMOND > 999
CHECKBAGSIZE 1
#ACT
GAMEDIAMOND - 1000
give ʯ(1000) 1
SENDMSG 6 㵱ǰĽʯ:<$GAMEDIAMOND>
#ELSESAY
ȡʧܣıǷ߽ʯǷ㹻

[@ٽʯ]
#IF
CHECKGAMEDIAMOND > 499
CHECKBAGSIZE 1
#ACT
GAMEDIAMOND - 500
give ʯ(500) 1
SENDMSG 6 㵱ǰĽʯ:<$GAMEDIAMOND>
#ELSESAY
ȡʧܣıǷ߽ʯǷ㹻

[@һٽʯ]
#IF
CHECKGAMEDIAMOND > 99
CHECKBAGSIZE 1
#ACT
GAMEDIAMOND - 100
give ʯ(100) 1
SENDMSG 6 㵱ǰĽʯ:<$GAMEDIAMOND>
#ELSESAY
ȡʧܣıǷ߽ʯǷ㹻

[@ʮʯ]
#IF
CHECKGAMEDIAMOND > 49
CHECKBAGSIZE 1
#ACT
GAMEDIAMOND - 50
give ʯ(50) 1
SENDMSG 6 㵱ǰĽʯ:<$GAMEDIAMOND>
#ELSESAY
ȡʧܣıǷ߽ʯǷ㹻

[@ʮʯ]
#IF
CHECKGAMEDIAMOND > 9
CHECKBAGSIZE 1
#ACT
GAMEDIAMOND - 10
give ʯ(10) 1
SENDMSG 6 㵱ǰĽʯ:<$GAMEDIAMOND>
#ELSESAY
ȡʧܣıǷ߽ʯǷ㹻

[@һʯ]
#IF
CHECKGAMEDIAMOND > 0
CHECKBAGSIZE 1
#ACT
GAMEDIAMOND - 1
give ʯ(1) 1
SENDMSG 6 㵱ǰĽʯ:<$GAMEDIAMOND>
#ELSESAY
ȡʧܣıǷ߽ʯǷ㹻
}