翟乐然 发表于 2023-8-12 22:34:43

BLUE引擎传奇任务发布使者教程,热血合击传奇添加任务的脚本命令解析

[@Main]
#If
IsADMIN
#Say
<屠龙任务(收费)/@屠龙任务>\
#ElseSay
感谢所有玩家对《<$GLOBAL(游戏名称)>》的支持!即日起,\
玩家只需在我这里领取任务,完成后就可以获得丰富的奖励!\ \
<除魔任务(免费)/@除魔任务>   <除妖任务(免费)/@除妖任务>   <押镖任务(免费)/@押镖任务>\

[@押镖任务]
<COLOR=clSkyblue ╔┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╗>\
<COLOR=clSkyblue ┆><COLOR=clLime ☆震威镖局☆>      <[进入押镖之路]/@GOLB>      <COLOR=clLime ☆震威镖局☆><COLOR=clSkyblue ┆>\
<COLOR=clSkyblue ╚┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╝>\
<COLOR=clRed ①:押镖时间为每天的19点至20点,每人一天可接三次任务>\
<COLOR=clFuchsia ②:随机分配普通、高级、超级、无敌等镖车,奖励不一样>\
<COLOR=clRed ③:押镖途中下线或者任务超过15分钟视为失败,没收押金>\
<COLOR=clFuchsia ④:接受押镖任务需要200元宝做押金,完成后退回全部押金>\
<COLOR=clRed ⑤:押镖途中镖车被仇人损坏视为失败,仇人将获得100元宝>\
 <COLOR=clAqua ((请把镖车拉运到:押镖之路(二)的镖务总管处换取酬劳))>\

[@GOLB]
#IF
HOUR 19 19
MIN 0 60
#ACT
GOTO @GOLB~
break
#ELSEACT
MESSAGEBOX 每日押镖人物还末开放!\ \开放时间:每天晚上19点-20点间可以接受任务。
break
[@GOLB~]
#IF
CHECKLEVELEX > 39
#ACT
give 回城卷 1
MAPMOVE YB01 80 81
break
#ELSEACT
MESSAGEBOX 40级以上玩家才可以进入此地图!
break

[@除妖任务]
#If
CHECKVAR HUMAN 接受除妖任务 = 0
#Say
玛珐大陆中存在着很多强大无比的妖魔!最近我们\
发现这些强大的魔王在蠢蠢欲动,我们希望你前去调查\
此事,找出让它们如此狂躁不安的原因。\\

<接受除妖任务/@接受除妖任务>          今日已完成:(<$HUMAN(除妖任务次数)>/<COLOR=clRed 3>)次\ \
#Act
Break
#If
CHECKVAR HUMAN 接受除妖任务 = 1
CHECKVAR HUMAN 除妖任务数量 = 0
#Say
玛珐大陆中存在着很多强大无比的妖魔!最近我们\
发现这些强大的魔王在蠢蠢欲动,我们希望你前去调查\
此事,找出让它们如此狂躁不安的原因。\\

<查看除妖任务/@查看除妖任务>          今日已完成:(<$HUMAN(除妖任务次数)>/<COLOR=clRed 3>)次\ \
#ElseSay
玛珐大陆中存在着很多强大无比的妖魔!最近我们\
发现这些强大的魔王在蠢蠢欲动,我们希望你前去调查\
此事,找出让它们如此狂躁不安的原因。\\

<完成除妖任务/@完成除妖任务>          今日已完成:(<$HUMAN(除妖任务次数)>/<COLOR=clRed 3>)次\ \

[@接受除妖任务]
#If
CHECKVAR HUMAN 除妖任务次数 = 3
#Say
每天3次,你今天已经做过了!!\ \
#Act
Break
#If
CheckVAR HUMAN 接受除妖任务 = 0
#Act
CALCVAR HUMAN 接受除妖任务 = 1
SaveVar HUMAN 接受除妖任务 ..\QuestDiary\数据文件\除妖任务数据.txt
CALCVAR HUMAN 除妖任务数量 = 0
SaveVar HUMAN 除妖任务数量 ..\QuestDiary\数据文件\除妖任务数据.txt
SendMsg 6 [已接受任务:杀死魔龙教主:1]
Break
#Say
当前任务:杀死‘魔龙教主’1只\ \
已完成量:<$HUMAN(除妖任务数量)>/1 \ \
<离开/@exit>

[@查看除妖任务]
#If
CheckVAR HUMAN 接受除妖任务 = 1
#Say
当前任务:杀死‘魔龙教主’1只\ \
已完成量:<$HUMAN(除妖任务数量)>/1 \ \
<离开/@exit>
#Act
Break
#ElseSay
你没有接受任务...\ \

