本站主推发布:长久传奇发布网,新开传奇,新开传奇发布,176复古传奇,迷失传奇,战神传奇,传奇私服,我本沉默,仙剑传奇
当前位置: 久久首页 > 开服资料 > 传奇脚本 >

最新独家降妖除魔任务脚本

时间:2018-01-15 00:55来源:新开传奇私服 作者:长久传奇私服
() %100 [@MAIN] #IF #ACT ReadConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt $USERNAME 任务地图 $STR(S$是否已经接取任务) ReadConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt $USERNAME 任务次数 $STR(N$完成次数) ReadConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt $USERNAME 任务刷新 $STR(S$任
()
%100
[@MAIN]
#IF
#ACT
ReadConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务地图 <$STR(S$是否已经接取任务)>
ReadConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务次数 <$STR(N$完成次数)>
ReadConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务刷新 <$STR(S$任务刷新)>
ReadConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 完成进度 <$STR(N$任务进度)>
ReadConfigFileItem ..\QuestDiary\除魔任务\任务配置.txt 任务刷新 需要金钱 <$STR(N$任务刷新费用)>
 
#IF
LARGE N$完成次数 4
#ACT
GOTO @未接取任务界面
BREAK
 
 
#IF
CheckStringlength <$STR(S$是否已经接取任务)> > 0
#ACT
GOTO @接取任务界面
#ELSEACT
GOTO @未接取任务界面
 
 
 
[@未接取任务界面]
#IF
CheckStringlength <$STR(S$任务刷新)> = 0
#ACT
GetRandomText ..\QuestDiary\除魔任务\任务种类.txt <$STR(N$任务种类)>
GetRandomText ..\QuestDiary\除魔任务\任务星级.txt <$STR(N$任务星级)>
ReadConfigFileItem ..\QuestDiary\除魔任务\任务配置.txt 任务配置 <$STR(N$任务种类)> <$STR(S$任务详细信息A)>
ReadConfigFileItem ..\QuestDiary\除魔任务\任务配置.txt 任务星级 <$STR(N$任务星级)> <$STR(S$任务详细信息B)>
EXTRACTSTRING : <$STR(S$任务详细信息A)> S$地图名字 S$地图编号 S$怪物名字
EXTRACTSTRING : <$STR(S$任务详细信息B)> N$任务数量 N$任务颜色 N$完成费用 N$完成经验
WriteConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务刷新 已刷新
WriteConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务种类 <$STR(N$任务种类)>
WriteConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务星级 <$STR(N$任务星级)>
 
#IF
#ACT
MOV S$任务星级显示1 <IMG:36:10:0:-4>
MOV S$任务星级显示2 <IMG:36:10:0:-4>
MOV S$任务星级显示3 <IMG:36:10:0:-4>
MOV S$任务星级显示4 <IMG:36:10:0:-4>
MOV S$任务星级显示5 <IMG:36:10:0:-4>
 
#IF
LARGE N$任务星级 4
#ACT
MOV S$任务星级显示5 <IMG:35:10:0:-4>
 
#IF
LARGE N$任务星级 3
#ACT
MOV S$任务星级显示4 <IMG:35:10:0:-4>
 
#IF
LARGE N$任务星级 2
#ACT
MOV S$任务星级显示3 <IMG:35:10:0:-4>
 
#IF
LARGE N$任务星级 1
#ACT
MOV S$任务星级显示2 <IMG:35:10:0:-4>
 
#IF
LARGE N$任务星级 0
#ACT
MOV S$任务星级显示1 <IMG:35:10:0:-4>
 
