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

完美无错刀魂、风魂脚本-武器衣服成长脚本

时间:2016-04-20 00:43来源:新开传奇发布网 作者:长久传奇私服
已修复测试完整、保证GEE引擎下使用完美无错。 武器可打怪升级 也可在npc处升级 武器打怪可升至10级 可扩展 npc到20级 衣服npc处升级,没设置打怪升级 可自己根据武器添加 成长属性设定为%比 适合微变 QFunction-0.txt文件内添加如下脚本: 衣服复制到[@TakeOn0] 武器复制到[@TakeOn1] 别弄混了 !! [@TakeOn0] #if CheckCustomItemProgressBar 0 0 #ELSEACT SetCustomItemProgressbar 0
已修复测试完整、保证GEE引擎下使用完美无错。
武器可打怪升级 也可在npc处升级
武器打怪可升至10级 可扩展 npc到20级
衣服npc处升级,没设置打怪升级 可自己根据武器添加
成长属性设定为%比 适合微变 
刀魂风魂脚本展示

刀魂风魂脚本展示图

QFunction-0.txt文件内添加如下脚本:
衣服复制到[@TakeOn0]   武器复制到[@TakeOn1]  别弄混了  !!
 
[@TakeOn0]
#if
CheckCustomItemProgressBar 0 0 
#ELSEACT
SetCustomItemProgressbar 0 0 0 1
SetCustomItemProgressbar 0 0 2 254
SetCustomItemProgressbar 0 0 3 0
SetCustomItemProgressbar 0 0 4 0
SetCustomItemProgressbarValue 0 0 3 = 0
SetCustomItemProgressbar 0 0 1 凤魂等级:%i级
SetCustomItemProgressbar 0 1 0 1
SetCustomItemProgressbar 0 1 2 242
SetCustomItemProgressbar 0 1 3 2
SetCustomItemProgressbar 0 1 4 1
SetCustomItemProgressbarValue 0 1 0 = 100
SetCustomItemProgressbar 0 1 1 凤魂经验:
goto @衣服
break
 
 
[@衣服]
#if
CheckCustomItemProgressbarValue  0 0 = 0
;random 10
#ACT
;MOVR M71 5000 20000
;MOVR M72 5000 30000
;MOVR M73 5000 40000
;MOVR M74 5000 50000
;MOVR M75 5000 60000
;MOVR M76 1 5
;MOVR M77 1 5
;MOVR M78 1 5
;MOVR M79 1 5
;MOVR M80 1 5
 
LockUpdateAbil
LockUpdateItem 0
 
;SetCustomItemText 装备位置 名字内容
 
SetCustomItemText 0 [凤魂成长属性]
 
;GetCustomItemTextColor 装备位置 变量(0~255)
 
SetCustomItemTextColor 0 251
 
;SetCustomItemAbil装备位置 属性位置(0~9) 属性类型(0~4) 属性值
 
SetCustomItemAbil 0 0 0 95
SetCustomItemAbil 0 1 0 94
SetCustomItemAbil 0 2 0 70
 
SetCustomItemAbil 0 0 1 0
SetCustomItemAbil 0 1 1 1
SetCustomItemAbil 0 2 1 2
 
SetCustomItemAbil 0 0 2 0
SetCustomItemAbil 0 1 2 1
SetCustomItemAbil 0 2 2 2
 
 
SetCustomItemAbil 0 0 3 1
SetCustomItemAbil 0 1 3 1
SetCustomItemAbil 0 2 3 1
 
 
SetCustomItemValue 0 0 = 1
SetCustomItemValue 0 1 = 1
SetCustomItemValue 0 2 = 1
 
 
UpdateItem 0
UpdateAbil
 
 
[@TakeOn1]
 