[@完成除妖任务]
#If
CheckVAR HUMAN 接受除妖任务 < 1
#Say
没有接受任务...\ \
#Act
Break
#IF
CheckVAR HUMAN 接受除妖任务 = 1
CheckVAR HUMAN 除妖任务数量 = 1
#Act
CALCVAR HUMAN 接受除妖任务 = 0
CALCVAR HUMAN 除妖任务数量 = 0
CALCVAR HUMAN 除妖任务次数 + 1
SaveVar HUMAN 除妖任务次数 ..\QuestDiary\数据文件\除妖任务数据.txt
SaveVar HUMAN 接受除妖任务 ..\QuestDiary\数据文件\除妖任务数据.txt
SaveVar HUMAN 除妖任务数量 ..\QuestDiary\数据文件\除妖任务数据.txt
GameGold + 100
SENDMSG 0恭喜‘<$USERNAME>’从任务发布使者(330,336)处完成除妖任务获得100元宝 219 251
Close
Break


[@除魔任务]
#If
CHECKVAR HUMAN 除魔完成 = 1
#Say
你可以在我这里领取除魔任务,完成后可以获得高额奖励。\
在每<COLOR=clRed 1>轮除魔任务(<COLOR=clRed 完成5次任务>)中,每次完成任务后的奖励会\
越来越好。\
如果你觉得领取的任务太难,你也可以花费50000金币重新领取任务。\
现在你每天最多可以完成<COLOR=clRed 3轮>的除魔任务……\ \
<领取任务>            <重新领取任务>            <领取奖励>\ \
<返回/@MAIN>       当前除魔任务完成度(<COLOR=clLime 今天的任务已完成>)\
#ElseSay
你可以在我这里领取除魔任务,完成后可以获得高额奖励。\
在每<COLOR=clRed 1>轮除魔任务(<COLOR=clRed 完成5次任务>)中,每次完成任务后的奖励会\
越来越好。\
如果你觉得领取的任务太难,你也可以花费50000金币重新领取任务。\
现在你每天最多可以完成<COLOR=clRed 3轮>的除魔任务……\ \
<领取任务/@领取任务>            <重新领取任务/@重新领取>            <领取奖励/@领取奖励>\ \
<返回/@MAIN>         当前除魔任务完成轮数:<$HUMAN(任务轮次)>轮本轮已完成:<$HUMAN(任务小轮)>次\
[@领取奖励]
#If
CHECKVAR HUMAN 除魔完成 = 0
CHECKVAR HUMAN 任务轮次 = 2
CHECKVAR HUMAN 任务小轮 = 4
CHECKVAR HUMAN 领取除魔任务 = 1
CHECKVAR HUMAN 除魔杀怪数量 = <$HUMAN(已杀数量)>
#Act
CALCVAR HUMAN 除魔完成 = 1
SAVEVAR HUMAN 除魔完成 ..\QuestDiary\数据文件\除魔任务数据.txt
CHANGEEXP + 300000
SendMsg 0 恭喜‘%s’完成全部除魔任务,获得大量经验!
Goto @除魔任务
Break
#If
CHECKVAR HUMAN 除魔完成 = 0
CHECKVAR HUMAN 任务小轮 = 4
CHECKVAR HUMAN 领取除魔任务 = 1
CHECKVAR HUMAN 除魔杀怪数量 = <$HUMAN(已杀数量)>
#Act
CALCVAR HUMAN 任务轮次 + 1
CALCVAR HUMAN 任务小轮 = 0
CALCVAR HUMAN 领取除魔任务 = 0
SAVEVAR HUMAN 任务轮次 ..\QuestDiary\数据文件\除魔任务数据.txt
SAVEVAR HUMAN 任务小轮 ..\QuestDiary\数据文件\除魔任务数据.txt
SAVEVAR HUMAN 领取除魔任务 ..\QuestDiary\数据文件\除魔任务数据.txt
CHANGEEXP + 300000
SendMsg 0 恭喜‘%s’完成第<$HUMAN(任务轮次)>轮除魔任务,获得大量经验!
Goto @继续下一轮
Break
#If
CHECKVAR HUMAN 除魔完成 = 0
CHECKVAR HUMAN 任务小轮 < 4
CHECKVAR HUMAN 领取除魔任务 = 1
CHECKVAR HUMAN 除魔杀怪数量 = <$HUMAN(已杀数量)>
#Act
CALCVAR HUMAN 任务小轮 + 1
CALCVAR HUMAN 领取除魔任务 = 0
SAVEVAR HUMAN 任务小轮 ..\QuestDiary\数据文件\除魔任务数据.txt
SAVEVAR HUMAN 领取除魔任务 ..\QuestDiary\数据文件\除魔任务数据.txt
CHANGEEXP + 300000
SendMsg 0 恭喜‘%s’完成第<$HUMAN(任务轮次)>轮第<$HUMAN(任务小轮)>次除魔任务,获得大量经验!
Goto @除魔任务
Break
#ElseSay
你的任务还没完成!!\ \
<返回/@除魔任务> \