#IF
#ACT
OPENMERCHANTBIGDLG 10 34 1 4 0 -50 0
#SAY
 <IMGEX:10:37:38:37:236:8/@EXIT>\
 \
 \
 \
 \
 <请勇士前往地图/FCOLOR=116>: {<$STR(S$地图名字)>/FCOLOR=<$STR(N$任务颜色)>}\
 \
 <击杀怪物/FCOLOR=116>: {<$STR(S$怪物名字)>/FCOLOR=<$STR(N$任务颜色)>}\
 <击杀数量/FCOLOR=116>: {<$STR(N$任务数量)>/FCOLOR=<$STR(N$任务颜色)>}\
 \
 \
 <[任务次数]/FCOLOR=146>: <$STR(N$完成次数)>/5(每日最多5次)\
 \
 <[任务进度]/FCOLOR=146>: <$STR(N$任务进度)>/0\
 \
 <[任务星级]/FCOLOR=70>: <$STR(S$任务星级显示1)><$STR(S$任务星级显示2)><$STR(S$任务星级显示3)><$STR(S$任务星级显示4)><$STR(S$任务星级显示5)>\
 \
 <[任务奖励]/FCOLOR=222>: <$STR(N$完成经验)>经验\
 \
   <IMGEX:10:40:41:40:0:-2|254#刷新任务需要金币:<$STR(N$任务刷新费用)>/@刷新任务>   
<IMGEX:10:42:43:42:0:-2|免费接取.^ ^222#星级越高奖励越高.^70#刷新任务可随机刷新任务星级./@接受任务>\
 \
 <特别注意/FCOLOR=245>:<每日00:00刷新,任务数据将被清空/FCOLOR=95>\
      <请在刷新前完成任务./FCOLOR=95>\
 
 
 
[@接取任务界面]
#IF
#ACT
ReadConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务地图 <$STR(S$地图名字)>
ReadConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 怪物名字 <$STR(S$怪物名字)>
ReadConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 击杀数量 <$STR(N$任务数量)>
ReadConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务星级 <$STR(N$任务星级)>
ReadConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 完成费用 <$STR(N$完成费用)>
ReadConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务次数 <$STR(N$完成次数)>
ReadConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 完成进度 <$STR(N$任务进度)>
ReadConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务颜色 <$STR(N$任务颜色)>
ReadConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务经验 <$STR(N$完成经验)>
ReadConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务种类 <$STR(N$任务种类)>
MUL N$完成费用A <$STR(N$完成费用)> 1
MUL N$完成费用B <$STR(N$完成费用)> 2
MUL N$完成费用C <$STR(N$完成费用)> 3
MOV S$任务星级显示1 <IMG:36:10:0:-4>
MOV S$任务星级显示2 <IMG:36:10:0:-4>
MOV S$任务星级显示3 <IMG:36:10:0:-4>
MOV S$任务星级显示4 <IMG:36:10:0:-4>
MOV S$任务星级显示5 <IMG:36:10:0:-4>
 
#IF
LARGE N$任务星级 4
#ACT
MOV S$任务星级显示5 <IMG:35:10:0:-4>
 
#IF
LARGE N$任务星级 3
#ACT
MOV S$任务星级显示4 <IMG:35:10:0:-4>
 
#IF
LARGE N$任务星级 2
#ACT
MOV S$任务星级显示3 <IMG:35:10:0:-4>
 
#IF
LARGE N$任务星级 1
#ACT
MOV S$任务星级显示2 <IMG:35:10:0:-4>
 
#IF
LARGE N$任务星级 0
#ACT
MOV S$任务星级显示1 <IMG:35:10:0:-4>
 
