找回密码
 立即注册

[其他] 传世新编追杀僵尸任务脚本分享

[复制链接]
antyvfl 发表于 2022-10-9 00:32:39 | 显示全部楼层 |阅读模式
;房间状况 0 发起者准备 1 已经发起挑战赛 2 比赛开始

[@挑战千尸殿]
{
#IF
!checkhum BX052 2
equal I10 1
#ACT
mapmove BX052 28 33
goto @进入
break

#IF
!checkhum BX053 2
equal I11 1
#ACT
mapmove BX053
goto @进入
break

#IF
!checkhum BX054 2
equal I12 1
#ACT
mapmove BX054 28 33
goto @进入
break

#IF
!checkhum BX055 2
equal I13 1
#ACT
mapmove BX055 28 33
goto @进入
break

#IF
!checkhum BX056 2
equal I14 1
#ACT
mapmove BX056 28 33
goto @进入
break

#IF
!checkhum BX057 2
equal I15 1
#ACT
mapmove BX057 28 33
goto @进入
break

#IF
!checkhum BX058 2
equal I16 1
#ACT
mapmove BX058 28 33
goto @进入
break

#IF
!checkhum BX059 2
equal I17 1
#ACT
mapmove BX059 28 33
goto @进入
break

#IF
!checkhum BX060 2
equal I18 1
#ACT
mapmove BX060 28 33
goto @进入
break

#IF
!checkhum BX061 2
equal I19 1
#ACT
mapmove BX061 28 33
goto @进入
break
#ELSESAY
地图已满人,请稍后参加。\
\
\
<离开/@exit>

[@进入]
#ACT
mov S21 准备者
mov D0 0
mov S12 $M
SENDMSG 5 你现在即将进入千尸殿,应战追杀僵尸竞赛!
DelayGoto 180000 @返回海岛

[@返回海岛]
#IF
CHECKMAPNAME BX052
equal I10 1
#ACT
Gmexecute 全服触发 @千尸殿
break

#IF
CHECKMAPNAME BX053
equal I11 1
#ACT
Gmexecute 全服触发 @千尸殿
break

#IF
CHECKMAPNAME BX054
equal I13 1
#ACT
Gmexecute 全服触发 @千尸殿
break

#IF
CHECKMAPNAME BX055
equal I14 1
#ACT
Gmexecute 全服触发 @千尸殿
break

#IF
CHECKMAPNAME BX056
equal I15 1
#ACT
Gmexecute 全服触发 @千尸殿
break

#IF
CHECKMAPNAME BX057
equal I16 1
#ACT
Gmexecute 全服触发 @千尸殿
break

#IF
CHECKMAPNAME BX058
equal I17 1
#ACT
Gmexecute 全服触发 @千尸殿
break

#IF
CHECKMAPNAME BX059
equal I18 1
#ACT
Gmexecute 全服触发 @千尸殿
break

#IF
CHECKMAPNAME BX060
equal I19 1
#ACT
Gmexecute 全服触发 @千尸殿
break

#IF
CHECKMAPNAME BX061
equal I20 1
#ACT
Gmexecute 全服触发 @千尸殿
break
}

