传奇一条龙,GM论坛,GM部落,传奇版本库,传奇服务端,传奇单机版 - dtbbk.Com

 找回密码
 立即注册

Gom引擎脚本-装备重生使者 - 传奇私服脚本

查看: 1227|回复: 0

Gom引擎脚本-装备重生使者

[复制链接]
发表于 2017-9-30 11:01:12 | 显示全部楼层 |阅读模式
[@main]
\  \  \
  <2017最火爆传奇私服,<$SERVERNAME>,经典制作,超级耐玩/AUTOCOLOR=253,250,254,249>\  
  <$USERNAME>你好,,欢迎来到<$SERVERNAME>,很高兴为您服务\\
  <┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈/SCOLOR=13>\
  <原非极品装备重生后恢复初始【未鉴定】状态,可重新穿戴属性>\
  <┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈/SCOLOR=13>\
        <我已经准备好将装备重生.|^装备颜色  元宝数量^红色装备   500元宝^粉色装备   400元宝^蓝色装备   300元宝^黄色装备   200元宝^金色装备   100元宝/@重生装备>  \
  <┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈/SCOLOR=13>\



[@重生装备]
#if
#ACT
OPENUPGRADEDLG 装备重生

[@UpgradeDlgItem]


#if
CheckItemNameColor -1 251
CHECKGaMEGOLD > 199
#ACT
GaMEGOLD - 200
mov S22 <$DLGITEM.NAME>
CHANGEITEMADDVALUE -1 0 = 0
CHANGEITEMADDVALUE -1 1 = 0
CHANGEITEMADDVALUE -1 2 = 0
CHANGEITEMADDVALUE -1 3 = 0
CHANGEITEMADDVALUE -1 4 = 0
CHANGEITEMADDVALUE -1 5 = 0
CHANGEITEMADDVALUE -1 6 = 0
CHANGEITEMADDVALUE -1 7 = 0
CHANGEITEMADDVALUE -1 8 = 0
CHANGEITEMADDVALUE -1 9 = 0
CHANGEITEMADDVALUE -1 10 = 0
CHANGEITEMADDVALUE -1 11 = 0
CHANGEITEMADDVALUE -1 12 = 0

SetNewItemValue -1 0 = 0
SetNewItemValue -1 1 = 0
SetNewItemValue -1 2 = 0
SetNewItemValue -1 3 = 0
SetNewItemValue -1 4 = 0
SetNewItemValue -1 5 = 0
SetNewItemValue -1 6 = 0
SetNewItemValue -1 7 = 0
SetNewItemValue -1 8 = 0
SetNewItemValue -1 9 = 0
SetNewItemValue -1 10 = 0
;ChangeItemNameColor -1 255
ChangeItemName -1 <$STR(S22)>
CHANGEITEMUPGRADECOUNT -1 = 0
GOTO @暴击
;RECLAIMITEM
;Close
SendMsg 5 你的装备已恢复到未鉴定状态
break




#if
CheckItemNameColor -1 252
CHECKGaMEGOLD > 299
#ACT
GaMEGOLD - 300
mov S22 <$DLGITEM.NAME>
CHANGEITEMADDVALUE -1 0 = 0
CHANGEITEMADDVALUE -1 1 = 0
CHANGEITEMADDVALUE -1 2 = 0
CHANGEITEMADDVALUE -1 3 = 0
CHANGEITEMADDVALUE -1 4 = 0
CHANGEITEMADDVALUE -1 5 = 0
CHANGEITEMADDVALUE -1 6 = 0
CHANGEITEMADDVALUE -1 7 = 0
CHANGEITEMADDVALUE -1 8 = 0
CHANGEITEMADDVALUE -1 9 = 0
CHANGEITEMADDVALUE -1 10 = 0
CHANGEITEMADDVALUE -1 11 = 0
CHANGEITEMADDVALUE -1 12 = 0

SetNewItemValue -1 0 = 0
SetNewItemValue -1 1 = 0
SetNewItemValue -1 2 = 0
SetNewItemValue -1 3 = 0
SetNewItemValue -1 4 = 0
SetNewItemValue -1 5 = 0
SetNewItemValue -1 6 = 0
SetNewItemValue -1 7 = 0
SetNewItemValue -1 8 = 0
SetNewItemValue -1 9 = 0
SetNewItemValue -1 10 = 0
;ChangeItemNameColor -1 255
ChangeItemName -1 <$STR(S22)>
CHANGEITEMUPGRADECOUNT -1 = 0
GOTO @暴击
;RECLAIMITEM
;Close
SendMsg 5 你的装备已恢复到未鉴定状态
break


#if
CheckItemNameColor -1 253
CHECKGaMEGOLD > 399
#ACT
GaMEGOLD - 400
mov S22 <$DLGITEM.NAME>
CHANGEITEMADDVALUE -1 0 = 0
CHANGEITEMADDVALUE -1 1 = 0
CHANGEITEMADDVALUE -1 2 = 0
CHANGEITEMADDVALUE -1 3 = 0
CHANGEITEMADDVALUE -1 4 = 0
CHANGEITEMADDVALUE -1 5 = 0
CHANGEITEMADDVALUE -1 6 = 0
CHANGEITEMADDVALUE -1 7 = 0
CHANGEITEMADDVALUE -1 8 = 0
CHANGEITEMADDVALUE -1 9 = 0
CHANGEITEMADDVALUE -1 10 = 0
CHANGEITEMADDVALUE -1 11 = 0
CHANGEITEMADDVALUE -1 12 = 0

