活动闯关脚本

[@main]
#IF
large I29 0
checkmonmap $M 1
CHECKMAPNAME CM002
#ACT
break
#SAY
时间只剩{Color=red <$STR(I29)>}秒！\
\
<知道了/@exit>

#IF
large I29 0
CHECKMAPNAME CM002
#ACT
break
#SAY
恭喜你成的无限制了群魔之阵，你想现在就通过下一关吗？\
\
\
<确定/@可进第三关>

#IF
large I30 0
checkmonmap $M 1
CHECKMAPNAME CM012
#ACT
break
#SAY
时间只剩{Color=red <$STR(I30)>}秒！\
\
<知道了/@exit>

#IF
large I30 0
CHECKMAPNAME CM012
#ACT
break
#SAY
恭喜你成的无限制了群魔之阵，你想现在就通过下一关吗？\
\
\
<确定/@可进第三关>

#IF
large I31 0
checkmonmap $M 1
CHECKMAPNAME CM022
#ACT
break
#SAY
时间只剩{Color=red <$STR(I31)>}秒！\
\
<知道了/@exit>

#IF
large I31 0
CHECKMAPNAME CM022
#ACT
break
#SAY
恭喜你成的无限制了群魔之阵，你想现在就通过下一关吗？\
\
\
<确定/@可进第三关>

#IF
large I32 0
checkmonmap $M 1
CHECKMAPNAME CM032
#ACT
break
#SAY
时间只剩{Color=red <$STR(I32)>}秒！\
\
<知道了/@exit>

#IF
large I32 0
CHECKMAPNAME CM032
#ACT
break
#SAY
恭喜你成的无限制了群魔之阵，你想现在就通过下一关吗？\
\
\
<确定/@可进第三关>

#IF
large I33 0
checkmonmap $M 1
CHECKMAPNAME CM042
#ACT
break
#SAY
时间只剩{Color=red <$STR(I33)>}秒！\
\
<知道了/@exit>

#IF
large I33 0
CHECKMAPNAME CM042
#ACT
break
#SAY
恭喜你成的无限制了群魔之阵，你想现在就通过下一关吗？\
\
\
<确定/@可进第三关>
#ELSESAY
;跟盛大对话不一样
十分钟已经过去了，你们没有通过这关的考验，请回吧。\
\
<回土城/@回土城>\
<回中州/@回中州>

[@回土城]
#ACT
mapmove 2 219 441

[@回中州]
#ACT
mapmove 0 470 225

[@可进第三关]
#IF
CHECKMAPNAME CM002
#ACT
mov A13 CM002
mov A14 CM003
goto @可进第三关1
break

#IF
CHECKMAPNAME CM012
#ACT
mov A13 CM012
mov A14 CM013
goto @可进第三关1
break

#IF
CHECKMAPNAME CM022
#ACT
mov A13 CM022
mov A14 CM023
goto @可进第三关1
break

#IF
CHECKMAPNAME CM032
#ACT
mov A13 CM032
mov A14 CM033
goto @可进第三关1
break

#IF
CHECKMAPNAME CM042
#ACT
mov A13 CM042
mov A14 CM043
goto @可进第三关1
break

[@可进第三关1]
#IF
random 1
#ACT
CLEARMAPMON $STR(A14)
CLEARMAPBODY $STR(A14)
CLEARMAPITEM $STR(A14)
MONGENEX $STR(A14) 94 88 僵尸1 10 3
MONGENEX $STR(A14) 94 88 红蛇妖 10 3
MONGENEX $STR(A14) 94 88 血魔 10 3
MONGENEX $STR(A14) 94 88 毒妖 10 3
MONGENEX $STR(A14) 94 88 藤妖 10 3
MONGENEX $STR(A14) 94 88 逆魔弓箭手 10 3
MONGENEX $STR(A14) 94 88 逆魔卫士 10 3
MONGENEX $STR(A14) 94 88 逆魔卫士250 10 1
MONGENEX $STR(A14) 94 88 僵尸250 10 1
MONGENEX $STR(A14) 94 88 红蛇妖250 10 1
MONGENEX $STR(A14) 94 88 毒妖250 10 1
MONGENEX $STR(A14) 94 88 僵尸251 10 1
MONGENEX $STR(A14) 94 88 红蛇妖251 10 1
MONGENEX $STR(A14) 94 88 毒妖251 10 1
MONGENEX $STR(A14) 94 88 逆魔卫士251 10 1