[@茅山道士]
{
你好,这里是追杀僵尸竞赛,规则:第1人发起挑战,在3分\
钟内第2人应战,才能开赛,超过3分钟无人应战,则发起挑\
战者自动获胜。比赛时间3 分钟,斩杀僵尸数量多的勇士获\
胜,数量相同则发起者获胜,胜者奖励1 点武馆积分,10\
点极品修炼值。请注意,比赛  3分钟满的时候,会有卫士出\
现;另外,僵尸隐藏在地下,要仔细的找。准备好了吗?\
<发起挑战/@发起挑战>        <接受挑战/@接受挑战>\
<查看杀怪个数/@查看杀怪个数>    <领取获胜奖励/@领取获胜奖励>\
<等等/@exit>

[@查看杀怪个数]
#ACT
SENDMSG 5 当前你杀死僵尸的数量为:<$STR(D0)>
close

[@发起挑战]
#IF
equal S21
#CALL [\游戏任务\精密宝箱\追杀僵尸.txt] @房间状况记录
#ACT
mov S21 发起者
SENDMSG 14 勇士%s在千尸殿发起了追杀僵尸竞赛,欢迎大家通过炼狱魔境的锁匠进场应战,胜者奖励武馆积分1点和精密宝箱(二)1个!
DelayCall 180 @发起3分钟后
break
#SAY
你已经发起了挑战赛,请等待其他人来应站;如果3 分钟之内\
没有人应战,你将自动获得胜利!\
\
<知道了/@exit>

#IF
equal S21 准备者
#SAY
对不起,你是来接受挑战的,没有资格发起挑战!\
\
<知道了/@exit>
#ELSESAY
对不起,你已经发起过一次挑战赛了,你不能连续发起比赛\
!另外,如果你已经获胜,别忘记找我领奖。\
\
<知道了/@exit>

[@发起3分钟后]
#IF
!checkhum BX052 2
CHECKMAPNAME BX052
equal I10 1
#ACT
goto @千尸领奖
break

#IF
!checkhum BX053 2
CHECKMAPNAME BX053
equal I11 1
#ACT
goto @千尸领奖
break

#IF
!checkhum BX054 2
CHECKMAPNAME BX054
equal I12 1
#ACT
goto @千尸领奖
break

#IF
!checkhum BX055 2
CHECKMAPNAME BX055
equal I13 1
#ACT
goto @千尸领奖
break

#IF
!checkhum BX056 2
CHECKMAPNAME BX056
equal I14 1
#ACT
goto @千尸领奖
break

#IF
!checkhum BX057 2
CHECKMAPNAME BX057
equal I15 1
#ACT
goto @千尸领奖
break


#IF
!checkhum BX058 2
CHECKMAPNAME BX058
equal I16 1
#ACT
goto @千尸领奖
break

#IF
!checkhum BX059 2
CHECKMAPNAME BX059
equal I17 1
#ACT
goto @千尸领奖
break


#IF
!checkhum BX060 2
CHECKMAPNAME BX060
equal I18 1
#ACT
goto @千尸领奖
break

#IF
!checkhum BX061 2
CHECKMAPNAME BX061
equal I19 1
#ACT
goto @千尸领奖
break

[@接受挑战]
#IF
equal S21 准备者
#CALL [\游戏任务\精密宝箱\追杀僵尸.txt] @房间状况记录
#ACT
mov S21 挑战者
SENDMSG 5 比赛已经开始了,3分钟内斩杀僵尸数量多者获胜,请加油哦!
MONGENEX $M 26 31 僵尸9 20 20
DelayCall 30 @比赛进行 5
DelayCall 360 @比赛结束
close
break

#IF
equal S21 挑战者
#SAY
对不起,你已经应战成功,不能连续应战;如果你已经获胜\
,别忘记找我领奖!\
\
<知道了/@exit>
#ELSESAY
对不起,你是发起挑战者,你不能自己应战自己吧!\
\
<知道了/@exit>

[@比赛进行]
#IF
!checkmonmap BX052 40
CHECKMAPNAME BX052
#ACT
MONGENEX $M 26 31 僵尸9 20 20
break

#IF
!checkmonmap BX053 40
CHECKMAPNAME BX053
#ACT
MONGENEX $M 26 31 僵尸9 20 20
break

#IF
!checkmonmap BX054 40
CHECKMAPNAME BX054
#ACT
MONGENEX $M 26 31 僵尸9 20 20
break

#IF
!checkmonmap BX055 40
CHECKMAPNAME BX055
#ACT
MONGENEX $M 26 31 僵尸9 20 20
break

#IF
!checkmonmap BX056 40
CHECKMAPNAME BX056
#ACT
MONGENEX $M 26 31 僵尸9 20 20
break

#IF
!checkmonmap BX057 40
CHECKMAPNAME BX057
#ACT
MONGENEX $M 26 31 僵尸9 20 20
break

#IF
!checkmonmap BX058 40
CHECKMAPNAME BX058
#ACT
MONGENEX $M 26 31 僵尸9 20 20
break

#IF
!checkmonmap BX059 40
CHECKMAPNAME BX059
#ACT
MONGENEX $M 26 31 僵尸9 20 20
break

#IF
!checkmonmap BX060 40
CHECKMAPNAME BX060
#ACT
MONGENEX $M 26 31 僵尸9 20 20
break

#IF
!checkmonmap BX061 40
CHECKMAPNAME BX061
#ACT
MONGENEX $M 26 31 僵尸9 20 20
break

[@比赛结束]
#IF
CHECKMAPNAME $STR(S12)
#ACT
CLEARMAPMON $M
CLEARMAPBODY $M
CLEARMAPITEM $M
mov A16 $M
Gmexecute 全服触发 @千尸殿
break

[@领取获胜奖励]
#IF
CHECKMAPNAME BX052
equal I10 2
#ACT
goto @比赛中领取
break

#IF
CHECKMAPNAME BX053
equal I11 2
#ACT
goto @比赛中领取
break

#IF
CHECKMAPNAME BX054
equal I12 2
#ACT
goto @比赛中领取
break

#IF
CHECKMAPNAME BX055
equal I13 3
#ACT
goto @比赛中领取
break

#IF
CHECKMAPNAME BX056
equal I14 2
#ACT
goto @比赛中领取
break

#IF
CHECKMAPNAME BX057
equal I15 2
#ACT
goto @比赛中领取
break

#IF
CHECKMAPNAME BX058
equal I16 2
#ACT
goto @比赛中领取
break

#IF
CHECKMAPNAME BX059
equal I17 2
#ACT
goto @比赛中领取
break

#IF
CHECKMAPNAME BX060
equal I18 2
#ACT
goto @比赛中领取
break

#IF
CHECKMAPNAME BX061
equal I19 2
#ACT
goto @比赛中领取
break

#IF
CHECKMAPNAME BX052
equal I10 1
equal S21 发起者
checkhum BX052 2
#ACT
break
#SAY
应战者已经来了,如果他 3分钟内没有接受挑战,你将自动\
获胜,所以请耐心等待!\
\
<知道了/@Exit>

#IF
CHECKMAPNAME BX053
equal I11 1
equal S21 发起者
checkhum BX053 2
#ACT
break
#SAY
应战者已经来了,如果他 3分钟内没有接受挑战,你将自动\
获胜,所以请耐心等待!\
\
<知道了/@Exit>

#IF
CHECKMAPNAME BX054
equal I12 1
equal S21 发起者
checkhum BX054 2
#ACT
break
#SAY
应战者已经来了,如果他 3分钟内没有接受挑战,你将自动\
获胜,所以请耐心等待!\
\
<知道了/@Exit>

#IF
CHECKMAPNAME BX055
equal I13 1
equal S21 发起者
checkhum BX055 2
#ACT
break
#SAY
应战者已经来了,如果他 3分钟内没有接受挑战,你将自动\
获胜,所以请耐心等待!\
\
<知道了/@Exit>

#IF
CHECKMAPNAME BX056
equal I14 1
equal S21 发起者
checkhum BX056 2
#ACT
break
#SAY
应战者已经来了,如果他 3分钟内没有接受挑战,你将自动\
获胜,所以请耐心等待!\
\
<知道了/@Exit>

#IF
CHECKMAPNAME BX057
equal I15 1
equal S21 发起者
checkhum BX057 2
#ACT
break
#SAY
应战者已经来了,如果他 3分钟内没有接受挑战,你将自动\
获胜,所以请耐心等待!\
\
<知道了/@Exit>

#IF
CHECKMAPNAME BX058
equal I16 1
equal S21 发起者
checkhum BX058 2
#ACT
break
#SAY
应战者已经来了,如果他 3分钟内没有接受挑战,你将自动\
获胜,所以请耐心等待!\
\
<知道了/@Exit>

#IF
CHECKMAPNAME BX059
equal I17 1
equal S21 发起者
checkhum BX059 2
#ACT
break
#SAY
应战者已经来了,如果他 3分钟内没有接受挑战,你将自动\
获胜,所以请耐心等待!\
\
<知道了/@Exit>

#IF
CHECKMAPNAME BX060
equal I18 1
equal S21 发起者
checkhum BX060 2
#ACT
break
#SAY
应战者已经来了,如果他 3分钟内没有接受挑战,你将自动\
获胜,所以请耐心等待!\
\
<知道了/@Exit>

#IF
CHECKMAPNAME BX061
equal I19 1
equal S21 发起者
checkhum BX061 2
#ACT
break
#SAY
应战者已经来了,如果他 3分钟内没有接受挑战,你将自动\
获胜,所以请耐心等待!\
\
<知道了/@Exit>

#IF
CHECKMAPNAME BX052
equal I10 1
equal S21 发起者
#ACT
goto @发起者领取1
break

#IF
CHECKMAPNAME BX053
equal I11 1
equal S21 发起者
#ACT
goto @发起者领取1
break

#IF
CHECKMAPNAME BX054
equal I12 1
equal S21 发起者
#ACT
goto @发起者领取1
break

#IF
CHECKMAPNAME BX055
equal I13 1
equal S21 发起者
#ACT
goto @发起者领取1
break

#IF
CHECKMAPNAME BX056
equal I14 1
equal S21 发起者
#ACT
goto @发起者领取1
break

#IF
CHECKMAPNAME BX057
equal I15 1
equal S21 发起者
#ACT
goto @发起者领取1
break

#IF
CHECKMAPNAME BX058
equal I16 1
equal S21 发起者
#ACT
goto @发起者领取1
break

#IF
CHECKMAPNAME BX059
equal I17 1
equal S21 发起者
#ACT
goto @发起者领取1
break

#IF
CHECKMAPNAME BX060
equal I18 1
equal S21 发起者
#ACT
goto @发起者领取1
break

#IF
CHECKMAPNAME BX061
equal I19 1
equal S21 发起者
#ACT
goto @发起者领取1
break

#IF
CHECKMAPNAME BX052
equal I10 0
equal S21
#ACT
goto @发起者领取
break

#IF
CHECKMAPNAME BX053
equal I11 0
equal S21
#ACT
goto @发起者领取
break

#IF
CHECKMAPNAME BX054
equal I12 0
equal S21
#ACT
goto @发起者领取
break

#IF
CHECKMAPNAME BX055
equal I13 0
equal S21
#ACT
goto @发起者领取
break

#IF
CHECKMAPNAME BX056
equal I14 0
equal S21
#ACT
goto @发起者领取
break

#IF
CHECKMAPNAME BX057
equal I15 0
equal S21
#ACT
goto @发起者领取
break

#IF
CHECKMAPNAME BX058
equal I16 0
equal S21
#ACT
goto @发起者领取
break

#IF
CHECKMAPNAME BX059
equal I17 0
equal S21
#ACT
goto @发起者领取
break

#IF
CHECKMAPNAME BX060
equal I18 0
equal S21
#ACT
goto @发起者领取
break

#IF
CHECKMAPNAME BX061
equal I19 0
equal S21
#ACT
goto @发起者领取
break

#IF
CHECKMAPNAME BX052
equal I10 1
equal S21 准备者
#ACT
goto @准备者领取
break

#IF
CHECKMAPNAME BX053
equal I11 1
equal S21 准备者
#ACT
goto @准备者领取
break

#IF
CHECKMAPNAME BX054
equal I12 1
equal S21 准备者
#ACT
goto @准备者领取
break

#IF
CHECKMAPNAME BX055
equal I13 1
equal S21 准备者
#ACT
goto @准备者领取
break

#IF
CHECKMAPNAME BX056
equal I14 1
equal S21 准备者
#ACT
goto @准备者领取
break

#IF
CHECKMAPNAME BX057
equal I15 1
equal S21 准备者
#ACT
goto @准备者领取
break

#IF
CHECKMAPNAME BX058
equal I16 1
equal S21 准备者
#ACT
goto @准备者领取
break

#IF
CHECKMAPNAME BX059
equal I17 1
equal S21 准备者
#ACT
goto @准备者领取
break

#IF
CHECKMAPNAME BX060
equal I18 1
equal S21 准备者
#ACT
goto @准备者领取
break

#IF
CHECKMAPNAME BX061
equal I19 1
equal S21 准备者
#ACT
goto @准备者领取
break

[@发起者领取]
年轻人,做人要厚道;你还没有发起比赛,就来找我领奖,\
这可是欺诈行为!你先发起比赛吧。\
\
<知道了/@Exit>\

[@发起者领取1]
请耐心的等待!如果超过 3分钟还没有人来应战,你将自动\
获得胜利,到时候别忘记找我领奖!\
\
<知道了/@Exit>

[@准备者领取]
比赛还没开始呢!你必须先接受挑战,然后在竞赛中获得\
胜利,才有资格找我领取奖励!\
\
<知道了/@exit>

[@比赛中领取]
#IF
!checkhum BX052 2
CHECKMAPNAME BX052
#ACT
goto @千尸领奖
break

#IF
!checkhum BX053 2
CHECKMAPNAME BX053
#ACT
goto @千尸领奖
break

#IF
!checkhum BX054 2
CHECKMAPNAME BX054
#ACT
goto @千尸领奖
break

#IF
!checkhum BX055 2
CHECKMAPNAME BX055
#ACT
goto @千尸领奖
break

#IF
!checkhum BX056 2
CHECKMAPNAME BX056
#ACT
goto @千尸领奖
break

#IF
!checkhum BX057 2
CHECKMAPNAME BX057
#ACT
goto @千尸领奖
break

#IF
!checkhum BX058 2
CHECKMAPNAME BX058
#ACT
goto @千尸领奖
break

#IF
!checkhum BX059 2
CHECKMAPNAME BX059
#ACT
goto @千尸领奖
break

#IF
!checkhum BX060 2
CHECKMAPNAME BX060
#ACT
goto @千尸领奖
break

#IF
!checkhum BX061 2
CHECKMAPNAME BX061
#ACT
goto @千尸领奖
break
#ELSESAY
比赛还没有结束,请集中精神杀僵尸,否则你会在这场竞赛\
中失败的!\
\
<知道了/@Exit>

[@千尸领奖]
#IF
equal S21 挑战者
#ACT
give 武馆积分 1
give 极品值 10
give 精密宝箱(二) 1
mapmove MH001 113 85
SENDMSG 5 恭喜你通过了我的考验,如果你想得知宝箱的其中玄机就找西域奇境的锁匠(466,162)或魔境三层的锁匠(193,179)来帮你试试吧。
break
#SAY
恭喜你在追杀僵尸竞赛中获胜,你将赢得武馆积分1点,10点极\
品修炼值。再接再历,成为武馆的一代宗师不是梦!\
\
<离开/@exit>

#IF
equal S21 发起者
#CALL [\游戏任务\精密宝箱\奖励物品.txt] @过关
#ACT
SENDMSG 5 你现在的武馆积分是:<$ATTACHEPOINT>
#SAY
恭喜你在追杀僵尸竞赛中获胜,你将赢得武馆积分1点,10点极\
品修炼值。再接再历,成为武馆的一代宗师不是梦!\
\
<离开/@exit>
}

