[@main]
#ACT
#call [\跑环任务\趣游Mir2跑环内容.txt] @清风Mir2跑环NPC
#if
checkvar human 跑环执行开始 = 未接任务
#act
MOV S$跑环任务按钮 <接受任务/@清风MirDiy跑环任务接受>
#if
checkvar human 跑环执行开始 = 已接任务
#act
MOV S$跑环任务按钮 <放弃任务|251#跑环任务不可放弃> <任务进度:/scolor=243>(<$human(跑环已PK个数)>/<$human(跑环PK怪次数)>)
#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(跑环地图名称)><)击PK(/FCOLOR=6><$human(跑环PK怪次数)><)只(/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$跑环PK怪次数
CALCVAR HUMAN 跑环地图编号 = <$str(S$跑环地图编号)>
CALCVAR HUMAN 跑环地图名称 = <$str(S$跑环地图名称)>
CALCVAR HUMAN 跑环怪物名称 = <$str(S$跑环怪物名称)>
CALCVAR HUMAN 跑环PK怪次数 = <$str(S$跑环PK怪次数)>
CALCVAR HUMAN 跑环循环次数 = 0
CALCVAR HUMAN 跑环执行开始 = 未接任务
CALCVAR HUMAN 跑环已PK个数 = 0
SAVEVAR HUMAN 跑环怪物名称 ..\QuestDiary\跑环任务\趣游mir2跑环数据.txt
SAVEVAR HUMAN 跑环地图名称 ..\QuestDiary\跑环任务\趣游mir2跑环数据.txt
SAVEVAR HUMAN 跑环地图编号 ..\QuestDiary\跑环任务\趣游mir2跑环数据.txt
SAVEVAR HUMAN 跑环PK怪次数 ..\QuestDiary\跑环任务\趣游mir2跑环数据.txt
SAVEVAR HUMAN 跑环循环次数 ..\QuestDiary\跑环任务\趣游mir2跑环数据.txt
SAVEVAR HUMAN 跑环执行开始 ..\QuestDiary\跑环任务\趣游mir2跑环数据.txt
SAVEVAR HUMAN 跑环已PK个数 ..\QuestDiary\跑环任务\趣游mir2跑环数据.txt
goto @main
#elseact
messagebox 你的元宝不够!不能更换任务!
break
[@清风MirDiy跑环任务接受]
#if
#act
CALCVAR HUMAN 跑环执行开始 = 已接任务
CALCVAR HUMAN 跑环已PK个数 = 0
SAVEVAR HUMAN 跑环执行开始 ..\QuestDiary\跑环任务\趣游mir2跑环数据.txt
SAVEVAR HUMAN 跑环已PK个数 ..\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$跑环PK怪次数
CALCVAR HUMAN 跑环地图编号 = <$str(S$跑环地图编号)>
CALCVAR HUMAN 跑环地图名称 = <$str(S$跑环地图名称)>
CALCVAR HUMAN 跑环怪物名称 = <$str(S$跑环怪物名称)>
CALCVAR HUMAN 跑环PK怪次数 = <$str(S$跑环PK怪次数)>
CALCVAR HUMAN 跑环执行开始 = 未接任务
CALCVAR HUMAN 跑环已PK个数 = 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 跑环PK怪次数 ..\QuestDiary\跑环任务\趣游mir2跑环数据.txt
SAVEVAR HUMAN 跑环执行开始 ..\QuestDiary\跑环任务\趣游mir2跑环数据.txt
SAVEVAR HUMAN 跑环已PK个数 ..\QuestDiary\跑环任务\趣游mir2跑环数据.txt
goto @main
break
|