[@main]
#IF
#SAY
ԶĺСͻȻ˴ĹԵĻȥ\
һ\
Ѷȣ\
ˡþ顢ʿʬ\
ááսսʿɽ\
\ \
\ \
\ \
<ҽ/@Mirror1>

[@Mirror1]
;ͼΪɸͼ
#IF
EQUAL <$HUMAN(1)> ""
#ACT
RandomStr 8 S0
CalcVar HUMAN 1 = <$STR(S0)>

;
#IF
NOT CHECKMAP <$HUMAN(1)>
#ACT
SaveVar HUMAN 1 ..\QuestDiary\vkdfkc\\1.txt
MirrorMap G <$HUMAN(1)> С 340 0 @С˴ @Сȫ崥
NPCGEN <$HUMAN(1)> 50 50 Ա 6 ϵͳ\1 0 1
MonGenByFile <$HUMAN(1)> ..\QuestDiary\vkdfkc\ϵͳ\һˢ.txt
;
CALCVAR HUMAN Сɱһ = 0
SAVEVAR HUMAN Сɱһ ..\QuestDiary\vkdfkc\\\Сɱ.txt
CALCVAR HUMAN Сɱֶ = 0
SAVEVAR HUMAN Сɱֶ ..\QuestDiary\vkdfkc\\\Сɱ.txt
CALCVAR HUMAN Сɱ = 0
SAVEVAR HUMAN Сɱ ..\QuestDiary\vkdfkc\\\Сɱ.txt
;JSű
JSCall "" HBXD_AssignTask
SET [6999] 1
OPENMISSION 2 @Сħ

;ͼȷͼˣִ̱֮ɾͼѾˣ⼸ܰ
;ֲϵ Դ ˲ ʱ䲻
#OR
NOT IsThisMirror <$HUMAN(1)> G 1
NOT CheckMirrorOwner <$HUMAN(1)> <$USERNAME>
CHECKMIRRORTIME <$HUMAN(1)> > 341
CHECKMIRRORTIME <$HUMAN(1)> < 41
#ACT
RandomStr 8 S0
CalcVar HUMAN 1 = ""
goto @Mirror1
BREAK
#ELSEACT
MAPMOVE <$HUMAN(1)>
MOV D0 <$CURMIRRORMAPTIME>
DEC D0 41

#IF
LARGE D0 0
#ACT
SENDTIMEMSG ǰʣ%s... <$STR(D0)> 251 @0 1
SENDMSG 5 ţ<$HUMAN(1)>
BREAK
#ELSESAY
ȴУԺ\
