;;;QQ:67762207=
[@main]
#IF
Checkcmd CHECKMAPFLAG SPARAM1

#IF
#ACT
mov 夺宝下一层 %A9

#IF
Checkcmd CHECKMAPFLAG NPARAM1

#IF
#ACT
mov 夺宝层数 %P9
INC 夺宝层数 1

#IF
!EQUAL 夺宝下一层 "1"
!EQUAL 夺宝下一层 ""
#ACT
mov 夺宝倒计时 30
mov 夺宝已完成 0
formatstr "%s,%s,'%s'" %CURDAY,%夺宝层数,%夺宝下一层
actcmd WRITESQL "TBL_SCRIPTQUEST" "夺宝时间,夺宝层数,夺宝地图" %A9
delaygoto [local] 1 @GotoNextCount
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"
#ACT
give 封魔石 2
give 金币 100000
lineMsg [Grobal] "一位伟大的勇士'<$USERNAME>'成功通过8大教主的重重考验"
sysmsg "恭喜您'<$USERNAME>'，获得了2块封魔石 + 10W金币！"
mov 夺宝已完成 1
mov 夺宝倒计时 30
formatstr "%s,%s,''" %CURDAY,%夺宝层数
actcmd WRITESQL  "TBL_SCRIPTQUEST" "夺宝时间,夺宝层数,夺宝地图" %A9
delaygoto [local] 1 @GotoNextCount
break
#SAY
{FCOLOR/10}<$USERNAME>{FCOLOR/12} 恭喜你挑战成功\\
系统将奖励你 {FCOLOR/10}2块{FCOLOR/12} 封魔石和 {FCOLOR/10}10W金币{FCOLOR/12}\\


[@GotoNextCount]
#IF
SMALL 夺宝倒计时 1
#ACT
goto @GotoNext
#ELSEACT
SYSMSG "还剩下<$OUTPUT(夺宝倒计时)>秒!"
DEC 夺宝倒计时 1
delaygoto [local] 1 @GotoNextCount


[@GotoNext]
#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
mov 夺宝下一层 ""
breaktimerecall
SYSMSG "恭喜您完成夺宝进去,祝您游戏愉快!"

#ELSEACT
map %夺宝下一层
SysMsg  "进入夺宝禁区第<$OUTPUT(夺宝层数)>层,祝您好运.！"

;;;QQ:67762207=