MONGENEX $STR(A14) 92 36 地狱兽弓箭手 10 2
MONGENEX $STR(A14) 92 36 兽骑兵 10 2
MONGENEX $STR(A14) 92 36 僵尸1 10 2
MONGENEX $STR(A14) 92 36 红蛇妖 10 2
MONGENEX $STR(A14) 92 36 血魔 10 2
MONGENEX $STR(A14) 92 36 毒妖 10 2
MONGENEX $STR(A14) 92 36 逆魔卫士 10 2
MONGENEX $STR(A14) 92 36 僵尸250 10 1
MONGENEX $STR(A14) 92 36 红蛇妖250 10 1
MONGENEX $STR(A14) 92 36 毒妖250 10 1
MONGENEX $STR(A14) 92 36 僵尸251 10 1
MONGENEX $STR(A14) 92 36 红蛇妖251 10 1
MONGENEX $STR(A14) 92 36 毒妖251 10 1

MONGENEX $STR(A14) 61 39 地狱兽弓箭手 10 2
MONGENEX $STR(A14) 61 39 兽骑兵 10 2
MONGENEX $STR(A14) 61 39 僵尸1 10 2
MONGENEX $STR(A14) 61 39 红蛇妖 10 2
MONGENEX $STR(A14) 61 39 血魔 10 2
MONGENEX $STR(A14) 61 39 毒妖 10 2
MONGENEX $STR(A14) 61 39 逆魔卫士 10 2
MONGENEX $STR(A14) 61 39 僵尸250 10 1
MONGENEX $STR(A14) 61 39 红蛇妖250 10 1
MONGENEX $STR(A14) 61 39 毒妖250 10 1
MONGENEX $STR(A14) 61 39 僵尸251 10 1
MONGENEX $STR(A14) 61 39 红蛇妖251 10 1
MONGENEX $STR(A14) 61 39 毒妖251 10 1

MONGENEX $STR(A14) 26 43 僵尸1 10 2
MONGENEX $STR(A14) 26 43 红蛇妖 10 2
MONGENEX $STR(A14) 26 43 血魔 10 2
MONGENEX $STR(A14) 26 43 毒妖 10 2
MONGENEX $STR(A14) 26 43 逆魔卫士 10 2
MONGENEX $STR(A14) 26 43 僵尸250 10 1
MONGENEX $STR(A14) 26 43 红蛇妖250 10 1
MONGENEX $STR(A14) 26 43 毒妖250 10 1
MONGENEX $STR(A14) 26 43 僵尸251 10 1
MONGENEX $STR(A14) 26 43 红蛇妖251 10 1
MONGENEX $STR(A14) 26 43 毒妖251 10 1

MONGENEX $STR(A14) 109 90 魔眼 0 1
MONGENEX $STR(A14) 98 92 魔眼 0 1
MONGENEX $STR(A14) 109 97 魔眼 0 1
MONGENEX $STR(A14) 106 100 魔眼 0 1
MONGENEX $STR(A14) 90 84 魔眼 0 1
MONGENEX $STR(A14) 98 93 魔眼 0 1

MONGENEX $STR(A14) 62 36 烈焰使 5 1
MONGENEX $STR(A14) 31 45 幽影武士 3 1
mapmove $STR(A14) 108 96
take 黑暗钥匙 66
DelayCall 1 @点香 $HUMAN(点香记时)
goto @第三关提示

#IF
!equal $USERNAME $GROUPMEMBER(0)
CheckOnline $GROUPMEMBER(0)
CHECKMAPNAME $STR(A13)
#ACT
$GROUPMEMBER(0).mapmove $STR(A14) 108 96
$GROUPMEMBER(0).DelayCall 1 @点香 $HUMAN(点香记时)
$GROUPMEMBER(0).goto @第三关提示
$GROUPMEMBER(0).take 黑暗钥匙 66

#IF
!equal $USERNAME $GROUPMEMBER(1)
CheckOnline $GROUPMEMBER(1)
CHECKMAPNAME $STR(A13)
#ACT
$GROUPMEMBER(1).mapmove $STR(A14) 108 96
$GROUPMEMBER(1).DelayCall 1 @点香 $HUMAN(点香记时)
$GROUPMEMBER(1).goto @第三关提示
$GROUPMEMBER(1).take 黑暗钥匙 66

#IF
!equal $USERNAME $GROUPMEMBER(2)
CheckOnline $GROUPMEMBER(2)
CHECKMAPNAME $STR(A13)
#ACT
$GROUPMEMBER(2).mapmove $STR(A14) 108 96
$GROUPMEMBER(2).DelayCall 1 @点香 $HUMAN(点香记时)
$GROUPMEMBER(2).goto @第三关提示
$GROUPMEMBER(2).take 黑暗钥匙 66

