相信玩传奇3私服的玩家中很多都是上班一族,没那么多时间去练级提高等级,这个脚本就是给这些人的,没时间没关系,只要有钱,用积分照样可以换取经验来提供等级.
[@maijingyan]
{
#if
#act
LoadValue D7 "QuestDiary\feifan\系统设置\系统设置.txt" [换经验] [状态]
#IF
equal D7 1
#SAY
冲级赛结束后正式开放炼制封魔石。。\
<[关闭]/@exit>
#ELSEACT
goto @进入换经验X
[@进入换经验X]
#IF
checklevel 65
#ACT
GOTO @进入65
#ELSEACT
goto @继续1
[@继续1]
#IF
checklevel 60
#ACT
GOTO @进入60
#ELSEACT
goto @继续2
[@继续2]
#IF
checklevel 55
#ACT
GOTO @进入55
#ELSEACT
MOV d3 120000000 ;;55以下给经验
MOV D4 4 ;;给封魔石
MOV D5 24 ;;收24积分
#ELSESAY
本服务器升级所需经验比其他私服少一半,所以这里也做了相应调整。\
炼制 <$OUTPUT(D4)> 个封魔石需要 <$OUTPUT(D5)> 点积分.可以获得 <$OUTPUT(D3)> 经验值.\
等级越高,可以炼制的封魔石越多.\
\
<[是的,我要炼制封魔石.]/@main5> \
<恩泽天下.二次炼制/@xxxmaijingyan>\
<[听取炼制介绍]/@lianzhihelp> \
<[返回上一页]/@youxijifen>\
<[关闭]/@exit>
;;================================================================
[@进入55]
#IF
checklevel 55
#SAY
本服务器升级所需经验比其他私服少一半,所以这里也做了相应调整。\
在这里你可以选择2个档次的封魔石炼制。\
等级越高,可以炼制的封魔石越多.\
\
<[练制4个封魔石]/@lianzhi4> 获得12千万经验,需要24点积分\
\
<[练制6个封魔石]/@lianzhi6> 获得18千万经验,需要36点积分\
\
<恩泽天下.二次炼制/@xxxmaijingyan>\
\
<[返回上一页]/@youxijifen>\
<[关闭]/@exit>
[@进入60]
#IF
checklevel 60
#SAY
本服务器升级所需经验比其他私服少一半,所以这里也做了相应调整。\
在这里你可以选择2个档次的封魔石炼制。\
等级越高,可以炼制的封魔石越多.\
\
<[练制4个封魔石]/@lianzhi4> 获得12千万经验,需要24点积分\
\
<[练制6个封魔石]/@lianzhi6> 获得18千万经验,需要36点积分\
\
<恩泽天下.二次炼制/@xxxmaijingyan>\
;<[练制8个封魔石]/@lianzhi8> 获得2.4亿经验,需要52点积分\
\
<[返回上一页]/@youxijifen>\
<[关闭]/@exit>
[@进入65]
#IF
checklevel 65
#SAY
本服务器升级所需经验比其他私服少一半,所以这里也做了相应调整。\
在这里你可以选择4个档次的封魔石炼制。\
等级越高,可以炼制的封魔石越多.\
\
<[练制4个封魔石]/@lianzhi4> 获得12千万经验,需要24点积分\
\
<[练制6个封魔石]/@lianzhi6> 获得18千万经验,需要36点积分\
\
<恩泽天下.二次炼制/@xxxmaijingyan>\
;<[练制8个封魔石]/@lianzhi8> 获得2.4亿经验,需要52点积分\
\
;<[练制9个封魔石]/@lianzhi9> 获得3.2亿经验,需要62点积分\
\
<[返回上一页]/@youxijifen>\
<[关闭]/@exit>
;;================================================================
[@lianzhi4]
#IF
#ACT
MOV d3 120000000 ;;55以下给经验
MOV D4 4 ;;给封魔石
MOV D5 24 ;;收24积分
#SAY
本服务器升级所需经验比其他私服少一半,所以这里也做了相应调整。\
炼制 <$OUTPUT(D4)> 个封魔石需要 <$OUTPUT(D5)> 点积分.可以获得 <$OUTPUT(D3)> 经验值.\
\
<[是的,我要炼制封魔石.]/@main5> \
<[听取炼制介绍]/@lianzhihelp> \
<[返回上一页]/@youxijifen>\
<[关闭]/@exit>
[@lianzhi6]
#IF
checklevel 55
#ACT
MOV d3 180000000 ;;55以上给经验
MOV D4 6 ;;给封魔石
MOV D5 36 ;;收36积分
#SAY
本服务器升级所需经验比其他私服少一半,所以这里也做了相应调整。\
炼制 <$OUTPUT(D4)> 个封魔石需要 <$OUTPUT(D5)> 点积分.可以获得 <$OUTPUT(D3)> 经验值.\
\
<[是的,我要炼制封魔石.]/@main5> \
<[听取炼制介绍]/@lianzhihelp> \
<[返回上一页]/@youxijifen>\
<[关闭]/@exit>
[@lianzhi8]
#IF
checklevel 60
#ACT
MOV d3 240000000 ;;60以上给经验
MOV D4 8 ;;给封魔石
MOV D5 52 ;;收52积分
#SAY
本服务器升级所需经验比其他私服少一半,所以这里也做了相应调整。\
炼制 <$OUTPUT(D4)> 个封魔石需要 <$OUTPUT(D5)> 点积分.可以获得 <$OUTPUT(D3)> 经验值.\
\
<[是的,我要炼制封魔石.]/@main5> \
<[听取炼制介绍]/@lianzhihelp> \
<[返回上一页]/@youxijifen>\
<[关闭]/@exit>
[@lianzhi9]
#IF
checklevel 65
#ACT
MOV d3 320000000 ;;65以上给经验
MOV D4 9 ;;给封魔石
MOV D5 62 ;;收62积分
#SAY
本服务器升级所需经验比其他私服少一半,所以这里也做了相应调整。\
炼制 <$OUTPUT(D4)> 个封魔石需要 <$OUTPUT(D5)> 点积分.可以获得 <$OUTPUT(D3)> 经验值.\
\
<[是的,我要炼制封魔石.]/@main5> \
<[听取炼制介绍]/@lianzhihelp> \
<[返回上一页]/@youxijifen>\
<[关闭]/@exit>
;;===========================================================
[@main5]
#IF
#ACT
FormatStr "FLD_CHARACTER=%s" %USERNAME
ReadValueSql "TBL_QUEST" %A9 "FLD_CHARACTER,FLD_JIFEN" [@jifen_封魔石]
[@jifen_封魔石()]
#IF
checklevel 1
#ACT
mov A0 %ARG(1)
mov D1 %ARG(2)
#SAY
您当前积分为 {FCOLOR/1}<$OUTPUT(D1)>{FCOLOR/12},\
每天只能炼制一次,一次可以炼制 <$OUTPUT(D4)> 个封魔石,需要消耗 <$OUTPUT(D5)> 点积分,您确定吗?\
\\
<[我要炼制封魔石.]/@main-10XXXXXXX>\
<[听取炼制介绍]/@lianzhihelp>\
<[返回上一页]/@youxijifen>\
<[关闭]/@exit>
#ELSEACT
goto @no52xxxxx
[@main-10XXXXXXX]
#if
CHECKGROUPCOUNT
#say
{FCOLOR/10}对不起,炼制封魔石的时候,是不允许组队的,请退出组队再来炼制。{FCOLOR/12}\
\
<关 闭/@exit>\
#ELSEact
goto @main-12
[@main-12]
#if
dayofweek sun
#act
mov s1 1
goto @sunxxxxx
break
#if
dayofweek mon
#act
mov s1 2
goto @monxxxxx
break
#if
dayofweek tue
#act
mov s1 3
goto @tuexxxxx
break
#if
dayofweek wed
#act
mov s1 4
goto @wedxxxxx
break
#if
dayofweek thu
#act
mov s1 5
goto @thuxxxxx
break
#if
dayofweek fri
#act
mov s1 6
goto @frixxxxx
break
#if
dayofweek sat
#act
mov s1 7
goto @satxxxxx
break
[@sunxxxxx]
#IF
equal s1 1
check [881] 0
large D1 %D5
#act
FormatStr "FLD_CHARACTER=%s" %USERNAME
mov A1 %USERNAME
mov A8 %A9
DEC D1 %D5
FormatStr "FLD_JIFEN=%s" %D1
UPDATEVALUESQL "TBL_QUEST" %A8 %A9
mov s1 0
set [881] 1
set [882] 0
set [883] 0
set [884] 0
set [885] 0
set [886] 0
set [887] 0
GIVEEXP %A1 %D3
give 封魔石 %D4
SysMsg "炼制了<$OUTPUT(D4)>个封魔石,获得了<$OUTPUT(D3)>经验。"
goto @linggongzixxxxx
#ELSEACT
goto @noqianxxxxx
[@monxxxxx]
#IF
equal s1 2
check [882] 0
large D1 %D5
#act
FormatStr "FLD_CHARACTER=%s" %USERNAME
mov A1 %USERNAME
mov A8 %A9
DEC D1 %D5
FormatStr "FLD_JIFEN=%s" %D1
UPDATEVALUESQL "TBL_QUEST" %A8 %A9
mov s1 0
set [881] 0
set [882] 1
set [883] 0
set [884] 0
set [885] 0
set [886] 0
set [887] 0
GIVEEXP %A1 %D3
give 封魔石 %D4
SysMsg "炼制了<$OUTPUT(D4)>个封魔石,获得了<$OUTPUT(D3)>经验。"
goto @linggongzixxxxx
#ELSEACT
goto @noqianxxxxx
[@tuexxxxx]
#IF
equal s1 3
check [883] 0
large D1 %D5
#act
FormatStr "FLD_CHARACTER=%s" %USERNAME
mov A1 %USERNAME
mov A8 %A9
DEC D1 %D5
FormatStr "FLD_JIFEN=%s" %D1
UPDATEVALUESQL "TBL_QUEST" %A8 %A9
mov s1 0
set [881] 0
set [882] 0
set [883] 1
set [884] 0
set [885] 0
set [886] 0
set [887] 0
GIVEEXP %A1 %D3
give 封魔石 %D4
SysMsg "炼制了<$OUTPUT(D4)>个封魔石,获得了<$OUTPUT(D3)>经验。"
goto @linggongzixxxxx
#ELSEACT
goto @noqianxxxxx
[@wedxxxxx]
#IF
equal s1 4
check [884] 0
large D1 %D5
#act
FormatStr "FLD_CHARACTER=%s" %USERNAME
mov A1 %USERNAME
mov A8 %A9
DEC D1 %D5
FormatStr "FLD_JIFEN=%s" %D1
UPDATEVALUESQL "TBL_QUEST" %A8 %A9
mov s1 0
set [881] 0
set [882] 0
set [883] 0
set [884] 1
set [885] 0
set [886] 0
set [887] 0
GIVEEXP %A1 %D3
give 封魔石 %D4
SysMsg "炼制了<$OUTPUT(D4)>个封魔石,获得了<$OUTPUT(D3)>经验。"
goto @linggongzixxxxx
#ELSEACT
goto @noqianxxxxx
[@thuxxxxx]
#IF
equal s1 5
check [885] 0
large D1 %D5
#act
FormatStr "FLD_CHARACTER=%s" %USERNAME
mov A1 %USERNAME
mov A8 %A9
DEC D1 %D5
FormatStr "FLD_JIFEN=%s" %D1
UPDATEVALUESQL "TBL_QUEST" %A8 %A9
mov s1 0
set [881] 0
set [882] 0
set [883] 0
set [884] 0
set [885] 1
set [886] 0
set [887] 0
GIVEEXP %A1 %D3
give 封魔石 %D4
SysMsg "炼制了<$OUTPUT(D4)>个封魔石,获得了<$OUTPUT(D3)>经验。"
goto @linggongzixxxxx
#ELSEACT
goto @noqianxxxxx
[@frixxxxx]
#IF
equal s1 6
check [886] 0
large D1 %D5
#act
FormatStr "FLD_CHARACTER=%s" %USERNAME
mov A1 %USERNAME
mov A8 %A9
DEC D1 %D5
FormatStr "FLD_JIFEN=%s" %D1
UPDATEVALUESQL "TBL_QUEST" %A8 %A9
mov s1 0
set [881] 0
set [882] 0
set [883] 0
set [884] 0
set [885] 0
set [886] 1
set [887] 0
GIVEEXP %A1 %D3
give 封魔石 %D4
SysMsg "炼制了<$OUTPUT(D4)>个封魔石,获得了<$OUTPUT(D3)>经验。"
goto @linggongzixxxxx
#ELSEACT
goto @noqianxxxxx
[@satxxxxx]
#IF
equal s1 7
check [887] 0
large D1 %D5
#act
FormatStr "FLD_CHARACTER=%s" %USERNAME
mov A1 %USERNAME
mov A8 %A9
DEC D1 %D5
FormatStr "FLD_JIFEN=%s" %D1
UPDATEVALUESQL "TBL_QUEST" %A8 %A9
mov s1 0
set [881] 0
set [882] 0
set [883] 0
set [884] 0
set [885] 0
set [886] 0
set [887] 1
GIVEEXP %A1 %D3
give 封魔石 %D4
SysMsg "炼制了<$OUTPUT(D4)>个封魔石,获得了<$OUTPUT(D3)>经验。"
goto @linggongzixxxxx
#ELSEACT
goto @noqianxxxxx
[@linggongzixxxxx]
#SAY
你获得了 <$OUTPUT(D4)> 个封魔石和 <$OUTPUT(D3)> 经验.明天再来炼制吧! \\
<退 出/@exit>
[@noqianxxxxx]
#SAY
你的积分不足,或者你今天已经炼制过封魔石了,所以不能再次炼制.\ \
<退 出/@exit>
[@no52xxxxx]
#say
52级以上才可以炼制封魔石.\\
<退 出/@exit>
[@lianzhihelp]
#say
凑齐相应的材料和封魔石,可以换取高级物品,比如飞龙剑炼制需要集齐1000个封魔石,每天您只能炼制一次.并且获得相应的经验值。\
<退 出/@exit>
[@nojifenxxxxx]
#say
您的积分不足。 \
\
<退 出/@exit>
;;[@testcxcxcxcxcszdfdfdgvddg]
#if
#act
set [881] 0
set [882] 0
set [883] 0
set [884] 0
set [885] 0
set [886] 0
set [887] 0
#SAY
为了方便测试任务\
我已经帮你把全部任务记录清0\
<返 回/@maijingyan>\
<离 开/@exit>\
;;===================================================================================================
;;2次练制
[@xxxmaijingyan]
{
#if
hour 19 23
#ACT
goto @XSYENDHDFDFF
#ELSESAY
这个功能需要在晚上7点到{FCOLOR/10}道馆金刚铁匠{FCOLOR/12}那里激活才可以。而且是有时间限制的哦。\
完成任务后会赋予每位玛法大陆的勇士有第二次炼制封魔石的能力.\
激活后二次炼制限制时间为{FCOLOR/10}晚上19点到23点{FCOLOR/12}\
<[关闭]/@exit>
#ELSEACT
SaveValue "QuestDiary\feifan\天外天任务.txt" [经验] [开关] 0
[@XSYENDHDFDFF]
#if
#act
LoadValue D7 "QuestDiary\feifan\系统设置\系统设置.txt" [换经验] [状态]
LoadValue P3 "QuestDiary\feifan\天外天任务.txt" [经验] [开关]
LoadValue A4 "QuestDiary\feifan\天外天任务.txt" [经验] [玩家]
#IF
equal D7 0
equal P3 0
#SAY
这个功能需要在晚上7点到{FCOLOR/10}道馆金刚铁匠{FCOLOR/12}那里激活才可以。而且是有时间限制的哦。\
完成任务后会赋予每位玛法大陆的勇士有第二次炼制封魔石的能力..\
激活后二次炼制限制时间为晚上19点到23点\
<[关闭]/@exit>
#ELSEACT
goto @xxx进入换经验X
[@xxx进入换经验X]
#IF
checklevel 65
#ACT
GOTO @xxx进入65
#ELSEACT
goto @xxx继续1
[@xxx继续1]
#IF
checklevel 60
#ACT
GOTO @xxx进入60
#ELSEACT
goto @xxx继续2
[@xxx继续2]
#IF
checklevel 55
#ACT
GOTO @xxx进入55
#ELSEACT
MOV d3 120000000 ;;55以下给经验
MOV D4 4 ;;给封魔石
MOV D5 24 ;;收24积分
#ELSESAY
二次炼制封魔石功能今天晚上被{FCOLOR/10} <$OUTPUT(A4)> {FCOLOR/12}成功开启。\
炼制 <$OUTPUT(D4)> 个封魔石需要 <$OUTPUT(D5)> 点积分.可以获得 <$OUTPUT(D3)> 经验值.\
等级越高,可以炼制的封魔石越多.\
\
<[是的,我要炼制封魔石.]/@xxxmain5> \
<[听取炼制介绍]/@xxxlianzhihelp> \
<[返回上一页]/@youxijifen>\
<[关闭]/@exit>
;;================================================================
[@xxx进入55]
#IF
checklevel 55
#SAY
二次炼制封魔石功能今天晚上被{FCOLOR/10} <$OUTPUT(A4)> {FCOLOR/12}成功开启。\
在这里你可以选择2个档次的封魔石炼制。\
等级越高,可以炼制的封魔石越多.\
\
<[练制4个封魔石]/@xxxlianzhi4> 获得12千万经验,需要24点积分\
\
<[练制6个封魔石]/@xxxlianzhi6> 获得18千万经验,需要36点积分\
\
<[返回上一页]/@youxijifen>\
<[关闭]/@exit>
[@xxx进入60]
#IF
checklevel 60
#SAY
二次炼制封魔石功能今天晚上被{FCOLOR/10} <$OUTPUT(A4)> {FCOLOR/12}成功开启。\
在这里你可以选择2个档次的封魔石炼制。\
等级越高,可以炼制的封魔石越多.\
\
<[练制4个封魔石]/@xxxlianzhi4> 获得12千万经验,需要24点积分\
\
<[练制6个封魔石]/@xxxlianzhi6> 获得18千万经验,需要36点积分\
\
;<[练制8个封魔石]/@xxxlianzhi8> 获得2.4亿经验,需要52点积分\
\
<[返回上一页]/@youxijifen>\
<[关闭]/@exit>
[@xxx进入65]
#IF
checklevel 65
#SAY
二次炼制封魔石功能今天晚上被{FCOLOR/10} <$OUTPUT(A4)> {FCOLOR/12}成功开启。\
在这里你可以选择4个档次的封魔石炼制。\
等级越高,可以炼制的封魔石越多.\
\
<[练制4个封魔石]/@xxxlianzhi4> 获得12千万经验,需要24点积分\
\
<[练制6个封魔石]/@xxxlianzhi6> 获得18千万经验,需要36点积分\
\
;<[练制8个封魔石]/@xxxlianzhi8> 获得2.4亿经验,需要52点积分\
\
;<[练制9个封魔石]/@xxxlianzhi9> 获得3.2亿经验,需要62点积分\
\
<[返回上一页]/@youxijifen>\
<[关闭]/@exit>
;;================================================================
[@xxxlianzhi4]
#IF
#ACT
MOV d3 120000000 ;;55以下给经验
MOV D4 4 ;;给封魔石
MOV D5 24 ;;收24积分
#SAY
二次炼制封魔石功能今天晚上被{FCOLOR/10} <$OUTPUT(A4)> {FCOLOR/12}成功开启。\
炼制 <$OUTPUT(D4)> 个封魔石需要 <$OUTPUT(D5)> 点积分.可以获得 <$OUTPUT(D3)> 经验值.\
\
<[是的,我要炼制封魔石.]/@xxxmain5> \
<[听取炼制介绍]/@xxxlianzhihelp> \
<[返回上一页]/@youxijifen>\
<[关闭]/@exit>
[@xxxlianzhi6]
#IF
checklevel 55
#ACT
MOV d3 180000000 ;;55以上给经验
MOV D4 6 ;;给封魔石
MOV D5 36 ;;收36积分
#SAY
二次炼制封魔石功能今天晚上被{FCOLOR/10} <$OUTPUT(A4)> {FCOLOR/12}成功开启。\
炼制 <$OUTPUT(D4)> 个封魔石需要 <$OUTPUT(D5)> 点积分.可以获得 <$OUTPUT(D3)> 经验值.\
\
<[是的,我要炼制封魔石.]/@xxxmain5> \
<[听取炼制介绍]/@xxxlianzhihelp> \
<[返回上一页]/@youxijifen>\
<[关闭]/@exit>
[@xxxlianzhi8]
#IF
checklevel 60
#ACT
MOV d3 240000000 ;;60以上给经验
MOV D4 8 ;;给封魔石
MOV D5 52 ;;收52积分
#SAY
二次炼制封魔石功能今天晚上被{FCOLOR/10} <$OUTPUT(A4)> {FCOLOR/12}成功开启。\
炼制 <$OUTPUT(D4)> 个封魔石需要 <$OUTPUT(D5)> 点积分.可以获得 <$OUTPUT(D3)> 经验值.\
\
<[是的,我要炼制封魔石.]/@xxxmain5> \
<[听取炼制介绍]/@xxxlianzhihelp> \
<[返回上一页]/@youxijifen>\
<[关闭]/@exit>
[@xxxlianzhi9]
#IF
checklevel 65
#ACT
MOV d3 320000000 ;;65以上给经验
MOV D4 9 ;;给封魔石
MOV D5 62 ;;收62积分
#SAY
二次炼制封魔石功能今天晚上被{FCOLOR/10} <$OUTPUT(A4)> {FCOLOR/12}成功开启。\
炼制 <$OUTPUT(D4)> 个封魔石需要 <$OUTPUT(D5)> 点积分.可以获得 <$OUTPUT(D3)> 经验值.\
\
<[是的,我要炼制封魔石.]/@xxxmain5> \
<[听取炼制介绍]/@xxxlianzhihelp> \
<[返回上一页]/@youxijifen>\
<[关闭]/@exit>
;;===========================================================
[@xxxmain5]
#IF
#ACT
FormatStr "FLD_CHARACTER=%s" %USERNAME
ReadValueSql "TBL_QUEST" %A9 "FLD_CHARACTER,FLD_JIFEN" [@xxxjifen_封魔石]
[@xxxjifen_封魔石()]
#IF
checklevel 1
#ACT
mov A0 %ARG(1)
mov D1 %ARG(2)
#SAY
您当前积分为 {FCOLOR/1}<$OUTPUT(D1)>{FCOLOR/12},\
每天只能炼制一次,一次可以炼制 <$OUTPUT(D4)> 个封魔石,需要消耗 <$OUTPUT(D5)> 点积分,您确定吗?\
\\
<[我要炼制封魔石.]/@xxxmain-10XXXXXXX>\
<[听取炼制介绍]/@xxxlianzhihelp>\
<[返回上一页]/@youxijifen>\
<[关闭]/@exit>
#ELSEACT
goto @xxxno52xxxxx
[@xxxmain-10XXXXXXX]
#if
CHECKGROUPCOUNT
#say
{FCOLOR/10}对不起,炼制封魔石的时候,是不允许组队的,请退出组队再来炼制。{FCOLOR/12}\
\
<关 闭/@exit>\
#ELSEact
goto @xxxmain-12
[@xxxmain-12]
#if
dayofweek sun
#act
mov s1 1
goto @xxxsunxxxxx
break
#if
dayofweek mon
#act
mov s1 2
goto @xxxmonxxxxx
break
#if
dayofweek tue
#act
mov s1 3
goto @xxxtuexxxxx
break
#if
dayofweek wed
#act
mov s1 4
goto @xxxwedxxxxx
break
#if
dayofweek thu
#act
mov s1 5
goto @xxxthuxxxxx
break
#if
dayofweek fri
#act
mov s1 6
goto @xxxfrixxxxx
break
#if
dayofweek sat
#act
mov s1 7
goto @xxxsatxxxxx
break
[@xxxsunxxxxx]
#IF
equal s1 1
check [861] 0
large D1 %D5
#act
FormatStr "FLD_CHARACTER=%s" %USERNAME
mov A1 %USERNAME
mov A8 %A9
DEC D1 %D5
FormatStr "FLD_JIFEN=%s" %D1
UPDATEVALUESQL "TBL_QUEST" %A8 %A9
mov s1 0
set [861] 1
set [862] 0
set [863] 0
set [864] 0
set [865] 0
set [866] 0
set [867] 0
GIVEEXP %A1 %D3
give 封魔石 %D4
SysMsg "炼制了<$OUTPUT(D4)>个封魔石,获得了<$OUTPUT(D3)>经验。"
goto @xxxlinggongzixxxxx
#ELSEACT
goto @xxxnoqianxxxxx
[@xxxmonxxxxx]
#IF
equal s1 2
check [862] 0
large D1 %D5
#act
FormatStr "FLD_CHARACTER=%s" %USERNAME
mov A1 %USERNAME
mov A8 %A9
DEC D1 %D5
FormatStr "FLD_JIFEN=%s" %D1
UPDATEVALUESQL "TBL_QUEST" %A8 %A9
mov s1 0
set [861] 0
set [862] 1
set [863] 0
set [864] 0
set [865] 0
set [866] 0
set [867] 0
GIVEEXP %A1 %D3
give 封魔石 %D4
SysMsg "炼制了<$OUTPUT(D4)>个封魔石,获得了<$OUTPUT(D3)>经验。"
goto @xxxlinggongzixxxxx
#ELSEACT
goto @xxxnoqianxxxxx
[@xxxtuexxxxx]
#IF
equal s1 3
check [863] 0
large D1 %D5
#act
FormatStr "FLD_CHARACTER=%s" %USERNAME
mov A1 %USERNAME
mov A8 %A9
DEC D1 %D5
FormatStr "FLD_JIFEN=%s" %D1
UPDATEVALUESQL "TBL_QUEST" %A8 %A9
mov s1 0
set [861] 0
set [862] 0
set [863] 1
set [864] 0
set [865] 0
set [866] 0
set [867] 0
GIVEEXP %A1 %D3
give 封魔石 %D4
SysMsg "炼制了<$OUTPUT(D4)>个封魔石,获得了<$OUTPUT(D3)>经验。"
goto @xxxlinggongzixxxxx
#ELSEACT
goto @xxxnoqianxxxxx
[@xxxwedxxxxx]
#IF
equal s1 4
check [864] 0
large D1 %D5
#act
FormatStr "FLD_CHARACTER=%s" %USERNAME
mov A1 %USERNAME
mov A8 %A9
DEC D1 %D5
FormatStr "FLD_JIFEN=%s" %D1
UPDATEVALUESQL "TBL_QUEST" %A8 %A9
mov s1 0
set [861] 0
set [862] 0
set [863] 0
set [864] 1
set [865] 0
set [866] 0
set [867] 0
GIVEEXP %A1 %D3
give 封魔石 %D4
SysMsg "炼制了<$OUTPUT(D4)>个封魔石,获得了<$OUTPUT(D3)>经验。"
goto @xxxlinggongzixxxxx
#ELSEACT
goto @xxxnoqianxxxxx
[@xxxthuxxxxx]
#IF
equal s1 5
check [865] 0
large D1 %D5
#act
FormatStr "FLD_CHARACTER=%s" %USERNAME
mov A1 %USERNAME
mov A8 %A9
DEC D1 %D5
FormatStr "FLD_JIFEN=%s" %D1
UPDATEVALUESQL "TBL_QUEST" %A8 %A9
mov s1 0
set [861] 0
set [862] 0
set [863] 0
set [864] 0
set [865] 1
set [866] 0
set [867] 0
GIVEEXP %A1 %D3
give 封魔石 %D4
SysMsg "炼制了<$OUTPUT(D4)>个封魔石,获得了<$OUTPUT(D3)>经验。"
goto @xxxlinggongzixxxxx
#ELSEACT
goto @xxxnoqianxxxxx
[@xxxfrixxxxx]
#IF
equal s1 6
check [866] 0
large D1 %D5
#act
FormatStr "FLD_CHARACTER=%s" %USERNAME
mov A1 %USERNAME
mov A8 %A9
DEC D1 %D5
FormatStr "FLD_JIFEN=%s" %D1
UPDATEVALUESQL "TBL_QUEST" %A8 %A9
mov s1 0
set [861] 0
set [862] 0
set [863] 0
set [864] 0
set [865] 0
set [866] 1
set [867] 0
GIVEEXP %A1 %D3
give 封魔石 %D4
SysMsg "炼制了<$OUTPUT(D4)>个封魔石,获得了<$OUTPUT(D3)>经验。"
goto @xxxlinggongzixxxxx
#ELSEACT
goto @xxxnoqianxxxxx
[@xxxsatxxxxx]
#IF
equal s1 7
check [867] 0
large D1 %D5
#act
FormatStr "FLD_CHARACTER=%s" %USERNAME
mov A1 %USERNAME
mov A8 %A9
DEC D1 %D5
FormatStr "FLD_JIFEN=%s" %D1
UPDATEVALUESQL "TBL_QUEST" %A8 %A9
mov s1 0
set [861] 0
set [862] 0
set [863] 0
set [864] 0
set [865] 0
set [866] 0
set [867] 1
GIVEEXP %A1 %D3
give 封魔石 %D4
SysMsg "炼制了<$OUTPUT(D4)>个封魔石,获得了<$OUTPUT(D3)>经验。"
goto @xxxlinggongzixxxxx
#ELSEACT
goto @xxxnoqianxxxxx
[@xxxlinggongzixxxxx]
#SAY
你获得了 <$OUTPUT(D4)> 个封魔石和 <$OUTPUT(D3)> 经验.明天再来炼制吧! \\
<退 出/@exit>
[@xxxnoqianxxxxx]
#SAY
你的积分不足,或者你今天已经炼制过封魔石了,所以不能再次炼制.\ \
<退 出/@exit>
[@xxxno52xxxxx]
#say
52级以上才可以炼制封魔石.\\
<退 出/@exit>
[@xxxlianzhihelp]
#say
凑齐相应的材料和封魔石,可以换取高级物品,比如飞龙剑炼制需要集齐1000个封魔石,每天您只能炼制一次.并且获得相应的经验值。\
<退 出/@exit>
[@xxxnojifenxxxxx]
#say
您的积分不足。 \
\
<退 出/@exit>
;;[@xxxtestcxcxcxcxcszdfdfdgvddg]
#if
#act
set [861] 0
set [862] 0
set [863] 0
set [864] 0
set [865] 0
set [866] 0
set [867] 0
#SAY
为了方便测试任务\
我已经帮你把全部任务记录清0\
<返 回/@xxxmaijingyan>\
<离 开/@exit>\
}
本文出自:
搜传奇3转载请注明来处:http://www.so373.com/showarticle.asp?id=193