#if
CHECKCUSTOMITEMPROGRESSBAR 1 0
#ACT
#ELSEACT
SetCustomItemProgressbar 1 0 0 1
SetCustomItemProgressbar 1 0 2 254
SetCustomItemProgressbar 1 0 3 0
SetCustomItemProgressbar 1 0 4 0
SetCustomItemProgressbarValue 1 0 3 = 0
SetCustomItemProgressbar 1 0 1 武魂等级:%i级
SetCustomItemProgressbar 1 1 0 1
SetCustomItemProgressbar 1 1 2 242
SetCustomItemProgressbar 1 1 3 2
SetCustomItemProgressbar 1 1 4 1
SetCustomItemProgressbarValue 1 1 0 = 100
SetCustomItemProgressbar 1 1 1 武魂经验:
goto @武器
break
 
 
[@武器]
#if
CheckCustomItemProgressbarValue  1 0 = 0
;random 10
#ACT
;MOVR M71 5000 20000
;MOVR M72 5000 30000
;MOVR M73 5000 40000
;MOVR M74 5000 50000
;MOVR M75 5000 60000
;MOVR M76 1 5
;MOVR M77 1 5
;MOVR M78 1 5
;MOVR M79 1 5
;MOVR M80 1 5
 
LockUpdateAbil
LockUpdateItem 1
 
;SetCustomItemText 装备位置 名字内容
 
SetCustomItemText 1 [刀魂成长属性]
 
;GetCustomItemTextColor 装备位置 变量(0~255)
 
SetCustomItemTextColor 1 251
 
;SetCustomItemAbil装备位置 属性位置(0~9) 属性类型(0~4) 属性值
 
SetCustomItemAbil 1 0 0 95
SetCustomItemAbil 1 1 0 94
SetCustomItemAbil 1 2 0 70
 
SetCustomItemAbil 1 0 1 3
SetCustomItemAbil 1 1 1 4
SetCustomItemAbil 1 2 1 5
 
SetCustomItemAbil 1 0 2 0
SetCustomItemAbil 1 1 2 1
SetCustomItemAbil 1 2 2 2
 
 
SetCustomItemAbil 1 0 3 1
SetCustomItemAbil 1 1 3 1
SetCustomItemAbil 1 2 3 1
 
 
SetCustomItemValue 1 0 = 1
SetCustomItemValue 1 1 = 1
SetCustomItemValue 1 2 = 1
 
 
UpdateItem 1
UpdateAbil
;----------------------------------------------刀魂
 
[@KillMonGetExp]
#if
LARGE <$ATTACKMONSTER_MAXHP> 51
SMALL <$ATTACKMONSTER_MAXHP> 201
NOT CHECKTEXTLIST ..\QuestDiary\数据文件\不可成长怪物.txt <$KILLMONNAME>
#act
SetCustomItemProgressbarValue 1 1 1 + 1 
 
 
#if
LARGE <$ATTACKMONSTER_MAXHP> 201
SMALL <$ATTACKMONSTER_MAXHP> 501
#act
movr M3 1 2
SetCustomItemProgressbarValue 1 1 1 + <$STR(M3)> 
 
 
#if
LARGE <$ATTACKMONSTER_MAXHP> 501
SMALL <$ATTACKMONSTER_MAXHP> 1001
#act
movr M3 2 4
SetCustomItemProgressbarValue 1 1 1 + <$STR(M3)> 
 
 
#if
LARGE <$ATTACKMONSTER_MAXHP> 1001
SMALL <$ATTACKMONSTER_MAXHP> 1501
#act
movr M3 3 6
SetCustomItemProgressbarValue 1 1 1 + <$STR(M3)> 
 
 
#if
LARGE <$ATTACKMONSTER_MAXHP> 1501
#act
movr M3 4 8
SetCustomItemProgressbarValue 1 1 1 + <$STR(M3)> 
 
 
 
 
 
 
#if
CheckCustomItemProgressbarValue 1 1 1 = 100
CheckCustomItemProgressbarValue 1 0 3 = 0
#act
SetCustomItemProgressbarValue 1 0 3 = 1
SetCustomItemProgressbarValue 1 1 1 = 0
SetCustomItemProgressbarValue 1 1 0 = 200
 
MOVR m200 2
MOVR m201 2
MOVR m202 2
SetCustomItemValue 1 0 + <$STR(M200)>
SetCustomItemValue 1 1 + <$STR(M201)>
SetCustomItemValue 1 2 + <$STR(M202)>
sendmsg 7 武器得到了成长升级!
 
#if
CheckCustomItemProgressbarValue 1 1 1 = 200
CheckCustomItemProgressbarValue 1 0 3 = 1
#act
SetCustomItemProgressbarValue 1 0 3 = 2
SetCustomItemProgressbarValue 1 1 1 = 0
SetCustomItemProgressbarValue 1 1 0 = 300
 
