传奇3私服中积分换经验脚本,51c7转载文章
51c7.Com
≡ 本站传奇3资料、文章、记载、文献、散文等,经作者授权,全站内容欢迎大家转载 ≡


传奇3私服中积分换经验脚本

分类:传奇3    ‌‍ 阅读:298

2021-05-27 13:00:00

    ‌‍ 相信玩传奇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   一桶传奇3   BOSS传奇3   天骄传奇3   搜传奇3   PK773传奇3信息港   易游久久   吾要传奇   2FFF惠品汇   魅22传奇3   新开传奇3   壹壹传奇3   极品传奇3   五五传奇3   黑金论坛   我的传奇网   天天传奇3   传奇3重症监护室   ID账号联盟   全球IP地址库   

Copyright ® 2003 - 2022 Http://Www.51c7.Com All rights reserved

本站中文版权所有 吾要传奇 保留所有权利 未经许可请勿任意转载或复制使用