传奇GOM引擎七星武器锻造脚本_传奇装备加星脚本
[@main]
#ACT
OPENMERCHANTBIGDLG 14 742 0 0 10 0 0 0 0
#say
<Img:233:0:360:0/@EXIT>
<我这里可以给武器锻造洗练/SCOLOR=253>
< 〓〓〓〓〓〓〓〓〓/SCOLOR=70> <独家BUFF系统/SCOLOR=251> <〓〓〓〓〓〓〓〓〓/SCOLOR=70>
<锻造师:我这里可以给武器锻造,[锻造属性]星星越高越好/SCOLOR=249>
<满10点升一个星星,例如锻造属性为一星,那只能锻造至一星/SCOLOR=249>
<4个星星以上的武器会额外附加元素属性/SCOLOR=249>
<武器可分1-7星锻造品质/AUTOCOLOR=254,251,168,191,250,70,245,249,253>
<初始的武器星星低了可以去洗练武器,洗练会清除一切锻造属性/SCOLOR=251>
<开始锻造武器/@衣服buff附魔> <洗练武器|250#每次洗练固定收费50W金币/@武器星级>
<PlayImg:0:3150:1:300:168:-14:0>
[@武器星级]
#SAY
放入武器→<ITEMBOX:2:22:3234:6:-12:41:38:53,5:放入需要洗练的武器> ←放入武器
<PlayImg:14:2650:8:100:-10:-50:1>
<PlayImg:0:2848:4:800:-25:-55:1>
<开始洗练/@开始洗星星>
<返回首页/@main>
<Img:233:0:190:-335/@EXIT>
<PlayImg:0:560:10:300:87:-257:1>
OPENMERCHANTBIGDLG 14 760 1 4 0 0 1 370 15
break
[@ItemIntoBox2]
SetUpgradeItem 2
mov S22 <$BOXITEM[2].NAME>
GOTO @重生类型判断2
[@重生类型判断2]
#if
CheckTextList ..QuestDiary列表文件可锻造装备列表.txt <$STR(S22)>
#elseact
ReturnBoxItem 2
MESSAGEBOX 指定的武器才可以洗练
[@开始洗星星]
#IF
Equal <$BOXITEM[2].NAME_G>
MessageBox 洗练失败,你还没有把武器放进去。
NOT Equal <$BOXITEM[2].NAME_G>
goto @几率锻造1212
[@几率锻造1212]
checkgold 500000
take 金币 500000
ChangeItemUpgradeCount -1 = 0
CHANGECUSTOMITEMPROGRESSBARVALUE -1 0 0 = 0
CHANGECUSTOMITEMVALUE -1 0 = 0
CHANGECUSTOMITEMVALUE -1 1 = 0
CHANGECUSTOMITEMVALUE -1 2 = 0
CHANGECUSTOMITEMVALUE -1 3 = 0
CHANGECUSTOMITEMVALUE -1 4 = 0
CHANGECUSTOMITEMVALUE -1 5 = 0
CHANGECUSTOMITEMVALUE -1 6 = 0
CHANGECUSTOMITEMVALUE -1 7 = 0
CHANGECUSTOMITEMVALUE -1 8 = 0
CHANGECUSTOMITEMVALUE -1 9 = 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
goto @开始了锻造1231
SENDMSG 5 洗练锻造属性需要50W金币
[@开始了锻造1231]
RANDOM 50
CHANGECUSTOMITEMTEXT -1 [锻造属性]：七星
;修改备注名称颜色
CHANGECUSTOMITEMTEXTCOLOR -1 243
ChangeItemNameColor -1 241
CHANGECUSTOMITEMPROGRESSBAR -1 0 0 1
CHANGECUSTOMITEMPROGRESSBARVALUE -1 0 1 = 10
CHANGECUSTOMITEMPROGRESSBAR -1 0 2 22
CHANGECUSTOMITEMPROGRESSBAR -1 0 4 2
CHANGECUSTOMITEMPROGRESSBAR -1 0 1 锻造Lv:
SENDMSG 6 洗练成功
SENDMOVEMSG 0 241 255 100 1 【<$USERNAME>】在武器锻造师把【<$BOXITEM[2].NAME>】洗练出了七星的锻造属性
UpDateBoxItem 2
RANDOM 40
CHANGECUSTOMITEMTEXT -1 [锻造属性]：六星
ChangeItemNameColor -1 249
SENDMOVEMSG 0 241 255 100 1 【<$USERNAME>】在武器锻造师把【<$BOXITEM[2].NAME>】洗练出了六星的锻造属性
RANDOM 30
CHANGECUSTOMITEMTEXT -1 [锻造属性]：五星
ChangeItemNameColor -1 253
SendCenterMsg 249 0 【<$USERNAME>】在武器锻造师把【<$BOXITEM[2].NAME>】洗练出了五星的锻造属性 1 10
RANDOM 20
CHANGECUSTOMITEMTEXT -1 [锻造属性]：四星
ChangeItemNameColor -1 229
SendCenterMsg 249 0 【<$USERNAME>】在武器锻造师把【<$BOXITEM[2].NAME>】洗练出了四星的锻造属性 1 10
RANDOM 5
CHANGECUSTOMITEMTEXT -1 [锻造属性]：三星
ChangeItemNameColor -1 254
CHANGECUSTOMITEMTEXT -1 [锻造属性]：二星
CHANGECUSTOMITEMTEXTCOLOR -1 254
ChangeItemNameColor -1 250
[@衣服buff附魔]
放入武器→<ITEMBOX:1:22:3234:6:-12:41:38:53,5:放入需要锻造的武器> ←放入武器
<确定锻造/@开始衣服附魔>
<PlayImg:0:3151:1:800:79:-269:1>
[@ItemIntoBox1]
SetUpgradeItem 1
mov S22 <$BOXITEM[1].NAME>
GOTO @重生类型21
[@重生类型21]
GOTO @判断23
ReturnBoxItem 1
MESSAGEBOX 指定的武器才可以锻造
[@判断23]
CheckItemupgradeCount -1 1 = 6
SENDMSG 7 您当前放入的是【六星属性武器】请确定包袱内有【金币70万】
CheckItemupgradeCount -1 1 = 5
SENDMSG 7 您当前放入的是【五星属性武器】请确定包袱内有【金币60万】
CheckItemupgradeCount -1 1 = 4
SENDMSG 7 您当前放入的是【四星属性武器】请确定包袱内有【金币50万】
CheckItemupgradeCount -1 1 = 3
SENDMSG 7 您当前放入的是【三星属性武器】请确定包袱内有【金币40万】
CheckItemupgradeCount -1 1 = 2
SENDMSG 7 您当前放入的是【二星属性武器】请确定包袱内有【金币30万】
CheckItemupgradeCount -1 1 = 1
SENDMSG 7 您当前放入的是【一星属性武器】请确定包袱内有【金币20万】
CheckItemupgradeCount -1 1 = 0
SENDMSG 7 您当前放入的【武器没有星级】请确定包袱内有【金币10万】
MESSAGEBOX 您当前放入的装备无法锻造
[@开始衣服附魔]
Equal <$BOXITEM[1].NAME_G>
MessageBox 锻造失败,你还没有把武器放进去。
NOT Equal <$BOXITEM[1].NAME_G>
goto @几率锻造
[@几率锻造]
CheckItemNameColor -1 255
#act
goto @传说武器11
CheckItemNameColor -1 250
goto @传说武器22
CheckItemNameColor -1 254
goto @传说武器33
CheckItemNameColor -1 229
goto @传说武器44
CheckItemNameColor -1 253
goto @传说武器55
CheckItemNameColor -1 249
goto @传说武器66
CheckItemNameColor -1 241
goto @传说武器77
MESSAGEBOX 武器要经过佩戴出锻造经验条才可以锻造
[@传说武器11]
SENDMSG 5 此武器只能锻造到一星等级
goto @开始锻造01
[@开始锻造01]
checkgold 700000
take 金币 700000
goto @开始了锻造1
checkgold 600000
take 金币 600000
checkgold 400000
take 金币 400000
checkgold 300000
take 金币 300000
checkgold 200000
take 金币 200000
checkgold 100000
take 金币 100000
SENDMSG 5 金币不足
[@开始了锻造1]
RANDOM 2
CheckItemupgradeCount -1 1 < 2
CHANGECUSTOMITEMPROGRESSBARVALUE -1 0 0 + 2
;自定义对应属性位置的数值
CHANGECUSTOMITEMVALUE -1 0 + 1
CHANGECUSTOMITEMVALUE -1 1 + 1
CHANGECUSTOMITEMVALUE -1 2 + 1
;自定义属性说明的颜色
CHANGECUSTOMITEMABIL -1 0 0 251
CHANGECUSTOMITEMABIL -1 1 0 251
CHANGECUSTOMITEMABIL -1 2 0 251
;自定义属性代表的位置
CHANGECUSTOMITEMABIL -1 0 1 3
CHANGECUSTOMITEMABIL -1 1 1 4
CHANGECUSTOMITEMABIL -1 2 1 5
;自定义属性显示的格式
CHANGECUSTOMITEMABIL -1 0 2 2
CHANGECUSTOMITEMABIL -1 1 2 3
CHANGECUSTOMITEMABIL -1 2 2 4
;自定义属性是否百分比
CHANGECUSTOMITEMABIL -1 0 3 0
CHANGECUSTOMITEMABIL -1 1 3 0
CHANGECUSTOMITEMABIL -1 2 3 0
UpDateBoxItem 1
goto @传说武器111
SENDMSG 6 您的武器锻造成功
RANDOM 4
CheckItemupgradeCount -1 1 > 1
goto @几率锻造1
[@几率锻造1]
CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 > 1
CheckItemupgradeCount -1 1 > 2
CHANGECUSTOMITEMPROGRESSBARVALUE -1 0 0 - 2
CHANGECUSTOMITEMVALUE -1 0 - 1
CHANGECUSTOMITEMVALUE -1 1 - 1
CHANGECUSTOMITEMVALUE -1 2 - 1
SENDMSG 5 您的武器锻造失败，锻造经验下掉2点
CheckItemupgradeCount -1 1 < 3
SENDMSG 7 很可惜，您的装备锻造失败了，等级不变
[@传说武器111]
CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 = 10
ChangeItemUpgradeCount -1 + 1
goto @元素检测
;--------------------------------------------------
[@传说武器22]
SENDMSG 5 此武器只能锻造到二星等级
goto @开始锻造02
[@开始锻造02]
goto @开始了锻造2
[@开始了锻造2]
goto @传说武器222
goto @几率锻造2
[@几率锻造2]
[@传说武器222]
CheckItemupgradeCount -1 1 < 1
CHANGECUSTOMITEMPROGRESSBARVALUE -1 0 0 - 10
[@传说武器33]
SENDMSG 5 此武器只能锻造到三星等级
goto @开始锻造03
[@开始锻造03]
goto @开始了锻造3
[@开始了锻造3]
goto @传说武器333
goto @几率锻造3
[@几率锻造3]
[@传说武器333]
CHANGECUSTOMITEMVALUE -1 4 + 1
CHANGECUSTOMITEMVALUE -1 5 + 1
CHANGECUSTOMITEMVALUE -1 6 + 1
CHANGECUSTOMITEMABIL -1 4 0 254
CHANGECUSTOMITEMABIL -1 5 0 254
CHANGECUSTOMITEMABIL -1 6 0 254
CHANGECUSTOMITEMABIL -1 4 1 3
CHANGECUSTOMITEMABIL -1 5 1 4
CHANGECUSTOMITEMABIL -1 6 1 5
CHANGECUSTOMITEMABIL -1 4 2 2
CHANGECUSTOMITEMABIL -1 5 2 3
CHANGECUSTOMITEMABIL -1 6 2 4
CHANGECUSTOMITEMABIL -1 4 3 0
CHANGECUSTOMITEMABIL -1 5 3 0
CHANGECUSTOMITEMABIL -1 6 3 0
[@传说武器44]
SENDMSG 5 此武器只能锻造到四星等级
goto @开始锻造04
[@开始锻造04]
goto @开始了锻造4
[@开始了锻造4]
goto @传说武器444
goto @几率锻造4
[@几率锻造4]
[@传说武器444]
CHANGECUSTOMITEMVALUE -1 4 + 2
CHANGECUSTOMITEMVALUE -1 5 + 2
CHANGECUSTOMITEMVALUE -1 6 + 2
[@传说武器55]
SENDMSG 5 此武器只能锻造到五星等级
goto @开始锻造05
[@开始锻造05]
goto @开始了锻造5
[@开始了锻造5]
RANDOM 8
CheckItemupgradeCount -1 1 > 4
goto @传说武器555
CheckItemupgradeCount -1 1 < 5
goto @几率锻造5
[@几率锻造5]
[@传说武器555]
CHANGECUSTOMITEMVALUE -1 3 + 1
CHANGECUSTOMITEMABIL -1 3 0 249
CHANGECUSTOMITEMABIL -1 3 1 6
CHANGECUSTOMITEMABIL -1 3 2 5
CHANGECUSTOMITEMABIL -1 3 3 1
CHANGECUSTOMITEMABIL -1 4 3 1
CHANGECUSTOMITEMABIL -1 5 3 1
CHANGECUSTOMITEMABIL -1 6 3 1
CheckItemupgradeCount -1 1 < 4
[@传说武器66]
SENDMSG 5 此武器只能锻造到六星等级
goto @开始锻造06
[@开始锻造06]
goto @开始了锻造6
[@开始了锻造6]
goto @传说武器666
goto @几率锻造6
[@几率锻造6]
[@传说武器666]
[@传说武器77]
CheckItemupgradeCount -1 1 = 7
SENDMSG 5 此武器只能锻造到七星等级
goto @开始锻造07
[@开始锻造07]
goto @开始了锻造7
[@开始了锻造7]
goto @传说武器777
goto @几率锻造7
[@几率锻造7]
[@传说武器777]
CHANGECUSTOMITEMVALUE -1 3 + 3
CheckItemupgradeCount -1 1 < 6
[@元素检测]
movr S86 0 7
SetNewItemValue -1 <$STR(S86)> = 3
movr S87 0 7
SetNewItemValue -1 <$STR(S87)> = 4
movr S88 0 7
SetNewItemValue -1 <$STR(S88)> = 5
movr S89 0 7
SetNewItemValue -1 <$STR(S89)> = 6
