传奇服务端-传奇版本库-传奇一条龙-单机版下载-GM基地部落-酷游戏论坛

 找回密码
 立即注册
查看: 1936|回复: 0

装备重生使者我-3传奇脚本{需要进行重生的装备放入框内}

[复制链接]

1万

主题

1万

帖子

24万

积分

社区管理员

Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20

积分
246665
金钱
229474

优秀版主突出贡献灌水之王宣传达人推广达人热心会员活跃会员最佳新人荣誉管理论坛元老

QQ
发表于 2019-2-20 16:35:11 | 显示全部楼层 |阅读模式
()
%100
[@main]
#if
#say
<把需要进行重生的装备放入框内(圣战以上60级以下的装备)/SCOLOR=243>\
<装备重生后将恢复到未鉴定的状态/SCOLOR=243><|/FCOLOR=255>\
  <>                           <装备重生费用:20万金币一次/SCOLOR=243><|/FCOLOR=255><Img:302:10:95:-82>
<|/FCOLOR=255><ITEMBOX:7:11:251:90:50:20:20:*:放入装备>\
<|/FCOLOR=255>\
<|/FCOLOR=255>\
<|/FCOLOR=255>\
<|/FCOLOR=255>\
<|/FCOLOR=255>       <重生/@初始化an0>      \
<装备重生后需要丢在地上捡取获得新的属性!/SCOLOR=243><|/FCOLOR=255>\
[@ItemIntoBox7]
#IF
#ACT
MOV S99 <$BOXITEM[7].NAME>
SetUpgradeItem 7
DELAYGOTO 20 @紫色检测ib
[@紫色检测ib]
#IF
NOT CHECKTEXTLIST ..\QuestDiary\随机元素\初始化首饰1000.txt <$STR(S99)>
#ACT
UpdateItem boxitem7
ReturnBoxItem 7
MESSAGEBOX 您的放入的装备不是60级以下的装备 或者圣战以上的!
break
[@初始化an0]
#if
#act
MOV S99 <$BOXITEM[7].NAME>
#if
checkgold 200000
CHECKTEXTLIST ..\QuestDiary\随机元素\初始化首饰1000.txt <$STR(S99)>
#ACT
CHANGEITEMADDVALUE boxitem7 12 = 1
SetNewItemValue boxitem7 0 = 0
SetNewItemValue boxitem7 1 = 0
SetNewItemValue boxitem7 2 = 0
SetNewItemValue boxitem7 3 = 0
SetNewItemValue boxitem7 4 = 0
SetNewItemValue boxitem7 5 = 0
SetNewItemValue boxitem7 6 = 0
SetNewItemValue boxitem7 7 = 0
SetNewItemValue boxitem7 8 = 0
CHANGEITEMADDVALUE boxitem7 0 = 0
CHANGEITEMADDVALUE boxitem7 1 = 0
CHANGEITEMADDVALUE boxitem7 2 = 0
CHANGEITEMADDVALUE boxitem7 3 = 0
CHANGEITEMADDVALUE boxitem7 4 = 0
SetCustomItemValue boxitem7 0 = 0
SetCustomItemValue boxitem7 1 = 0
SetCustomItemValue boxitem7 2 = 0
SetCustomItemValue boxitem7 3 = 0
SetCustomItemValue boxitem7 4 = 0
SetCustomItemValue boxitem7 5 = 0
SetCustomItemValue boxitem7 6 = 0
SetCustomItemValue boxitem7 7 = 0
SetCustomItemValue boxitem7 8 = 0
SetCustomItemValue boxitem7 9 = 0
SetCustomItemText boxitem7
SETCUSTOMITEMPROGRESSBARVALUE boxitem7 0 0 = 0
SetCustomItemProgressbar boxitem7 0 0 0
CloseItemFlute boxitem7 8
SetCustomItemProgressbarValue boxitem7 0 3 = 0
SetCustomItemProgressbarValue boxitem7 1 3 = 0
CHANGEITEMNAMECOLOR boxitem7 0
CHANGEITEMUPGRADECOUNT boxitem7 = 0
ChangeItemName boxitem7 <$BOXITEM[7].NAME>
UpdateItem boxitem7
ReturnBoxItem 7
take 金币 200000
SendMsg 5 你的装备已重生,重新穿戴即可鉴定属性!
break
#elseact
sendmsg 5 金币不足!

天马网络-酷游戏-传奇服务端下载,回复帖子即出现下载地址!天马QQ:36560477
QQ群145512476,发广告帖封号处理,技术问题去【有问必答板块】
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|酷游戏论坛冀公网安备13012302000634 ( 冀ICP备2024071363号-2 )

GMT+8, 2025-5-2 11:43 , Processed in 0.072008 second(s), 27 queries .

Powered by 酷游戏论坛 X3.4 传奇一条龙

© 免责声明:本站所有资源均来至网络,仅供学习交流,严禁用于商业用途,请于24小时内删除!

快速回复 返回顶部 返回列表