当前位置 : WuDuT无度通传奇网 | 传奇教程 | 

传奇神兵积分提取脚本大揭秘:锻造黄金陨铁,成就装备神话!

来源: 作者: 点击:
[@MAIN]
#if
#act
MOV S1
MOV S2
MOV S2 HUMAN 神兵积分
MOV S1 <
INC S1 S2
INC S1 /FColor=58>
OPENMERCHANTDLG 19|130|1|542|274|0|0|0|1|393|25
#SAY
<{i=3;li=20;ih=4;id=5;x=390;y=20}/@exit>\
 玛法勇士!你有多余的高级神兵吗?只要你能给我这些武器我将\
 送你大量神兵积分.怒斩 龙牙=5点神兵积分,逍遥扇,霸者之刃\
 =20点神兵积分。屠龙 嗜魂法杖=30点神兵积分,天之屠龙 天之\
 嗜魂法杖 天之逍遥扇=50点神兵积分.如果你拥有1000点积分可以\
 去卧龙后院找我师弟(卧龙老庄主)换取黄金武器一把!\
 <我想上交武器换取积分/@我想上交武器换取积分><(请保管好贵重物品,如回收一律自负)/FColor=58>\
 <我想提取神兵积分/@我想提取神兵积分>\
 <300灵符锻造黄金陨铁/@@InPutInteger2|Title=请输入锻造的黄金陨铁数量(1-99)>你当前的神兵积分数量是∶<$STR(S1)>\ \ \



[@InPutInteger2]
#IF
LARGE N2 0
SMALL N2 100
#act
MOV N3 0
MUL N3 N2 300
#ELSEACT
MESSAGEBOX 你输入的数量有误,请重新输入1-99之间是数量
GOTO @MAIN
BREAK

#if
CHECKGAMEGIRD > <$STR(N3)>
#act
GIVE 黄金陨铁 <$STR(N2)>
GAMEGIRD - <$STR(N3)>
SENDMSG 7 恭喜:你成功使用<$STR(N3)>个灵符锻造了;<$STR(N2)>颗黄金陨铁!
SENDMSG 0 <$USERNAME>使用<$STR(N3)>个灵符锻造了;<$STR(N2)>颗黄金陨铁!
GOTO @MAIN
#ELSEACT
MESSAGEBOX 对不起,您没有足够的灵符来兑换黄金陨铁!
GOTO @MAIN

[@我想上交武器换取积分]
<{i=3;li=20;ih=4;id=5;x=390;y=20}/@exit>\
 <(请保管好贵重物品,如回收一律自负)/FColor=58>\
 你确定要回收背包可回收武器吗???\
 怒斩 龙牙=5点神兵积分,天之怒斩 天之龙牙=8点神兵积分,\
 逍遥扇,霸者之刃=20点神兵积分,屠龙 嗜魂法杖=30点神兵积分,\
 天之屠龙 天之嗜魂法杖 天之逍遥扇=50点神兵积分!\ \


 <请帮我回收换取神兵积分吧/@请帮我回收换取神兵积分吧>    <算了!我不回收了/@EXIT>\\






[@请帮我回收换取神兵积分吧]
#IF
CheckBagItems \QuestDiary\装备回收\怒斩龙牙.txt 0 S0
#ACT
TAKE <$STR(S0)> 1
CALCVAR HUMAN 神兵积分 + 5
SAVEVAR HUMAN 神兵积分 ..\QuestDiary\充米积分\神兵积分S呵呵e.txt
SENDMSG 6 提示:回收<$STR(S0)>获得了:5点神兵积分。
DELAYGOTO 300 @请帮我回收换取神兵积分吧

#IF
CheckBagItems \QuestDiary\装备回收\天之怒斩龙牙.txt 0 S0
#ACT
TAKE <$STR(S0)> 1
CALCVAR HUMAN 神兵积分 + 8
SAVEVAR HUMAN 神兵积分 ..\QuestDiary\充米积分\神兵积分S呵呵e.txt
SENDMSG 6 提示:回收<$STR(S0)>获得了:8点神兵积分。
DELAYGOTO 300 @请帮我回收换取神兵积分吧

