传奇脚本传奇s(2012-6-2)f摇骰子闯天关任务脚★本

在这里为大家介绍一下传闯天关任务脚本的制作方法，大家要注意的是我们的这个闯天关任务脚本还加入了摇骰子的功能，只有当玩家摇出的骰子数为下一关的数字时才能进入下一关，如果摇出的骰子数不对那么系统会自动刷出一定数量的怪物，我们这里是以30个冥界乌龟为例的，大家可以根据自己服务器的不同情况，作出不同的修改。接下来我们一起来看看这个脚本是怎样实现这些功能的
[@main]
#IF
#SAY
<$USERNAME>：玩过飞行棋吗？如果没有我今天陪你玩玩！！\
这里刷的怪爆出来的都是练就【蟠桃】的神秘物品！\
我想你应当听说过吃了蟠桃可以长生不老吧!\
你运气真好！在这里不但可以获得这些材料！还有我陪你玩飞行棋\
如果你赢了我可以带你去见传奇一条龙祖玛王\
相信你见到它以后还会来找我的……\
<提示：有五层，但我只,能带你去下一层！>\
不听你罗嗦.<带你去二层/@main1>我劝你还是放弃吧!<回土/@回土城>
[@回土城]
#IF
#ACT
mapmove 3 330 330
[@main1]
#IF
CheckMonMap GA2a 1
#SAY
地图里的怪还没有清干净呢，清完再来吧!!!\
<好的/@exit>
#ELSESAY
fuck  jep......fuck  jep......\
fuck  jep......fuck  jep......\
杀了那么多人你怕不怕？ \
沾了血的手你洗了吗？ \
进入下一层条件：摇奖点数必须为：②\
提示：获得奖励1000W经验值!\ \
再罗嗦.连你一起杀!!<开始摇奖/@开始摇奖> <回土/@回土城>
[@开始摇奖]
#IF
CheckMonMap GA2a 1
#SAY
sf一条龙地图里的怪还没有清干净呢，清完再来吧!!!\
#ACT
break
#IF
#SAY
现在开始，请仔细观注骰子的点数。\ \
#ACT
movr d0 6
inc d0 1
playdice 1 @运行骰子
[@运行骰子]
#IF
equal d0 1
#SAY
你这次摇奖的点数是 <①> 点。\
不能进入下一关，谢谢您参与。 \
系统自动刷出30个冥界乌龟！！！ \ \
<我要清理怪物/@exit>
#ACT
mov d0 0
Param1 GA2a
Param2 20
Param3 20
MonGen 冥界乌龟 30 30
SENDMSG 6 提示：消灭所有冥界乌龟才能进行摇奖...
break
#IF
equal d0 2
#SAY
你这次摇奖的点数是 <②> 点。\
恭喜您！顺利通过传奇sf一条龙第一关，系统奖励您1000W经验。 \
这里是天关二层，先清理怪物把！\
玛法之神等待您的好消息！\
#ACT
mov d0 0
mapmove GA2b
CHANGEEXP + 10000000
Param1 GA2b
Param2 20
Param3 20
MonGen 冥界乌龟 30 30
SENDMSG 6 提示：消灭所有冥界乌龟才能进行摇奖...
SENDMSG 1 来自『<$SERVERNAME>』的〖%s〗顺利闯过了天关任务第一关，获得1000W经验!!!
break
#IF
equal d0 3
#SAY
你这次摇奖的点数是 <③> 点。\
不能进入下一关，谢谢您参与。 \
系统自动刷出30冥界乌龟！！！ \ \
<我要清理怪物/@exit>
#ACT
mov d0 0
Param1 GA2A
Param2 20
Param3 20
MonGen 冥界乌龟 30 30
SENDMSG 6 提示：消灭所有冥界乌龟才能进行摇奖...
break
#IF
equal d0 4
#SAY
你这次摇奖的点数是 <④> 点。\
不能进入下一关，谢谢您参与。 \
系统自动刷出30个冥界乌龟！！！ \ \
<我要清理怪物/@exit>
#ACT
mov d0 0
Param1 GA2a
Param2 20
Param3 20
MonGen 冥界乌龟 30 30
SENDMSG 6 提示：消灭所有冥界乌龟才能进行摇奖...
break
#IF
equal d0 5
#SAY
你这次摇奖的点数是 <⑤> 点。\
不能进入下一关，谢谢您参与。 \
系统自动刷出30个冥界乌龟！！！ \ \
<我要清理怪物/@exit>
#ACT
mov d0 0
Param1 GA2a
Param2 20
Param3 20
MonGen 冥界乌龟 30 30
SENDMSG 6 提示：消灭所有冥界乌龟才能进行摇奖...
break
#IF
equal d0 6
#SAY
你这次摇奖的点数是 <⑥> 点。\
不能进入下一关，谢谢您参与。 \
系统自动刷出30个冥界乌龟！！！ \ \
<我要清理怪物/@exit>
#ACT
mov d0 0
Param1 GA2a
Param2 20
Param3 20
MonGen 冥界乌龟 30 30
SENDMSG 6 提示：消灭所有冥界乌龟才能进行摇奖...
break
更多的技术、脚本、传奇一条龙技术文章、免费传奇服务端下载尽在 !

今天上网不回帖，回帖就回精华帖！

信楼主，得永生！

楼主看起来很有学问！

经典，收藏了！

楼主会死的很有节奏的！

视死如归的架势啊！

东方不败还是灭绝师太啊？

看了这么多帖子，第一次看到这么经典的！

怪事年年有，今年特别多！