MOVR m200 2
MOVR m201 2
MOVR m202 2
SetCustomItemValue 1 0 + <$STR(M200)>
SetCustomItemValue 1 1 + <$STR(M201)>
SetCustomItemValue 1 2 + <$STR(M202)>
sendmsg 7 武器得到了成长升级!
 
#if
CheckCustomItemProgressbarValue 1 1 1 = 300
CheckCustomItemProgressbarValue 1 0 3 = 2
#act
SetCustomItemProgressbarValue 1 0 3 = 3
SetCustomItemProgressbarValue 1 1 1 = 0
SetCustomItemProgressbarValue 1 1 0 = 400
 
MOVR m200 2
MOVR m201 2
MOVR m202 2
SetCustomItemValue 1 0 + <$STR(M200)>
SetCustomItemValue 1 1 + <$STR(M201)>
SetCustomItemValue 1 2 + <$STR(M202)>
sendmsg 7 武器得到了成长升级!
 
#if
CheckCustomItemProgressbarValue 1 1 1 = 400
CheckCustomItemProgressbarValue 1 0 3 = 3
#act
SetCustomItemProgressbarValue 1 0 3 = 4
SetCustomItemProgressbarValue 1 1 1 = 0
SetCustomItemProgressbarValue 1 1 0 = 500
 
MOVR m200 2
MOVR m201 2
MOVR m202 2
SetCustomItemValue 1 0 + <$STR(M200)>
SetCustomItemValue 1 1 + <$STR(M201)>
SetCustomItemValue 1 2 + <$STR(M202)>
sendmsg 7 武器得到了成长升级!
 
#if
CheckCustomItemProgressbarValue 1 1 1 = 500
CheckCustomItemProgressbarValue 1 0 3 = 4
#act
SetCustomItemProgressbarValue 1 0 3 = 5
SetCustomItemProgressbarValue 1 1 1 = 0
SetCustomItemProgressbarValue 1 1 0 = 600
 
MOVR m200 2
MOVR m201 2
MOVR m202 2
SetCustomItemValue 1 0 + <$STR(M200)>
SetCustomItemValue 1 1 + <$STR(M201)>
SetCustomItemValue 1 2 + <$STR(M202)>
sendmsg 7 武器得到了成长升级!
 
#if
CheckCustomItemProgressbarValue 1 1 1 = 600
CheckCustomItemProgressbarValue 1 0 3 = 5
#act
SetCustomItemProgressbarValue 1 0 3 = 6
SetCustomItemProgressbarValue 1 1 1 = 0
SetCustomItemProgressbarValue 1 1 0 = 700
 
MOVR m200 2
MOVR m201 2
MOVR m202 2
SetCustomItemValue 1 0 + <$STR(M200)>
SetCustomItemValue 1 1 + <$STR(M201)>
SetCustomItemValue 1 2 + <$STR(M202)>
sendmsg 7 武器得到了成长升级!
 
#if
CheckCustomItemProgressbarValue 1 1 1 = 700
CheckCustomItemProgressbarValue 1 0 3 = 6
#act
SetCustomItemProgressbarValue 1 0 3 = 7
SetCustomItemProgressbarValue 1 1 1 = 0
SetCustomItemProgressbarValue 1 1 0 = 800
 
MOVR m200 2
MOVR m201 2
MOVR m202 2
SetCustomItemValue 1 0 + <$STR(M200)>
SetCustomItemValue 1 1 + <$STR(M201)>
SetCustomItemValue 1 2 + <$STR(M202)>
sendmsg 7 武器得到了成长升级!
 
#if
CheckCustomItemProgressbarValue 1 1 1 = 800
CheckCustomItemProgressbarValue 1 0 3 = 7
#act
SetCustomItemProgressbarValue 1 0 3 = 8
SetCustomItemProgressbarValue 1 1 1 = 0
SetCustomItemProgressbarValue 1 1 0 = 900
 
MOVR m200 2
MOVR m201 2
MOVR m202 2
SetCustomItemValue 1 0 + <$STR(M200)>
SetCustomItemValue 1 1 + <$STR(M201)>
SetCustomItemValue 1 2 + <$STR(M202)>
sendmsg 7 武器得到了成长升级!
#if
CheckCustomItemProgressbarValue 1 1 1 = 900
CheckCustomItemProgressbarValue 1 0 3 = 8
#act
SetCustomItemProgressbarValue 1 0 3 = 9
SetCustomItemProgressbarValue 1 1 1 = 0
SetCustomItemProgressbarValue 1 1 0 = 1000
 