[@千尸殿计算]
{
#IF
CHECKMAPNAME $STR(A16) $M
equal S21 准备者
#ACT
goto @滚蛋
break

#IF
CHECKMAPNAME $STR(A16) $M
equal S21 挑战者
#ACT
mov I6 $STR(D0)

#IF
CHECKMAPNAME $STR(A16) $M
equal S21 发起者
#ACT
mov I7 $STR(D0)

#IF
large I6 $STR(I7)
CHECKMAPNAME $STR(A16) $M
equal S21 发起者
#ACT
goto @滚蛋
break

#IF
CHECKMAPNAME $STR(A16) $M
equal I6 $STR(I7)
equal S21 挑战者
#ACT
goto @滚蛋

#IF
CHECKMAPNAME $STR(A16) $M
equal S21 挑战者
#ACT
give 精密宝箱(二) 1
mapmove MH001 113 85
SENDMSG 5 恭喜你通过了我的考验,如果你想得知宝箱的其中玄机就找西域奇境的锁匠(466,162)或魔境三层的锁匠(193,179)来帮你试试吧。
SENDMSG 5 你现在的武馆积分是:<$ATTACHEPOINT>
break
#SAY
恭喜你在追杀僵尸竞赛中获胜,你将赢得武馆积分1点,10点极\
品修炼值。再接再历,成为武馆的一代宗师不是梦!\
\
<离开/@exit>

#IF
CHECKMAPNAME $STR(A16) $M
equal S21 发起者
#CALL [\游戏任务\精密宝箱\奖励物品.txt] @过关
#SAY
恭喜你在追杀僵尸竞赛中获胜,你将赢得武馆积分1点,10点极\
品修炼值。再接再历,成为武馆的一代宗师不是梦!\
\
<离开/@exit>

[@滚蛋]
#ACT
SENDMSG 5 对不起,你在比赛中输给了对方,请你离开吧!
mapmove MH001 113 85
#SAY
你在追杀僵尸竞赛中表现优异,很可惜,你的对手表现更加\
出色。不过我觉得你仅仅是运气差了点,加油吧,下次你肯\
定就是胜利者!\
\
<离开/@exit>
}

