传奇一条龙跑环活动怎么写？传奇开区一条龙添加跑环任务教程

GM版本库

[@main]
#ACT
#call [\跑环任务\趣游Mir2跑环内容.txt] @清风Mir2跑环NPC
#if
checkvar human 跑环执行开始 = 未接任务
#act
MOV S$跑环任务按钮 <接受任务/@清风MirDiy跑环任务接受>
#if
checkvar human 跑环执行开始 = 已接任务
#act
MOV S$跑环任务按钮 <放弃任务|251#跑环任务不可放弃>　<任务进度:/scolor=243>(<$human(跑环已杀个数)>/<$human(跑环杀怪次数)>)
#if
checkvar human 跑环执行开始 = 完成任务
#act
MOV S$跑环任务按钮 <完成任务/@清风MirDiy跑环任务完成>
#if
checkvar human 跑环循环次数 = 20
#act
MOV S$跑环任务按钮 <今日已完成跑环任务/scolor=249>
#if
#act
CloseBigDialogBox
#say
\  <┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈/SCOLOR=13>
\     <跑环任务/SCOLOR=154>　　
\     <工作人员:/SCOLOR=70><尊敬的玩家您好!/SCOLOR=251><战狼公益感谢一路有您/SCOLOR=242>
\  <┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈/SCOLOR=13>
\     <任务目标:/FCOLOR=253><前往（/FCOLOR=6><$human(跑环地图名称)><）击杀（/FCOLOR=6><$human(跑环杀怪次数)><）只（/FCOLOR=6><$human(跑环怪物名称)><）/FCOLOR=6>
\     <任务奖励:/FCOLOR=253><【/FCOLOR=249>{5000万经验/FCOLOR=250}<】/FCOLOR=249>
\     <任务次数:/FCOLOR=253><任务进度（/FCOLOR=214><$human(跑环循环次数)>/20<）/FCOLOR=214>
\  <┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈/SCOLOR=13>
\     <$str(S$跑环任务按钮)>           <更换任务/@换><[1万元宝费用]/SCOLOR=154>
\  <┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈/SCOLOR=13>

[@换]
#if
checkgamegold > 9999
#act
gamegold - 10000
MOVR N$清风Mir跑环行 10
GetListString  ..\QuestDiary\跑环任务\趣游Mir2跑环参数\地图参数.txt <$STR(N$清风Mir跑环行)> S$跑环地图编号 S$跑环地图名称
GetListString  ..\QuestDiary\跑环任务\趣游Mir2跑环参数\怪物参数.txt <$STR(N$清风Mir跑环行)> S$跑环怪物名称 S$跑环杀怪次数
CALCVAR HUMAN 跑环地图编号 = <$str(S$跑环地图编号)>
CALCVAR HUMAN 跑环地图名称 = <$str(S$跑环地图名称)>
CALCVAR HUMAN 跑环怪物名称 = <$str(S$跑环怪物名称)>
CALCVAR HUMAN 跑环杀怪次数 = <$str(S$跑环杀怪次数)>
CALCVAR HUMAN 跑环循环次数 = 0
CALCVAR HUMAN 跑环执行开始 = 未接任务
CALCVAR HUMAN 跑环已杀个数 = 0
SAVEVAR HUMAN 跑环怪物名称 ..\QuestDiary\跑环任务\趣游mir2跑环数据.txt
SAVEVAR HUMAN 跑环地图名称 ..\QuestDiary\跑环任务\趣游mir2跑环数据.txt
SAVEVAR HUMAN 跑环地图编号 ..\QuestDiary\跑环任务\趣游mir2跑环数据.txt
SAVEVAR HUMAN 跑环杀怪次数 ..\QuestDiary\跑环任务\趣游mir2跑环数据.txt
SAVEVAR HUMAN 跑环循环次数 ..\QuestDiary\跑环任务\趣游mir2跑环数据.txt
SAVEVAR HUMAN 跑环执行开始 ..\QuestDiary\跑环任务\趣游mir2跑环数据.txt
SAVEVAR HUMAN 跑环已杀个数 ..\QuestDiary\跑环任务\趣游mir2跑环数据.txt
goto @main
#elseact
messagebox 你的元宝不够！不能更换任务！
break


[@清风MirDiy跑环任务接受]
#if
#act
CALCVAR HUMAN 跑环执行开始 = 已接任务
CALCVAR HUMAN 跑环已杀个数 = 0
SAVEVAR HUMAN 跑环执行开始 ..\QuestDiary\跑环任务\趣游mir2跑环数据.txt
SAVEVAR HUMAN 跑环已杀个数 ..\QuestDiary\跑环任务\趣游mir2跑环数据.txt
goto @main
messagebox 开始执行任务成功！
break



[@清风MirDiy跑环任务完成]
#if
#act
CHANGEEXP + 50000000
MOVR N$清风Mir跑环行 10
GetListString  ..\QuestDiary\跑环任务\趣游Mir2跑环参数\地图参数.txt <$STR(N$清风Mir跑环行)> S$跑环地图编号 S$跑环地图名称
GetListString  ..\QuestDiary\跑环任务\趣游Mir2跑环参数\怪物参数.txt <$STR(N$清风Mir跑环行)> S$跑环怪物名称 S$跑环杀怪次数
CALCVAR HUMAN 跑环地图编号 = <$str(S$跑环地图编号)>
CALCVAR HUMAN 跑环地图名称 = <$str(S$跑环地图名称)>
CALCVAR HUMAN 跑环怪物名称 = <$str(S$跑环怪物名称)>
CALCVAR HUMAN 跑环杀怪次数 = <$str(S$跑环杀怪次数)>
CALCVAR HUMAN 跑环执行开始 = 未接任务
CALCVAR HUMAN 跑环已杀个数 = 0
CALCVAR HUMAN 跑环循环次数 + 1
SAVEVAR HUMAN 跑环循环次数 ..\QuestDiary\跑环任务\趣游mir2跑环数据.txt
SAVEVAR HUMAN 跑环怪物名称 ..\QuestDiary\跑环任务\趣游mir2跑环数据.txt
SAVEVAR HUMAN 跑环地图名称 ..\QuestDiary\跑环任务\趣游mir2跑环数据.txt
SAVEVAR HUMAN 跑环地图编号 ..\QuestDiary\跑环任务\趣游mir2跑环数据.txt
SAVEVAR HUMAN 跑环杀怪次数 ..\QuestDiary\跑环任务\趣游mir2跑环数据.txt
SAVEVAR HUMAN 跑环执行开始 ..\QuestDiary\跑环任务\趣游mir2跑环数据.txt
SAVEVAR HUMAN 跑环已杀个数 ..\QuestDiary\跑环任务\趣游mir2跑环数据.txt
goto @main
break

微微

好帖必须得顶起

拱本丽德

小手一抖，钱钱到手！