#IF
!equal $USERNAME $GROUPMEMBER(3)
CheckOnline $GROUPMEMBER(3)
CHECKMAPNAME $STR(A13)
#ACT
$GROUPMEMBER(3).mapmove $STR(A14) 108 96
$GROUPMEMBER(3).DelayCall 1 @点香 $HUMAN(点香记时)
$GROUPMEMBER(3).goto @第三关提示
$GROUPMEMBER(3).take 黑暗钥匙 66

#IF
!equal $USERNAME $GROUPMEMBER(4)
CheckOnline $GROUPMEMBER(4)
CHECKMAPNAME $STR(A13)
#ACT
$GROUPMEMBER(4).mapmove $STR(A14) 108 96
$GROUPMEMBER(4).DelayCall 1 @点香 $HUMAN(点香记时)
$GROUPMEMBER(4).goto @第三关提示
$GROUPMEMBER(4).take 黑暗钥匙 66

#IF
!equal $USERNAME $GROUPMEMBER(5)
CheckOnline $GROUPMEMBER(5)
CHECKMAPNAME $STR(A13)
#ACT
$GROUPMEMBER(5).mapmove $STR(A14) 108 96
$GROUPMEMBER(5).DelayCall 1 @点香 $HUMAN(点香记时)
$GROUPMEMBER(5).goto @第三关提示
$GROUPMEMBER(5).take 黑暗钥匙 66

#IF
!equal $USERNAME $GROUPMEMBER(6)
CheckOnline $GROUPMEMBER(6)
CHECKMAPNAME $STR(A13)
#ACT
$GROUPMEMBER(6).mapmove $STR(A14) 108 96
$GROUPMEMBER(6).DelayCall 1 @点香 $HUMAN(点香记时)
$GROUPMEMBER(6).goto @第三关提示
$GROUPMEMBER(6).take 黑暗钥匙 66

#IF
!equal $USERNAME $GROUPMEMBER(7)
CheckOnline $GROUPMEMBER(7)
CHECKMAPNAME $STR(A13)
#ACT
$GROUPMEMBER(7).mapmove $STR(A14) 108 96
$GROUPMEMBER(7).DelayCall 1 @点香 $HUMAN(点香记时)
$GROUPMEMBER(7).goto @第三关提示
$GROUPMEMBER(7).take 黑暗钥匙 66

#IF
!equal $USERNAME $GROUPMEMBER(8)
CheckOnline $GROUPMEMBER(8)
CHECKMAPNAME $STR(A13)
#ACT
$GROUPMEMBER(8).mapmove $STR(A14) 108 96
$GROUPMEMBER(8).DelayCall 1 @点香 $HUMAN(点香记时)
$GROUPMEMBER(8).goto @第三关提示
$GROUPMEMBER(8).take 黑暗钥匙 66

#IF
!equal $USERNAME $GROUPMEMBER(9)
CheckOnline $GROUPMEMBER(9)
CHECKMAPNAME $STR(A13)
#ACT
$GROUPMEMBER(9).mapmove $STR(A14) 108 96
$GROUPMEMBER(9).DelayCall 1 @点香 $HUMAN(点香记时)
$GROUPMEMBER(9).goto @第三关提示
$GROUPMEMBER(9).take 黑暗钥匙 66

#IF
!equal $USERNAME $GROUPMEMBER(10)
CheckOnline $GROUPMEMBER(10)
CHECKMAPNAME $STR(A13)
#ACT
$GROUPMEMBER(10).mapmove $STR(A14) 108 96
$GROUPMEMBER(10).DelayCall 1 @点香 $HUMAN(点香记时)
$GROUPMEMBER(10).goto @第三关提示
$GROUPMEMBER(10).take 黑暗钥匙 66

[@第三关提示]
看来我太小看你们了。下一关是狭长而又昏暗的悠长石径里\
面暗藏着巧妙的玄机，你需要从地图中寻找出无限制此关的特\
殊道具。快去摸索吧！\
\
\
<确定/@exit>

[@点香]
#IF
CHECKMAPNAME CM003
#ACT
CALCVAR HUMAN 点香记时 - 1
SETTIMER $HUMAN(点香记时)

#IF
CHECKMAPNAME CM013
#ACT
CALCVAR HUMAN 点香记时 - 1
SETTIMER $HUMAN(点香记时)

#IF
CHECKMAPNAME CM023
#ACT
CALCVAR HUMAN 点香记时 - 1
SETTIMER $HUMAN(点香记时)

#IF
CHECKMAPNAME CM033
#ACT
CALCVAR HUMAN 点香记时 - 1
SETTIMER $HUMAN(点香记时)

#IF
CHECKMAPNAME CM043
#ACT
CALCVAR HUMAN 点香记时 - 1
SETTIMER $HUMAN(点香记时)

#IF
CHECKVAR HUMAN 点香记时 = 0
#CALL [\游戏功能\综合功能.txt] @返回热砂