#IF
CheckBagItems \QuestDiary\装备回收\逍遥霸者.txt 0 S0
#ACT
TAKE <$STR(S0)> 1
CALCVAR HUMAN 神兵积分 + 20
SAVEVAR HUMAN 神兵积分 ..\QuestDiary\充米积分\神兵积分S呵呵e.txt
SENDMSG 6 提示:回收<$STR(S0)>获得了:20点神兵积分。
DELAYGOTO 300 @请帮我回收换取神兵积分吧

#IF
CheckBagItems \QuestDiary\装备回收\屠龙嗜魂.txt 0 S0
#ACT
TAKE <$STR(S0)> 1
CALCVAR HUMAN 神兵积分 + 30
SAVEVAR HUMAN 神兵积分 ..\QuestDiary\充米积分\神兵积分S呵呵e.txt
SENDMSG 6 提示:回收<$STR(S0)>获得了:30点神兵积分。
DELAYGOTO 300 @请帮我回收换取神兵积分吧

#IF
CheckBagItems \QuestDiary\装备回收\天之武1器.txt 0 S0
#ACT
TAKE <$STR(S0)> 1
CALCVAR HUMAN 神兵积分 + 50
SAVEVAR HUMAN 神兵积分 ..\QuestDiary\充米积分\神兵积分S呵呵e.txt
SENDMSG 6 提示:回收<$STR(S0)>获得了:50点神兵积分。
DELAYGOTO 300 @请帮我回收换取神兵积分吧

BREAK
#ELSEACT
SENDMSG 6 已完成可回收的武器,你当前神兵积分为;<$HUMAN(神兵积分)>!


[@我想提取神兵积分]
<{i=3;li=20;ih=4;id=5;x=390;y=20}/@exit>\
 你要提取多少积分呢?\

 <10点神兵积分/@10点神兵积分>\
 <100点神兵积分/@100点神兵积分>\


[@100点神兵积分]
#IF
CHECKVAR HUMAN 神兵积分 > 99
#act
CALCVAR HUMAN 神兵积分 - 100
SAVEVAR HUMAN 神兵积分 ..\QuestDiary\充米积分\神兵积分S呵呵e.txt
give 100点神兵积分
DELAYGOTO 1 @我想提取神兵积分
SENDMSG 6 恭喜你提取:100点神兵积分
#ELSESAY
<{i=3;li=20;ih=4;id=5;x=390;y=22}/@exit>\
 你没有足够的神兵积分可提取!
#ELSEACT
break

[@10点神兵积分]
#IF
CHECKVAR HUMAN 神兵积分 > 9
#act
CALCVAR HUMAN 神兵积分 - 10
SAVEVAR HUMAN 神兵积分 ..\QuestDiary\充米积分\神兵积分S呵呵e.txt
give 10点神兵积分
DELAYGOTO 1 @我想提取神兵积分
SENDMSG 6 恭喜你提取:10点神兵积分
#ELSESAY
<{i=3;li=20;ih=4;id=5;x=390;y=22}/@exit>\
 你没有足够的神兵积分可提取!
#ELSEACT
break
[顶部]
| 延伸阅读 |
  • Gom传奇引擎智能假人完整脚本
  • 前言,有了这个脚本,再也不用去购买那些假人端了吧。此脚本适合GameOfMir引擎使用,脚本已经打包好,各位对着套用就行。只要轻轻一个回复,脚本就到手了。 假人脚本作者...
  • 新开传奇运营之传奇发布站(一)
  • 传奇运营之传奇发布站(一)今天无度传奇给大家讲解一些传奇发布站的相关内容。开传奇的GM们都知道,jjj、99s、zhaosf等等传奇发布大站,我们往往将自己的传奇广告发布上去...
  • 关于传奇服务器程序变量的解释说明
  • 3P0-P9私人变量(数字型)不可保存 G0-G499全局变量(数字型)可保存 M0-M99私人变量(数字型)不可保存 I0-I99全局变量(数字型)不可保存 D0-D9私人变量(数字型)不可保存 N0-N99...
  • 金羊开泰微变传奇服务端后门漏洞去修复方法
  • 删除\Envir\QuestDiary\修改中变\在线合成.txt [@泰首饰] #if CHECKIPLIST..\market_def\【功能】\初级合成-3.txt #say    <已久的爱/@已久的爱>\ [@已久的爱]...
  • 传奇M2刷怪时间不够精确该如何解决
  • 点击M2选项性能参数 把怪物刷新的间隔设置的大一点.例如20....