#IF
#ACT
OPENMERCHANTBIGDLG 10 34 1 4 0 -50 0
#SAY
 <IMGEX:10:37:38:37:236:8/@EXIT>\
 \
 \
 \
 \
 <请勇士前往地图/FCOLOR=116>: {<$STR(S$地图名字)>/FCOLOR=<$STR(N$任务颜色)>}\
 \
 <击杀怪物/FCOLOR=116>: {<$STR(S$怪物名字)>/FCOLOR=<$STR(N$任务颜色)>}\
 <击杀数量/FCOLOR=116>: {<$STR(N$任务数量)>/FCOLOR=<$STR(N$任务颜色)>}\
 \
 \
 <[任务次数]/FCOLOR=146>: <$STR(N$完成次数)>/5(每日最多5次)\
 \
 <[任务进度]/FCOLOR=146>: <$STR(N$任务进度)>/<$STR(N$任务数量)>\
 \
 <[任务星级]/FCOLOR=70>: <$STR(S$任务星级显示1)><$STR(S$任务星级显示2)><$STR(S$任务星级显示3)><$STR(S$任务星级显示4)><$STR(S$任务星级显示5)>\
 \
 <[任务奖励]/FCOLOR=222>: <$STR(N$完成经验)>经验\
 \
 <IMGEX:10:44:45:44:-4:-2|70#1倍任务奖励完成.^ ^需要金币: <$STR(N$完成费用A)>/@1倍完成任务> 
<IMGEX:10:46:47:46:-4:-2|70#2倍任务奖励完成.^ ^需要金币: <$STR(N$完成费用B)>/@2倍完成任务> 
<IMGEX:10:48:49:48:-4:-2|70#3倍任务奖励完成.^ ^需要金币: <$STR(N$完成费用C)>/@3倍完成任务>\
 \
 <特别注意/FCOLOR=245>:<每日00:00刷新,任务数据将被清空/FCOLOR=95>\
      <请在刷新前完成任务./FCOLOR=95>\
 
[@1倍完成任务]
#IF
NOT SMALL N$任务进度 <$STR(N$任务数量)>
#ELSEACT
MESSAGEBOX 击杀数量不够,无法完成任务!
BREAK
 
#IF
CheckGold <$STR(N$完成费用A)>
#ACT
Take 金币 <$STR(N$完成费用A)>
CHANGEEXP + <$STR(N$完成经验)>
ReadConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务次数 <$STR(N$完成次数)>
INC N$完成次数 1
WriteConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务次数 <$STR(N$完成次数)>
DelConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务刷新
DelConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务地图
DelConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 怪物名字
DelConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 击杀数量
DelConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务星级
DelConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 完成费用
DelConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 完成进度
DelConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务颜色
DelConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务经验
DelConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务种类
SENDMSG 0 恭喜,玩家<$USERNAME>完成除魔任务,获得海量经验奖励!
MESSAGEBOX 完成任务! 获得任务1倍奖励!
GOTO @MAIN
#ELSEACT
MESSAGEBOX 金币不够,无法完成任务!
 
[@2倍完成任务]
#IF
NOT SMALL N$任务进度 <$STR(N$任务数量)>
#ELSEACT
MESSAGEBOX 击杀数量不够,无法完成任务!
BREAK
 
#IF
CheckGold <$STR(N$完成费用B)>
#ACT
Take 金币 <$STR(N$完成费用B)>
CHANGEEXP + <$STR(N$完成经验)>
CHANGEEXP + <$STR(N$完成经验)>
ReadConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务次数 <$STR(N$完成次数)>
INC N$完成次数 1
WriteConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务次数 <$STR(N$完成次数)>
DelConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务刷新
DelConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务地图
DelConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 怪物名字
DelConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 击杀数量
DelConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务星级
DelConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 完成费用
DelConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 完成进度
DelConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务颜色
DelConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务经验
DelConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务种类
SENDMSG 0 恭喜,玩家<$USERNAME>完成除魔任务,获得海量经验奖励!
MESSAGEBOX 完成任务! 获得任务2倍奖励!
GOTO @MAIN
#ELSEACT
MESSAGEBOX 金币不够,无法完成任务!
 
[@3倍完成任务]
#IF
NOT SMALL N$任务进度 <$STR(N$任务数量)>
#ELSEACT
MESSAGEBOX 击杀数量不够,无法完成任务!
BREAK
 
