;;;QQ:67762207=
[@main]
#IF
Checkcmd CHECKMAPFLAG SPARAM1
#IF
#ACT
mov 锁妖下一层 %A9


#IF
Checkcmd CHECKMAPFLAG NPARAM1
#IF
#ACT
mov 锁妖层数 %P9
INC 锁妖层数 1
formatstr "%s,%s,'%s'" %锁妖日期,%锁妖层数,%锁妖下一层
actcmd WRITESQL "TBL_SCRIPTQUEST" "锁妖时间,锁妖层数,锁妖地图" %A9


#IF
!EQUAL 锁妖下一层 "1"
!EQUAL 锁妖下一层 ""
#ACT
mov 锁妖倒计时 30
mov 锁妖已完成 0
delaygoto [local] 1 @AGotoNextCount
break
#SAY
{FCOLOR/10}<$USERNAME>{FCOLOR/12}，{FCOLOR/1}<$OUTPUT(锁妖倒计时)>{FCOLOR/12} 秒后您将被传到下一层..\\
{FCOLOR/1}快点去收拾家当哦!{FCOLOR/12}\

#IF
EQUAL 锁妖下一层 ""
#ACT
formatstr "var '锁妖下一层' is null ,当前地图 %s 角色 %S" %usermap %username
actcmd ADDEIMEMOLOG %A9
breaktimerecall
mapmove 1 403 124
break
#SAY
地图错误,离开锁妖禁地.\\

#IF
EQUAL 锁妖下一层 "1"
#ELSEACT
break



#IF
checkmonmap "%USERMAP" 1 邪恶堕落者
or checkmonmap "%USERMAP" 1 邪恶复仇者
or checkmonmap "%USERMAP" 1 邪恶唤雷者
or checkmonmap "%USERMAP" 1 邪恶镇魂者
or checkmonmap "%USERMAP" 1 邪恶审判者
or checkmonmap "%USERMAP" 1 邪恶守望者
or checkmonmap "%USERMAP" 1 邪恶惩戒者
#ACT
sysmsg "还有怪物没有消灭完毕,请尽快消灭其他BOSS."
break

#ELSEACT
give 封魔石 2
give 天罡石 1
give 金币 100000
actcmd giveexpex 5000000
actcmd setfame + 100
lineMsg [Grobal] "一位伟大的勇士'<$USERNAME>'成功通过锁妖禁地的重重考验"
sysmsg "恭喜您'<$USERNAME>'，获得了2块封魔石 + 1块天罡石 + 100声望 + 10W金币！"
mov 锁妖已完成 1
mov 锁妖倒计时 30
formatstr "%s,%s,''" %锁妖日期,%锁妖层数
actcmd WRITESQL  "TBL_SCRIPTQUEST" "锁妖时间,锁妖层数,锁妖地图" %A9
delaygoto [local] 1 @AGotoNextCount
#ELSESAY
{FCOLOR/10}<$USERNAME>{FCOLOR/12} 恭喜你挑战成功\\
系统将奖励你 {FCOLOR/10}2块{FCOLOR/12} 封魔石和 1块天罡石 100声望 {FCOLOR/10}10W金币{FCOLOR/12}\\


[@AGotoNextCount]
#IF
small 锁妖倒计时 1
#ACT
goto @AGotoNext
#ELSEACT
SYSMSG "还剩下<$OUTPUT(锁妖倒计时)>秒!"
DEC 锁妖倒计时 1
delaygoto [local] 1 @AGotoNextCount


[@AGotoNext]
#IF
Checkcmd CHECKMAPFLAG SPARAM2
#IF
#ACT
mov 锁妖地图名称 %A9

#IF
!EQUAL 锁妖地图名称 "锁妖禁地"
#ACT
mov 锁妖下一层 ""
breaktimerecall
mapmove 1 403 124
break

#SAY
对不起，因为您已经意外离开锁妖禁地，系统将您移送至安全区。\\
<关闭/@exit>

#IF
Checkcmd CHECKMAPFLAG NPARAM2
#IF
#ACT
mov 回城坐标X %P9

#IF
Checkcmd CHECKMAPFLAG NPARAM3
#IF
#ACT
mov 回城坐标Y %P9

#IF
EQUAL 锁妖已完成 1
#ACT
mapmove %锁妖下一层 %回城坐标X %回城坐标Y
SYSMSG "恭喜您完成锁妖禁地挑战,祝您游戏愉快!"
break


#IF
EQUAL 锁妖已完成 0
checkcmd CHECKUSERJF 8
#ACT
actcmd giveexpex 5000000
actcmd SETUSERJF - 8 锁妖
map %锁妖下一层
SysMsg  "进入锁妖禁地第<$OUTPUT(锁妖层数)>层,祝您好运.！"
#ELSEACT
mapmove 1 403 124
mov 锁妖下一层 ""
sysmsg "积分不足进入下一层，移置安全区"
;;;QQ:67762207=