MOVR m200 2
MOVR m201 2
MOVR m202 2
SetCustomItemValue 1 0 + <$STR(M200)>
SetCustomItemValue 1 1 + <$STR(M201)>
SetCustomItemValue 1 2 + <$STR(M202)>
sendmsg 7 武器得到了成长升级!
 
#if
CheckCustomItemProgressbarValue 1 1 1 = 1000
CheckCustomItemProgressbarValue 1 0 3 = 9
#act
SetCustomItemProgressbarValue 1 0 3 = 10
SetCustomItemProgressbarValue 1 1 1 = 0
SetCustomItemProgressbarValue 1 1 0 = 1100
 
MOVR m200 2
MOVR m201 2
MOVR m202 2
SetCustomItemValue 1 0 + <$STR(M200)>
SetCustomItemValue 1 1 + <$STR(M201)>
SetCustomItemValue 1 2 + <$STR(M202)>
sendmsg 7 武器得到了成长升级!
NPC文件(凤魂升级-3.txt)脚本:
()
%100
[@main]
#ACT
ReturnBoxItem 1
OPENMERCHANTBIGDLG 39 607 1 0 0 0 1 397 1
#say
#say
               <◥◣凤 魂 系 统◢◤/SCOLOR=250>\ \
<如果你获得了带有[/SCOLOR=223><凤魂>]<字样的衣服可以在这里进行凤魂升级/SCOLOR=223>\
 <[凤魂]/SCOLOR=231>-<[成长]/SCOLOR=103>-<[属性]/SCOLOR=242>-<[每级]/SCOLOR=254>-<[增加]/SCOLOR=151>\
      <[10%]/SCOLOR=253>-<[属性]/SCOLOR=249>\
  <分别对应每级增加1%的物防魔防属性/SCOLOR=103>\
      <放入要升级衣服/AUTOCOLOR=254,251,168,191,250,70,245,249,253> \
       <↓↓↓↓↓/AUTOCOLOR=254,251,168,191,250,70,245,249,253> \
<ITEMBOX:1:39:250:110:150:50:50:*:254#请放入带有[凤魂等级]字样的装备>\
            <鼠标移动此处|251#升级介绍如下:^254#凤魂等级每增加一级防御魔御增加百分之1>\
            <查询幻化详情|251#升级介绍如下:^254#凤魂等级每增加一级防御魔御增加百分之1>\
                   <每次升级都会消耗:/SCOLOR=242><3枚灵魂石/SCOLOR=151>\
      <【点击开始升级】/@开始>    <灵魂石升级有几率出现极品装备/SCOLOR=242>\
                     <灵魂石/SCOLOR=151> <BOSS 掉落/SCOLOR=242>\
 
[@ItemIntoBox1]
#IF
CHECKTEXTLIST ..\QuestDiary\装备升级\衣服.txt <$BOXITEM[1].NAME>
#ACT
break
#ELSEACT
messagebox 非常抱歉,你的衣服不支持升级或已经是最高等级了!\
UNALLOWITEMINTOBOX
BREAK
[@开始]
#IF
EQUAL <$BOXITEM[1].NAME> 
#ACT
MESSAGEBOX 请放入需要升级的装备!
break
 
 
#IF
CheckCustomItemProgressbarValue boxitem1 0 3 < 20
checkitem 灵魂石 3
#ACT
take 灵魂石 3
SetCustomItemProgressbarValue boxitem1 0 3 + 1
;SetCustomItemText 装备位置 名字内容
SetCustomItemText boxitem1 [凤魂成长属性]
;GetCustomItemTextColor 装备位置 变量(0~255)
SetCustomItemTextColor boxitem1 251
;SetCustomItemAbil装备位置 属性位置(0~9) 属性类型(0~4) 属性值
SetCustomItemAbil boxitem1 0 0 154
SetCustomItemAbil boxitem1 1 0 168
SetCustomItemAbil boxitem1 0 1 1
SetCustomItemAbil boxitem1 1 1 2
SetCustomItemAbil boxitem1 0 2 0
SetCustomItemAbil boxitem1 1 2 1
SetCustomItemAbil boxitem1 0 3 1
SetCustomItemAbil boxitem1 1 3 1
SetCustomItemValue boxitem1 0 + 2
SetCustomItemValue boxitem1 1 + 2
 