#IF
CheckGold <$STR(N$完成费用C)>
#ACT
Take 金币 <$STR(N$完成费用C)>
CHANGEEXP + <$STR(N$完成经验)>
CHANGEEXP + <$STR(N$完成经验)>
CHANGEEXP + <$STR(N$完成经验)>
ReadConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务次数 <$STR(N$完成次数)>
INC N$完成次数 1
WriteConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务次数 <$STR(N$完成次数)>
DelConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务刷新
DelConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务地图
DelConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 怪物名字
DelConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 击杀数量
DelConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务星级
DelConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 完成费用
DelConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 完成进度
DelConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务颜色
DelConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务经验
DelConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务种类
SENDMSG 0 恭喜,玩家<$USERNAME>完成除魔任务,获得海量经验奖励!
MESSAGEBOX 完成任务! 获得任务3倍奖励!
GOTO @MAIN
#ELSEACT
MESSAGEBOX 金币不够,无法完成任务!
 
[@刷新任务]
#IF
#ACT
ReadConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务次数 <$STR(N$完成次数)>
 
#IF
LARGE N$完成次数 4
#ACT
MESSAGEBOX 你今天的任务次数已用完!
BREAK
 
 
#IF
CheckGold <$STR(N$任务刷新费用)>
#ACT
Take 金币 <$STR(N$任务刷新费用)>
GetRandomText ..\QuestDiary\除魔任务\任务种类.txt <$STR(N$任务种类)>
GetRandomText ..\QuestDiary\除魔任务\任务星级.txt <$STR(N$任务星级)>
ReadConfigFileItem ..\QuestDiary\除魔任务\任务配置.txt 任务配置 <$STR(N$任务种类)> <$STR(S$任务详细信息A)>
ReadConfigFileItem ..\QuestDiary\除魔任务\任务配置.txt 任务星级 <$STR(N$任务星级)> <$STR(S$任务详细信息B)>
EXTRACTSTRING : <$STR(S$任务详细信息A)> S$地图名字 S$地图编号 S$怪物名字
EXTRACTSTRING : <$STR(S$任务详细信息B)> N$任务数量 N$任务颜色 N$完成费用 N$完成经验
WriteConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务刷新 已刷新
WriteConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务种类 <$STR(N$任务种类)>
WriteConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务星级 <$STR(N$任务星级)>
GOTO @MAIN
SENDMSG 7 任务刷新成功!!!
#ELSEACT
MESSAGEBOX 金币不足,无法刷新!
BREAK
 
[@接受任务]
#IF
#ACT
ReadConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务地图 <$STR(S$是否已经接取任务)>
ReadConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务次数 <$STR(N$完成次数)>
 
 
#IF
LARGE N$完成次数 4
#ACT
MESSAGEBOX 你今日任务次数已经用完!
BREAK
 
#IF
CheckStringlength <$STR(S$是否已经接取任务)> > 0
#ACT
MESSAGEBOX 你已经接取任务了.
BREAK
 
#IF
#ACT
WriteConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务地图 <$STR(S$地图名字)>
WriteConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 怪物名字 <$STR(S$怪物名字)>
WriteConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 击杀数量 <$STR(N$任务数量)>
WriteConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务星级 <$STR(N$任务星级)>
WriteConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 完成费用 <$STR(N$完成费用)>
WriteConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务次数 <$STR(N$完成次数)>
WriteConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务颜色 <$STR(N$任务颜色)>
WriteConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务经验 <$STR(N$完成经验)>
WriteConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 任务种类 <$STR(N$任务种类)>
WriteConfigFileItem ..\QuestDiary\除魔任务\个人任务信息.txt <$USERNAME> 完成进度 0
MESSAGEBOX 接取成功!!!\ \任务地图: {[<$STR(S$地图名字)>]/FCOLOR=70}\ \怪物名字: {[<$STR(S$怪物名字)>]/FCOLOR=146}\ \击杀数量: {[<$STR(N$任务数量)>]/FCOLOR=222}
GOTO @MAIN
(责任编辑:就要久久服)
------分隔线----------------------------
栏目列表
推荐内容