[@]
{
#IF
#ACT
MOV S$ʱ
MOV S$ʣʱ

#IF
EQUAL S$ʱ
EQUAL S$ʣʱ
CHECKNAMEDATETIMELIST ..\QuestDiary\Աϵͳ\¿Ա.txt 1 S$ʱ N$ N$Сʱ N$
#ACT
MOV S$ʱ <$STR(S$ʱ)>
MOV S$ʣʱ <$STR(N$)>:<$STR(N$Сʱ)>:<$STR(N$)>

#IF
EQUAL S$ʱ
EQUAL S$ʣʱ
#ACT
MOV S$ʱ ѹ
MOV S$ʣʱ 00:00:00

#IF
#ACT
CloseBigDialogBox
SETSTRINGBLANK S$ʱ 30 1
#SAY
<>                      <      ϵ   ͳ/FCOLOR=243>\
<-------------------------------------------------------------/AUTOCOLOR=91>\
<ʱ䣺/FCOLOR=149>{<$STR(S$ʱ)>/FCOLOR=249} <ʣʱ䣺/FCOLOR=149>{<$STR(S$ʣʱ)>/FCOLOR=250}\
<-------------------------------------------------------------/AUTOCOLOR=91>\
<¿ڣ/FCOLOR=253><ʱ[30]/FCOLOR=254>\
<-------------------------------------------------------------/AUTOCOLOR=91>\
<¿Ȩ棺/FCOLOR=243><ÿ2Сʱ˫/FCOLOR=242>              <ÿ/FCOLOR=243><1/FCOLOR=242>\
<-------------------------------------------------------------/AUTOCOLOR=91>\
<ÿ/@>                                 <뿨Ź¿/@@InPutString50>\ \

[@InPutString14]
#say
\ \
\ \
\ \
\
<ڼ鿨С> <10%>\
\
#ACT
DelayGoto 500 @a1
[@a1]
\ \
\ \
\ \
\
<ڼ鿨С> <20%>\
\
#ACT
DelayGoto 500 @a2
[@a2]
#say
\ \
\ \
\ \
\
<ڼ鿨С> <30%>\
\
#ACT
DelayGoto 500 @a3

[@a3]
#say
\ \
\ \
\ \
\
<ڼ鿨С> <50%>\
\
#ACT
DelayGoto 500 @a4

[@a4]
\ \
\ \
\ \
\
<ڼ鿨С> <80%>\
\

#ACT
DelayGoto 500 @chek1

[@chek1]
#say
\ \
\ \
\ \
\
<ڼ鿨С> <90%>\
\

#ACT
DelayGoto 500 @chek2

[@chek2]
#say
\ \
\ \
\ \
\
<ڼ鿨С100%>\
\

#ACT
DelayGoto 500 ~InPutInteger50

[~InPutInteger50]
#if
CHECKTEXTLIST ..\QuestDiary\¿\¿.txt <$STR(s14)>
#act
DelTextList ..\QuestDiary\¿\¿.txt <$STR(s14)>
ADDNAMEDATETIMELIST ..\QuestDiary\Աϵͳ\¿Ա.txt 30 0 0
DELNAMELIST ..\QuestDiary\ν\.txt
;give ߼Ϳ 1
KILLMONBURSTRATE 20140220 20140221 100 20140223 20140224 20140225 20140226 65535 20140227 20140228
MESSAGEBOX ϲɹ¿
SET [150] 1
SENDMSG 6 㱻̶ͨϷʱֵ
goto @
#ELSEACT
MESSAGEBOX ֵܴGMȡϵȡ¿ţ
CLOSE

 
[@˫]
#IF
CHECKNAMELIST ..\QuestDiary\˫\ȡ˫.txt
#ACT
MESSAGEBOX Ѿȡ˫ˣ\\˫ʱˣȡ
CLOSE
#ELSEACT
GOTO @ȡ

[@ȡ]
#IF
NOT CHECKNAMEDATETIMELIST ..\QuestDiary\Աϵͳ\¿Ա.txt 1 S$ʱ N$ N$Сʱ N$
#ACT
MESSAGEBOX ֻ¿ûȡ˫ʱ䣡
CLOSE

#IF
CHECKNAMEDATETIMELIST ..\QuestDiary\Աϵͳ\¿Ա.txt 1 S$ʱ N$ N$Сʱ N$
NOT CHECKNAMELIST ..\QuestDiary\˫\GMС.txt
#ACT
ADDNAMELIST ..\QuestDiary\˫\ȡ˫.txt
ADDNAMEDATETIMELIST ..\QuestDiary\˫\˫ʱ䵽.txt 0 2 0
SETONTIMER 15 1
SENDMSG 6 (*)2Сʱ˫ʱ䣡
CLOSE

#IF
CHECKNAMEDATETIMELIST ..\QuestDiary\Աϵͳ\¿Ա.txt 1 S$ʱ N$ N$Сʱ N$
CHECKNAMELIST ..\QuestDiary\˫\GMС.txt
#ACT
ADDNAMELIST ..\QuestDiary\˫\ȡ˫.txt
ADDNAMEDATETIMELIST ..\QuestDiary\˫\˫ʱ䵽.txt 0 4 0
SETONTIMER 15 1
SENDMSG 6 (*)4Сʱ˫ʱ䣡
CLOSE

[@]
¿ҿÿȡһ.\
ͼһֻBOSSȴս.\
ڵͼСߣᱻ̴ͳȥ.\
ÿÿֻȡһΣҲȡ.\
ôҪȡ\  \
<ȡ/@lingqiyu>\
<˳/@exit>\

[@lingqiyu]
#IF
CHECKNAMELIST ..\QuestDiary\ļ\ÿ.txt
#ACT
MESSAGEBOX Ѿȡˣ
CLOSE
#ELSEACT
GOTO @ȡ

[@ȡ]
#IF
NOT CHECKNAMEDATETIMELIST ..\QuestDiary\Աϵͳ\¿Ա.txt 1 S$ʱ N$ N$Сʱ N$
#ACT
MESSAGEBOX ֻ¿ûȡ
CLOSE
BREAK

#IF
CheckMirrorMap <$USERNAME>
CHECKNAMEDATETIMELIST ..\QuestDiary\Աϵͳ\¿Ա.txt 1 S$ʱ N$ N$Сʱ N$
NOT CHECKNAMELIST ..\QuestDiary\ļ\ÿ.txt
#ACT
DELMIRRORMAP <$USERNAME>
GetRandomText ..\QuestDiary\ļ\.txt <$STR(S9)>
ADDNAMELIST ..\QuestDiary\ļ\ÿ.txt
ADDMIRRORMAP DM002 <$USERNAME>  3600 0 0
Param1 <$USERNAME>
Param2 17
Param3 18
MonGen <$STR(S9)> 1
MAPMOVE <$USERNAME> 8 28
SENDMSG 1 <$USERNAME>ͼ
CLOSE
#ELSEACT
GetRandomText ..\QuestDiary\ļ\.txt <$STR(S9)>
ADDNAMELIST ..\QuestDiary\ļ\ÿ.txt
ADDMIRRORMAP DM002 <$USERNAME>  3600 0 0
Param1 <$USERNAME>
Param2 17
Param3 18
MonGen <$STR(S9)> 1
MAPMOVE <$USERNAME> 8 28
SENDMSG 1 <$USERNAME>ͼ
CLOSE
BREAK

}