SetNewItemValue -1 0 = 0
SetNewItemValue -1 1 = 0
SetNewItemValue -1 2 = 0
SetNewItemValue -1 3 = 0
SetNewItemValue -1 4 = 0
SetNewItemValue -1 5 = 0
SetNewItemValue -1 6 = 0
SetNewItemValue -1 7 = 0
SetNewItemValue -1 8 = 0
SetNewItemValue -1 9 = 0
SetNewItemValue -1 10 = 0
;ChangeItemNameColor -1 255
ChangeItemName -1 <$STR(S22)>
CHANGEITEMUPGRADECOUNT -1 = 0
GOTO @暴击
;RECLAIMITEM
;Close
SendMsg 5 你的装备已恢复到未鉴定状态
break

#if
CheckItemNameColor -1 249
CHECKGaMEGOLD > 499
#ACT
GaMEGOLD - 500
mov S22 <$DLGITEM.NAME>
CHANGEITEMADDVALUE -1 0 = 0
CHANGEITEMADDVALUE -1 1 = 0
CHANGEITEMADDVALUE -1 2 = 0
CHANGEITEMADDVALUE -1 3 = 0
CHANGEITEMADDVALUE -1 4 = 0
CHANGEITEMADDVALUE -1 5 = 0
CHANGEITEMADDVALUE -1 6 = 0
CHANGEITEMADDVALUE -1 7 = 0
CHANGEITEMADDVALUE -1 8 = 0
CHANGEITEMADDVALUE -1 9 = 0
CHANGEITEMADDVALUE -1 10 = 0
CHANGEITEMADDVALUE -1 11 = 0
CHANGEITEMADDVALUE -1 12 = 0

SetNewItemValue -1 0 = 0
SetNewItemValue -1 1 = 0
SetNewItemValue -1 2 = 0
SetNewItemValue -1 3 = 0
SetNewItemValue -1 4 = 0
SetNewItemValue -1 5 = 0
SetNewItemValue -1 6 = 0
SetNewItemValue -1 7 = 0
SetNewItemValue -1 8 = 0
SetNewItemValue -1 9 = 0
SetNewItemValue -1 10 = 0
;ChangeItemNameColor -1 255
ChangeItemName -1 <$STR(S22)>
CHANGEITEMUPGRADECOUNT -1 = 0
GOTO @暴击
;RECLAIMITEM
;Close
SendMsg 5 你的装备已恢复到未鉴定状态
break

#if
CheckItemNameColor -1 243
CHECKGaMEGOLD > 99
#ACT
GaMEGOLD - 100
mov S22 <$DLGITEM.NAME>
CHANGEITEMADDVALUE -1 0 = 0
CHANGEITEMADDVALUE -1 1 = 0
CHANGEITEMADDVALUE -1 2 = 0
CHANGEITEMADDVALUE -1 3 = 0
CHANGEITEMADDVALUE -1 4 = 0
CHANGEITEMADDVALUE -1 5 = 0
CHANGEITEMADDVALUE -1 6 = 0
CHANGEITEMADDVALUE -1 7 = 0
CHANGEITEMADDVALUE -1 8 = 0
CHANGEITEMADDVALUE -1 9 = 0
CHANGEITEMADDVALUE -1 10 = 0
CHANGEITEMADDVALUE -1 11 = 0
CHANGEITEMADDVALUE -1 12 = 0

SetNewItemValue -1 0 = 0
SetNewItemValue -1 1 = 0
SetNewItemValue -1 2 = 0
SetNewItemValue -1 3 = 0
SetNewItemValue -1 4 = 0
SetNewItemValue -1 5 = 0
SetNewItemValue -1 6 = 0
SetNewItemValue -1 7 = 0
SetNewItemValue -1 8 = 0
SetNewItemValue -1 9 = 0
SetNewItemValue -1 10 = 0
;ChangeItemNameColor -1 255
ChangeItemName -1 <$STR(S22)>
CHANGEITEMUPGRADECOUNT -1 = 0
GOTO @暴击
;RECLAIMITEM
;Close
SendMsg 5 你的装备已恢复到未鉴定状态
break

#elseact
RECLAIMITEM
MESSAGEBOX 你的元宝不足或者此装备无法重生![所需元宝是按鉴定的装备颜色收费]



[@暴击]
#if
random 80
#act
SetNewItemValue -1 0 = 5
ChangeItemUpgradeCount 0 = 50
ChangeItemUpgradeCount -1 = 5
RECLAIMITEM
break

#if
random 60
#act
SetNewItemValue -1 0 = 4
ChangeItemUpgradeCount -1 = 4
RECLAIMITEM
break

#if
random 30
#act
SetNewItemValue -1 0 = 3
ChangeItemUpgradeCount -1 = 3
RECLAIMITEM
break

#if
random 5
#act
SetNewItemValue -1 0 = 2
ChangeItemUpgradeCount -1 = 2
RECLAIMITEM
break

#if
random 2
#act
SetNewItemValue -1 0 = 1
ChangeItemUpgradeCount -1 = 1
RECLAIMITEM
break

#if
random 1
#act
SetNewItemValue -1 0 = 0
ChangeItemUpgradeCount -1 = 0
RECLAIMITEM
break


回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

Archiver/手机版/Gm版本库 ( 蜀ICP备20007044号-4 )|网站地图

GMT+8, 2024-12-25 10:32 , Processed in 0.126009 second(s), 16 queries .

Powered by GM版本库 X3.4

© 2001-2011 传奇版本库>  template by 版本库