[@房间状况记录]
{
#IF
CHECKMAPNAME BX052
#ACT
inc I10 1
break

#IF
CHECKMAPNAME BX053
#ACT
inc I11 1
break

#IF
CHECKMAPNAME BX054
#ACT
inc I12 1
break

#IF
CHECKMAPNAME BX055
#ACT
inc I13 1
break

#IF
CHECKMAPNAME BX056
#ACT
inc I14 1
break

#IF
CHECKMAPNAME BX057
#ACT
inc I15 1
break

#IF
CHECKMAPNAME BX058
#ACT
inc I16 1
break

#IF
CHECKMAPNAME BX059
#ACT
inc I17 1
break

#IF
CHECKMAPNAME BX060
#ACT
inc I18 1
break

#IF
CHECKMAPNAME BX061
#ACT
inc I19 1
break
}

hisbee 发表于 2022-10-9 03:56:08 | 显示全部楼层
太生气了,无法HOLD啦 >_<......
回复

使用道具 举报

赵春辉1233321 发表于 2022-10-10 18:54:20 | 显示全部楼层
我只是路过打酱油的。
回复

使用道具 举报

逆之羽 发表于 2022-10-14 01:38:10 | 显示全部楼层
我只是路过打酱油的。
回复

使用道具 举报

za502 发表于 2022-10-15 05:02:21 | 显示全部楼层
淡定,淡定,淡定……
回复

使用道具 举报

295608944 发表于 2022-10-15 16:24:11 | 显示全部楼层
看到这帖子真是高兴!
回复

使用道具 举报

深圳的天空 发表于 2022-10-15 21:58:02 | 显示全部楼层
强烈支持楼主ing……
回复

使用道具 举报

vidrxua 发表于 2022-10-16 08:21:20 | 显示全部楼层
淡定,淡定,淡定……
回复

使用道具 举报

apple3302 发表于 2022-10-16 13:50:08 | 显示全部楼层
感恩无私的分享与奉献
回复

使用道具 举报

caiko 发表于 2022-10-17 04:21:11 | 显示全部楼层
激动人心,无法言表!
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

Archiver|手机版|小黑屋|游戏淘宝湾

GMT+8, 2024-12-4 01:14 , Processed in 0.076367 second(s), 53 queries .

Powered by Discuz! X3.5

Copyright © 2001-2024, Oddpp Cloud.

快速回复 返回顶部 返回列表