UpdateItem boxitem1
SENDMSG 6 恭喜你的衣服凤魂升级成功!
SENDMSG 1 恭喜勇士【<$USERNAME>】的衣服凤魂升级成功!
#elseact
Messagebox  友情提示:\     一、风魂最高20满级\ \     二、检查背包是否有灵魂石
BREAK
NPC文件(武魂升级-3.txt)脚本:
()
%100
[@main]
#ACT
ReturnBoxItem 1
OPENMERCHANTBIGDLG 39 607 1 0 0 0 1 397 1
#say
               <◥◣武 魂 系 统◢◤/SCOLOR=250>\ \
<如果你获得了带有[/SCOLOR=223><刀魂>]<字样的武器可以在这里进行刀魂升级/SCOLOR=223>\
 <[刀魂]/SCOLOR=231>-<[成长]/SCOLOR=103>-<[属性]/SCOLOR=242>-<[每级]/SCOLOR=254>-<[增加]/SCOLOR=151>\
      <[10%]/SCOLOR=253>-<[属性]/SCOLOR=249>\
  <分别对应每级增加1%的攻击属性/SCOLOR=103>\
      <放入要升级武器/AUTOCOLOR=254,251,168,191,250,70,245,249,253> \
       <↓↓↓↓↓/AUTOCOLOR=254,251,168,191,250,70,245,249,253> \
<ITEMBOX:1:39:250:110:150:50:50:*:254#请放入带有[刀魂等级]字样的装备>\
            <鼠标移动此处|251#升级介绍如下:^254#刀魂等级每增加一级攻击增加百分之1>\
            <查询幻化详情|251#升级介绍如下:^254#刀魂等级每增加一级攻击增加百分之1>\
                   <每次升级都会消耗:/SCOLOR=242><3枚灵魂石/SCOLOR=151>\
      <【点击开始升级】/@开始>    <灵魂石升级有几率出现极品装备/SCOLOR=242>\
                     <灵魂石/SCOLOR=151> <BOSS 掉落/SCOLOR=242>\
 
 
[@ItemIntoBox1]
#IF
CHECKTEXTLIST ..\QuestDiary\装备升级\武器.txt <$BOXITEM[1].NAME>
#ACT
break
#ELSEACT
messagebox 非常抱歉,你的武器不支持升级或已经是最高等级了!\
UNALLOWITEMINTOBOX
BREAK
[@开始]
#IF
EQUAL <$BOXITEM[1].NAME> 
#ACT
MESSAGEBOX 请放入需要升级的装备!
break
#IF
CheckCustomItemProgressbarValue boxitem1  0 3 < 20
checkitem 灵魂石 3
#ACT
take 灵魂石 3
SetCustomItemProgressbarValue boxitem1 0 3 + 1 
;SetCustomItemText 装备位置 名字内容
SetCustomItemText boxitem1 [刀魂成长属性]
;GetCustomItemTextColor 装备位置 变量(0~255)
SetCustomItemTextColor boxitem1 251
;SetCustomItemAbil装备位置 属性位置(0~9) 属性类型(0~4) 属性值
SetCustomItemAbil boxitem1 0 0 154
SetCustomItemAbil boxitem1 0 1 3
SetCustomItemAbil boxitem1 0 2 0
SetCustomItemAbil boxitem1 0 3 1
SetCustomItemValue boxitem1 0 + 2
SetCustomItemValue boxitem1 1 + 2
SetCustomItemValue boxitem1 2 + 2
 
UpdateItem boxitem1
SENDMSG 6 恭喜你的武器刀魂升级成功!
SENDMSG 1 恭喜勇士【<$USERNAME>】的武器刀魂升级成功!
#elseact
Messagebox  友情提示:\     一、武魂最高20满级\ \     二、检查背包是否有灵魂石
BREAK
 
BREAK

(责任编辑:找搜服传奇发布网)
------分隔线----------------------------
栏目列表
推荐内容