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

装备二次鉴定NPC脚本(非拾取、穿戴鉴定)

时间:2016-08-15 00:54来源:新开传奇私服 作者:传奇私服发布网
二次鉴定由NPC自定义OK框开发自定义属性,大家如果有兴趣也可以改成拾取或者穿戴鉴定,与平常的拾取穿戴鉴定并不冲突。 脚本思路:获取OK框内物品攻魔道上线,然后随机加载装备上,武器随机攻魔道有可能一样也不增加。衣服鉴定思路是一样的随机增加1-4中属性,物、魔、防御、HP、MP,具体自己看下脚本吧,在这里不多做详细介绍了。 此装备二次鉴定的NPC脚本本人开区正
二次鉴定由NPC自定义OK框开发自定义属性,大家如果有兴趣也可以改成拾取或者穿戴鉴定,与平常的拾取穿戴鉴定并不冲突。
脚本思路:获取OK框内物品攻魔道上线,然后随机加载装备上,武器随机攻魔道有可能一样也不增加。衣服鉴定思路是一样的随机增加1-4中属性,物、魔、防御、HP、MP,具体自己看下脚本吧,在这里不多做详细介绍了。
此装备二次鉴定的NPC脚本本人开区正在使用,未发现任何漏洞及BUG、完美无错。
注:大家使用此功能记得不要忘了在M2引擎:列表2:物品规则里勾选开启物品的触发提示功能。
以下为装备二次鉴定NPC脚本正文:

[@main]
每件装备内都沉睡着一个强大的器灵,觉醒之后装备会重新焕发光彩\ \
<把要觉醒的武器放到右侧的这个框框里:>         <器灵觉醒/@武器鉴定>\
<把要觉醒的武器放到右侧的这个框框里:>         <器灵觉醒/@武器鉴定>\
<ITEMBOX:0:3:1241:235:40:0:0:5,6,:254#武器觉醒^251#www.0478mn.com^222#手续费100W>\ \ \
<把要觉醒的衣服放到右侧的这个框框里:>         <器灵觉醒/@衣服鉴定>\
<把要觉醒的衣服放到右侧的这个框框里:>         <器灵觉醒/@衣服鉴定>\
<ITEMBOX:1:3:1241:235:120:0:0:10,11,:254#衣服觉醒^251#www.0478mn.com^222#手续费100W>\ \ \
 
[@衣服鉴定]
#IF
CHECKTEXTLIST ..\QuestDiary\鉴定\衣服名称.txt  <$BOXITEM[1].NAME>
#ACT
SetUpgradeItem 1
LockUpdateItem -1
LockUpdateAbil
GetCustomItemTextColor -1 <$STR(N196)>
#ELSEACT
ReturnBoxItem 1
MessageBox 此衣服不符合觉醒条件!!!
break
 
#IF
checkgold 1000000
#ELSEACT
MessageBox 你没有100W金币
break
 
#IF
NOT equal n196 253
#ACT
GOLDCOUNT - 1000000
;颜色
SetCustomItemAbil -1 0 0 116
SetCustomItemAbil -1 1 0 250
SetCustomItemAbil -1 2 0 147
SetCustomItemAbil -1 3 0 147
 
 
;绑定属性
SetCustomItemAbil -1 0 1 1
SetCustomItemAbil -1 1 1 2
SetCustomItemAbil -1 2 1 6
SetCustomItemAbil -1 3 1 7
 
 
;显示分行
SetCustomItemAbil -1 0 2 0
SetCustomItemAbil -1 1 2 1
SetCustomItemAbil -1 2 2 2
SetCustomItemAbil -1 3 2 3
movr n303 <$BOXITEM[1].HAC>
movr n304 <$BOXITEM[1].HMAC>
movr n305 <$BOXITEM[1].COLOR>
movr n306 <$BOXITEM[1].COLOR>
SetCustomItemText -1 [器灵觉醒]
SetCustomItemTextColor -1 253
SetCustomItemValue -1 0 + <$str(n303)>
SetCustomItemValue -1 1 + <$str(n304)>
SetCustomItemValue -1 2 + <$str(n305)>
SetCustomItemValue -1 3 + <$str(n306)>
 
UpdateItem -1
UpdateAbil
UpdateItem boxitem1
ReturnBoxItem 1
break
#ELSEACT
ReturnBoxItem 1
MessageBox 此武器不符合觉醒条件!!!
break
 
 
[@武器鉴定]
#IF
CHECKTEXTLIST ..\QuestDiary\鉴定\武器名称.txt  <$BOXITEM[0].NAME>
#ACT
SetUpgradeItem 0
LockUpdateItem -1
GetCustomItemTextColor -1 <$STR(N196)>
#ELSEACT
ReturnBoxItem 0
MessageBox 此武器不符合觉醒条件!!!
break
 
 
#IF
checkgold 1000000
#ELSEACT
MessageBox 你没有100W金币
break
 
 
#IF
NOT equal n196 253
#ACT
GOLDCOUNT - 1000000
;颜色
SetCustomItemAbil -1 0 0 116
SetCustomItemAbil -1 1 0 250
SetCustomItemAbil -1 2 0 147
 
;百分比加成
;SetCustomItemAbil -1 0 3 1
;SetCustomItemAbil -1 1 3 1
;SetCustomItemAbil -1 2 3 1
 
;绑定属性
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
 
movr n303 <$BOXITEM[0].HDC>
movr n304 <$BOXITEM[0].HMC>
movr n305 <$BOXITEM[0].HSC>
SetCustomItemText -1 [器灵觉醒]
SetCustomItemTextColor -1 253
SetCustomItemValue -1 0 + <$str(n303)>
SetCustomItemValue -1 1 + <$str(n304)>
SetCustomItemValue -1 2 + <$str(n305)>
 
UpdateItem -1
UpdateAbil
UpdateItem boxitem0
ReturnBoxItem 0
break
#ELSEACT
ReturnBoxItem 0
MessageBox 此武器不符合觉醒条件!!!
break
 
(责任编辑:找搜服传奇发布网)
------分隔线----------------------------
栏目列表
推荐内容