[@wܸ]
{
#if
ISADMIN
#SAY
ǰ<ۻͨ><$STR(G63)>                 </@@InPutInteger1>\
ǰ<ۻ><$STR(G64)>                   </@@InPutInteger2>\
ǰ<ۻ><$STR(G65)>                  </@@InPutInteger3>\
ǰ<ۻ><$STR(G28)>             </@@InPutInteger4>\ \
ϵͳȡĶ.!<.Ըʱ.ۻƷ>\
ȫٵͷ!˲Ϊ׸.߼ǾԿܵ!!\
<ͬʱϵͳһ,ɺ>
#elseSAY
ǰ<ۻͨ><$STR(G63)> \
ǰ<ۻ><$STR(G64)> \
ǰ<ۻ><$STR(G65)> \
ǰ<ۻ><$STR(G28)> \
<ҪԸ/@ʼ_>\
<ҵ/@ʾ>\
ϵͳȡĶ.!<.Ըʱ.ۻƷ>\
ȫٵͷ!˲Ϊ׸.߼ǾԿܵ!!\
<Ըͬʱϵͳһ,ɺ,ظ/FCOLOR=250>
[@InPutInteger1]
#ACT
MOV G63 N0
GOTO @wܸ
[@InPutInteger2]
#ACT
MOV G64 N0
GOTO @wܸ
[@InPutInteger3]
#ACT
MOV G65 N0
GOTO @wܸ
[@InPutInteger4]
#ACT
MOV G28 N0
GOTO @wܸ
[@ʼ_]
#IF
random 3
CHECKCREDITPOINT > 4
#ACT
CREDITPOINT - 5
INC G64 10
SENDCOLORMSG 0 251 249 [%s]á5ĵ!
MOVR D8 50
MOVR D20 15
INC D20 1
MOVR N3 100
INC N3 3
GOTO @
break
#IF
random 3
CHECKGAMEGOLD > 499
#ACT
GAMEGOLD - 500
INC G63 500
SENDCOLORMSG 0 251 249 [%s]á500ͨҡĵ!
GOTO @
MOVR D20 15
INC D20 1
MOVR N3 100
INC N3 3
MOVR D8 50
break
#IF
random 3
CHECKGAMEPOINT > 199
#ACT
GAMEPOINT - 200
INC G65 200
SENDCOLORMSG 0 251 249 [%s]á200㹱סĵ!
GOTO @
MOVR D20 15
INC D20 1
MOVR N3 100
INC N3 3
MOVR D8 50
break
#IF
CHECKEXP > 2999999
random 3
#act
CHANGEEXP - 2000000
INC G28 2000000
SENDCOLORMSG 0 251 249 [%s]á200W须ĵ!
GOTO @
MOVR D20 15
INC D20 1
MOVR N3 100
INC N3 3
MOVR D8 50
break
#ELSESAY
ղûбһųϿҵ............\ \ \ \ \ \
 <Ը/@wܸ>\
[@]
#IF
equal D8 10
#ACT
MOV D8 0
GAMEGOLD + G63
SENDCOLORMSG 0 251 73 [%s]ж.ۻ[ͨң<$STR(G63)>]!
MOV G63 0
GOTO @
break
#IF
equal D8 15
#ACT
MOV D8 0
CREDITPOINT + G64
SENDCOLORMSG 0 251 73 [%s]ж.ۻ[<$STR(G64)>]!
MOV G64 0
GOTO @
break
#IF
equal D8 25
#ACT
MOV D8 0
GAMEPOINT + G65
SENDCOLORMSG 0 251 73 [%s]ж.ۻ[׶ȣ<$STR(G65)>]!
MOV G65 0
GOTO @
break
#IF
equal D8 35
#ACT
MOV D8 0
CHANGEEXP + G28
SENDCOLORMSG 0 251 73 [%s]ж.ۻ[飺<$STR(G28)>]!
MOV G28 0
GOTO @
break
#IF
equal D8 45
#ACT
MOV D8 0
GAMEGOLD + G63
CREDITPOINT + G64
GAMEPOINT + G65
CHANGEEXP + G28
SENDCOLORMSG 0 251 73 [%s]ж.ۻ[飺<$STR(G28)>].[׶ȣ<$STR(G65)>].[<$STR(G64)>].[ͨң<$STR(G63)>]!ˬ!
MOV G63 0
MOV G64 0
MOV G65 0
MOV G28 0
GOTO @
break
#ELSEACT
GOTO @
SENDMSG 7 ʾɹ!ۻĲƸûнͷ!
break
[@ʾ]
<Ҫѹָ..ɱĳʾһĹ/FCOLOR=250>\ 
<ûʾɱֵһҪǻطͼ/FCOLOR=250>\
<ֵͬĹԡΪҲαװ/FCOLOR=250>\ \
<ʾ/FCOLOR=254><ȥɱ/FCOLOR=243><$STR(N3)>ֻ<$STR(S20)><ɱ/FCOLOR=243><$STR(N4)><ֻ/FCOLOR=243>\ \
<ʾ/FCOLOR=254><ɻ/FCOLOR=243><$STR(N5)><$STR(S21)>\ \
<ʹ̽,ͱ޷/SCOLOR=249>   </@ʼ_>
[@]
#IF
EQUAL D20 1
#ACT
MOV S21 
MOVR N5 20
INC N5 1
MOV N4 0
ReadRandomStr ..\QuestDiary\Ҫһ˽Դ̳\ļ\.txt S20
Write S20 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
Write S21 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
Write N3 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
Write N4 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
Write N5 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
GOTO @ʾ
BREAK

;齱==========================================================
#IF
LARGE D20 1
SMALL D20 5
#ACT
MOV S21 
MOVR N5 1000
INC N5 1
MUL N5 20000
MOV N4 0
ReadRandomStr ..\QuestDiary\Ҫһ˽Դ̳\ļ\.txt S20
Write S20 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
Write S21 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
Write N3 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
Write N4 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
Write N5 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
GOTO @ʾ
BREAK


;==========================================================
#IF
LARGE D20 4
SMALL D20 9
#ACT
MOV S21 
MOVR N5 100
INC N5 1
MUL N5 8000
MOV N4 0
ReadRandomStr ..\QuestDiary\Ҫһ˽Դ̳\ļ\.txt S20
Write S20 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
Write S21 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
Write N3 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
Write N4 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
Write N5 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
GOTO @ʾ
BREAK

;Ծ==========================================================
#IF
LARGE D20 11
SMALL D20 14
#ACT
MOV S21 
MOVR N5 1000
INC N5 1
MOV N4 0
ReadRandomStr ..\QuestDiary\Ҫһ˽Դ̳\ļ\.txt S20
Write S20 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
Write S21 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
Write N3 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
Write N4 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
Write N5 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
GOTO @ʾ
BREAK

;ҽ==========================================================
#IF
LARGE D20 13
SMALL D20 16
#ACT
MOV S21 ͨ
MOVR N5 10000
INC N5 1
MOV N4 0
ReadRandomStr ..\QuestDiary\Ҫһ˽Դ̳\ļ\.txt S20
Write S20 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
Write S21 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
Write N3 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
Write N4 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
Write N5 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
GOTO @ʾ
BREAK
}
[@ѭ]
{
#IF
SMALL N4 N3
#ACT
INC N4 1
Write N4 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
SENDMSG 6 ʾɱ֡<$STR(S20)>,һҪ[<$STR(N4)>/<$STR(N3)>]ֻ
break
#ELSEACT
GOTO @ѭ
break
[@ѭ]
#IF
COMPARETEXT S21 ͨ
#ACT
Read N5 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
SENDCOLORMSG 0 251 249 [%s]ѭ,á<$STR(S21)>+<$STR(N5)>
GAMEGOLD + N5
MOV S20 
MOV S21 
MOV N3 0
MOV N4 0
MOV N5 0
Write S20 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
Write S21 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
Write N3 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
Write N4 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
Write N5 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
break
#IF
COMPARETEXT S21 
#ACT
Read N5 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
SENDCOLORMSG 0 251 249 [%s]ѭ,á<$STR(S21)>+<$STR(N5)>
CREDITPOINT + N5
MOV S20 
MOV S21 
MOV N3 0
MOV N4 0
MOV N5 0
Write S20 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
Write S21 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
Write N3 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
Write N4 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
Write N5 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
break
#IF
COMPARETEXT S21 
#ACT
Read N5 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
SENDCOLORMSG 0 251 249 [%s]ѭ,á<$STR(S21)>+<$STR(N5)>
GAMEPOINT + N5
MOV S20 
MOV S21 
MOV N3 0
MOV N4 0
MOV N5 0
Write S20 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
Write S21 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
Write N3 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
Write N4 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
Write N5 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
break
#IF
COMPARETEXT S21 
#ACT
Read N5 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
SENDCOLORMSG 0 251 249 [%s]ѭ,á<$STR(S21)>+<$STR(N5)>
CHANGEEXP + N5
MOV S20 
MOV S21 
MOV N3 0
MOV N4 0
MOV N5 0
Write S20 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
Write S21 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
Write N3 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
Write N4 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
Write N5 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
break
#IF
COMPARETEXT S21 
#ACT
Read N5 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
SENDCOLORMSG 0 251 249 [%s]ѭ,á<$STR(S21)>+<$STR(N5)>
GIVE  N5
MOV S20 
MOV S21 
MOV N3 0
MOV N4 0
MOV N5 0
Write S20 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
Write S21 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
Write N3 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
Write N4 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
Write N5 ..\QuestDiary\Ҫһ˽Դ̳\ļ\ѭ.txt
break
}