[@继续下一轮]
每天三轮!您已经完成了<$HUMAN(任务轮次)>轮\
是否继续下一轮?\ \
<下一轮任务/@领取任务>

[@重新领取]
重新领取任务<COLOR=clRed 需要花费50000金币>,你确认要重新领取任务吗?\ \ \
<重新领取任务/@重领>                     <返回/@除魔任务>\
[@重领]
#If
CHECKGOLD 50000
#ELSEAct
MessageBox 你没有50000金币!!不能重新领取\ \
Goto @除魔任务
Break
#If
CHECKVAR HUMAN 领取除魔任务 = 1
#Act
Take 金币 50000
CALCVAR HUMAN 领取除魔任务 = 0
DELAYGOTO 1 @领取任务
Break
#ElseSay
你当前不需要重新领取任务!!\ \
<返回/@除魔任务>\

[@领取任务]
#IF
CHECKVAR HUMAN 除魔完成 = 1
#Act
MessageBox 你今天的除魔任务全部完成!!
Break
#If
CHECKVAR HUMAN 领取除魔任务 = 1
CHECKVAR HUMAN 已杀数量 = <$HUMAN(除魔杀怪数量)>
#Say
看来你已经完成了<$HUMAN(执行内容)>的任务!\ \
<返回领取奖励/@除魔任务>\
#ACT
BREAK
#If
CHECKVAR HUMAN 领取除魔任务 = 1
#Say
你的任务是<$HUMAN(执行内容)>x<$HUMAN(除魔杀怪数量)>,赶快去完成吧。\ \
<好的,我这就去/@EXIT>\
#ACT
BREAK
#IF
CHECKLEVELEX < 36
#SAY
你未达到36级,为了您的安全起见,我不能让你去冒险!
#Act
BREAK
#IF
CHECKVAR HUMAN 除魔完成 = 0
CHECKVAR HUMAN 领取除魔任务 = 0
#ACT
Mov m10 0
Movr m10 10
MOV S1
#Call [\\心意功能\除魔任务\任务内容.txt] @读取怪物地图说明
CALCVAR HUMAN 执行内容 = <$STR(S1)>
Mov m10 0
Movr m10 6
Inc m10 4
CALCVAR HUMAN 除魔杀怪数量 = <$STR(m10)>
CALCVAR HUMAN 已杀数量 = 0
CALCVAR HUMAN 领取除魔任务 = 1
SAVEVAR HUMAN 领取除魔任务 ..\QuestDiary\数据文件\除魔任务数据.txt
SAVEVAR HUMAN 除魔杀怪数量 ..\QuestDiary\数据文件\除魔任务数据.txt
SAVEVAR HUMAN 执行内容 ..\QuestDiary\数据文件\除魔任务数据.txt
SAVEVAR HUMAN 已杀数量 ..\QuestDiary\数据文件\除魔任务数据.txt
SendMsg 6 [接受任务:<$STR(S1)>,数量:<$STR(m10)>只]
Break
#Say
你的任务是<$HUMAN(执行内容)>x<$HUMAN(除魔杀怪数量)>,赶快去完成吧。\ \
<好的,我这就去/@EXIT>\

星王合击 发表于 2023-11-20 17:41:40

感谢楼主提供这么好的论坛」

羽国沉默 发表于 2023-11-20 18:24:14

感谢站长分享开区一条龙教程,新手能学习到很多知识。

终极吾辈 发表于 2023-11-20 21:03:49

新手上路不用愁,碰到传奇架设问题可以来这搜索。

鸿蒙神器 发表于 2023-11-21 01:17:27

楼主发贴辛苦了,谢谢楼主分享!

进化录混沌 发表于 2023-11-21 07:49:42

开传奇一条龙不求人,自己学习架设。

古惑仔之汉龙 发表于 2023-11-21 12:28:54

这个帖子不回对不起自己!

宠物乱斗 发表于 2023-11-21 15:50:29

开传奇一条龙不求人,自己学习架设。

红牛迷失 发表于 2023-11-21 22:02:32

这东西我收了!谢谢楼主!

专属神器 发表于 2023-11-21 22:09:11

感谢楼主提供这么好的论坛!
页: [1] 2 3 4
查看完整版本: BLUE引擎传奇任务发布使者教程,热血合击传奇添加任务的脚本命令解析