传奇一条龙开区车候辕匠神传奇脚本

[@main]

<> \ \

鸿蒙首饰：鸿蒙·盔，鸿蒙·之心，鸿蒙·手，鸿蒙·镯，鸿蒙·靴，鸿蒙·带\

灵气值注满后会随机出现属性！,\

注满后出现的属性不满意可以继续注入\ \ \

\ <灵饰注入灵气/@灵饰>\ \

;\ <鸿蒙首饰铸灵/@重铸>

[@开始锻造]

此功能暂未开放！

[@重铸]

放入一个我打造出的首饰！\

<当然也不是免费的,你需要支付我一定的数量元宝手工费！/AUTOCOLOR=254>\

<打造出的装备属性不满意可以找我重铸！/AUTOCOLOR=253>\

<装备不变.属性重新随机出.需要注入灵气的鸿蒙首饰/AUTOCOLOR=253>\

\ <请把/AUTOCOLOR=250><鸿蒙首饰/AUTOCOLOR=251><放入第一个框内/AUTOCOLOR=250> <鸿蒙灵气/AUTOCOLOR=251><放入第二个框内/AUTOCOLOR=250>\

\

\ <ITEMBOX:2:4:661:30:-1:42:42:15,20,30,26,24,64,62,51:请放入8转首饰> <ITEMBOX:3:4:661:90:-1:42:42:43:请放入鸿蒙灵气> \ \ \

\ <确定锻造/@确定锻造>

[@ItemIntoBox2]

#IF

CheckContainsTextList ..\QuestDiary\装备碎片系统\八转装备.txt <$BOXITEM[2].NAME>

#ACT

GOTO @这个可以重铸

BREAK

#ELSEACT

MESSAGEBOX 　\　\你放置的物品不能重铸！

ReturnBoxItem 2

BREAK

[@这个可以重铸]

#IF

EQUAL <$BOXITEM[2].NAME_G> <$BOXITEM[2].NAME>

#ACT

;MESSAGEBOX 　\　\你放置的物品还没有铸造，铸造后不满意在重铸！

BREAK

#ELSEACT

MOV S40 <$BOXITEM[2].NAME>

MOV S41 200000

MOV S42 199999

GOTO @重铸

BREAK

[@ItemIntoBox3]

#IF

EQUAL <$BOXITEM[3].NAME> 鸿蒙灵气

#ACT

GOTO @重铸

BREAK

#ELSEACT

ReturnBoxItem 3

MESSAGEBOX 　\　\请放置[鸿蒙灵气]！

BREAK

[@确定锻造]

#ACT

SetUpgradeItem 2

#IF

CheckBoxItemCount 3

EQUAL <$BOXITEM[2].NAME> <$STR(S40)>

EQUAL <$BOXITEM[3].NAME> 鸿蒙灵气

CheckContainsText <$BOXITEM[2].NAME> <$STR(S40)>

CheckContainsText <$BOXITEM[3].NAME> 鸿蒙灵气

#act

GOTO @A铸造A

#ELSEACT

MESSAGEBOX 　\　\请放置好[鸿蒙灵气]后点击升级！

ReturnBoxItem 3

BREAK

[@A铸造A]

#IF

CHECKGAMEGOLD > <$STR(S42)>

#act

DELBOXITEM 3

GOTO @铸造升级

BREAK

#ELSEACT

ReturnBoxItem 2

ReturnBoxItem 3

MESSAGEBOX 请放入对应的物品，需要元宝<$STR(S41)>个!

BREAK

[@铸造升级]

#ACT

GAMEGOLD – <$STR(S41)>

CHANGECUSTOMITEMTEXT -1 <$YEAR>-<$MONTH>-<$DAY>:<$HOUR>:<$MINUTE>[铸]

CHANGECUSTOMITEMTEXTCOLOR -1 251

CHANGECUSTOMITEMVALUE -1 4 = 0

CHANGECUSTOMITEMVALUE -1 5 = 0

CHANGECUSTOMITEMVALUE -1 6 = 0

MOVR S3 10

MOVR S4 10

MOVR S5 10

CHANGECUSTOMITEMABIL -1 4 1 3

CHANGECUSTOMITEMABIL -1 5 1 4

CHANGECUSTOMITEMABIL -1 6 1 5

CHANGECUSTOMITEMABIL -1 4 3 0

CHANGECUSTOMITEMABIL -1 5 3 0

CHANGECUSTOMITEMABIL -1 6 3 0

CHANGECUSTOMITEMABIL -1 4 2 1

CHANGECUSTOMITEMABIL -1 5 2 2

CHANGECUSTOMITEMABIL -1 6 2 3

CHANGECUSTOMITEMABIL -1 4 0 253

CHANGECUSTOMITEMABIL -1 5 0 253

CHANGECUSTOMITEMABIL -1 6 0 253

CHANGECUSTOMITEMVALUE -1 4 = <$STR(S3)>

CHANGECUSTOMITEMVALUE -1 5 = <$STR(S4)>

CHANGECUSTOMITEMVALUE -1 6 = <$STR(S5)>

UpDateBoxItem 3

UpDateBoxItem 2

ReturnBoxItem 2

break

[@灵饰]

\ 首饰注入灵气系统\

\<原装备不会消失/AUTOCOLOR=250> <查看详细说明|250#此功能暂时只支持5.6.7.8转首饰[盔.链.勋.镯.带.靴.佩]^250#以下为满灵气值时所加属性^83#──────────────────────────────────────^251#头盔–随机增加1-10点攻魔道百分比(此攻魔道百分比与装备自身的相乘加的很多)^251#项链–攻击伤害随机增加1-10点(攻击伤害元素)^251#勋章–人物体力随机增加1-30点(加血的元素)^251#手镯–人物体力随机增加1-20点(加血的元素)^251#靴子–随机增加1-3点攻魔道百分比(此攻魔道百分比与装备自身相乘加的很多)^251#腰带–随机增加1-3点攻魔道百分比(此攻魔道百分比与装备自身相乘加的很多)^251#配饰–暴击几率随机增加1-5点,攻击伤害随机增加1-5点(同时双加)^83#──────────────────────────────────────^254#注意1:当灵气值满10000／10000时会增加以上的属性.并且清空灵气值^254#注意2:再次满灵气时,属性会覆盖之前所加的属性.(不可叠加)/AUTOCOLOR=251> \

\ <↓/AUTOCOLOR=250> \

\<ITEMBOX:0:0:47:20:-13:42:42:15,20,30,26,24,64,62,51:250#请放入需要注入灵气的装备> <←放入要精炼的装备/AUTOCOLOR=254> <摧毁此物提取灵气/AUTOCOLOR=253>\

\ <↓/AUTOCOLOR=253> \

\ <↓/AUTOCOLOR=253> \ \

\<ITEMBOX:1:0:117:280:-45:76:76:15,20,30,26,24,64,62,51,5,:250#放入要提取灵气的装备>\

\<我确定把圈内的物品摧毁,并提取灵气注入到原装备/@灵气注入>\ \

<注意:圆圈内的装备一旦把灵气提取出来后会被摧毁!/AUTOCOLOR=254>\

<注意:圆圈内装备的灵气提取出来直接注入到原装备里面!/AUTOCOLOR=254>\

<说明:圆圈内可以放入高级装备/AUTOCOLOR=254>

[@ItemIntoBox0]

#IF

EQUAL <$BOXITEM[0].NAME> 鸿蒙·盔

#ACT

MOV S40 <$BOXITEM[0].NAME>

MOV S41 50000

MOV S42 49999

MOVR S45 10

MOVR S46 10

MOVR S52 10

MOV S51 头盔

BREAK

#IF

EQUAL <$BOXITEM[0].NAME> 鸿蒙·战链

#ACT

MOV S40 <$BOXITEM[0].NAME>

MOV S41 50000

MOV S42 49999

MOVR S52 10

MOV S51 项链

BREAK

#IF

EQUAL <$BOXITEM[0].NAME> 鸿蒙·之心

#ACT

MOV S40 <$BOXITEM[0].NAME>

MOV S41 50000

MOV S42 49999

MOVR S52 30

MOV S51 勋章

BREAK

#IF

EQUAL <$BOXITEM[0].NAME> 鸿蒙·手

#ACT

MOV S40 <$BOXITEM[0].NAME>

MOV S41 50000

MOV S42 49999

MOVR S52 20

MOV S51 手镯

BREAK

#IF

EQUAL <$BOXITEM[0].NAME> 鸿蒙·镯

#ACT

MOV S40 <$BOXITEM[0].NAME>

MOV S41 50000

MOV S42 49999

MOVR S52 20

MOV S51 手镯

BREAK

#IF

EQUAL <$BOXITEM[0].NAME> 鸿蒙·靴

#ACT

MOV S40 <$BOXITEM[0].NAME>

MOV S41 50000

MOV S42 49999

MOVR S45 3

MOVR S46 3

MOVR S52 3

MOV S51 靴子

BREAK

#IF

EQUAL <$BOXITEM[0].NAME> 鸿蒙·带

#ACT

MOV S40 <$BOXITEM[0].NAME>

MOV S41 50000

MOV S42 49999

MOVR S45 3

MOVR S46 3

MOVR S52 3

MOV S51 腰带

BREAK

#IF

EQUAL <$BOXITEM[0].NAME> 鸿蒙·佩

#ACT

MOV S40 <$BOXITEM[0].NAME>

MOV S41 50000

MOV S42 49999

MOVR S52 5

MOV S51 配饰

BREAK

#ELSEACT

ReturnBoxItem 0

MESSAGEBOX 　\　\你放置的物品不能吸收灵气！

BREAK

[@ItemIntoBox1]

#IF

CheckContainsTextList ..\QuestDiary\装备碎片系统\五转装备.txt <$BOXITEM[1].NAME>

#ACT

MOV S43 <$BOXITEM[1].NAME>

MOV S44 18

BREAK

#IF

CheckContainsTextList ..\QuestDiary\装备碎片系统\残武器.txt <$BOXITEM[1].NAME>

#ACT

MOV S43 <$BOXITEM[1].NAME>

MOV S44 88

BREAK

#IF

CheckContainsTextList ..\QuestDiary\装备碎片系统\成品武器.txt <$BOXITEM[1].NAME>

#ACT

MOV S43 <$BOXITEM[1].NAME>

MOV S44 588

BREAK

#IF

CheckContainsTextList ..\QuestDiary\装备碎片系统\上古残武器.txt <$BOXITEM[1].NAME>

#ACT

MOV S43 <$BOXITEM[1].NAME>

MOV S44 288

BREAK

#IF

CheckContainsTextList ..\QuestDiary\装备碎片系统\上古成品武器.txt <$BOXITEM[1].NAME>

#ACT

MOV S43 <$BOXITEM[1].NAME>

MOV S44 2880

BREAK

#IF

CheckContainsTextList ..\QuestDiary\装备碎片系统\起源残武器.txt <$BOXITEM[1].NAME>

#ACT

MOV S43 <$BOXITEM[1].NAME>

MOV S44 1888

BREAK

#IF

CheckContainsTextList ..\QuestDiary\装备碎片系统\起源成品武器.txt <$BOXITEM[1].NAME>

#ACT

MOV S43 <$BOXITEM[1].NAME>

MOV S44 3880

BREAK

#IF

CheckContainsTextList ..\QuestDiary\装备碎片系统\六转装备.txt <$BOXITEM[1].NAME>

#ACT

MOV S43 <$BOXITEM[1].NAME>

MOV S44 88

BREAK

#IF

CheckContainsTextList ..\QuestDiary\装备碎片系统\七转装备.txt <$BOXITEM[1].NAME>

#ACT

MOV S43 <$BOXITEM[1].NAME>

MOV S44 488

BREAK

#IF

CheckContainsTextList ..\QuestDiary\装备碎片系统\八转装备.txt <$BOXITEM[1].NAME>

#ACT

MOV S43 <$BOXITEM[1].NAME>

MOV S44 888

BREAK

#ELSEACT

ReturnBoxItem 1

MESSAGEBOX 　\　\你放置的物品不能提取灵气！

BREAK

[@灵气注入]

#ACT

SetUpgradeItem 0

#IF

CHECKGAMEGOLD > <$STR(S42)>

EQUAL <$BOXITEM[0].NAME> <$STR(S40)>

EQUAL <$BOXITEM[1].NAME> <$STR(S43)>

CheckContainsText <$BOXITEM[0].NAME> <$STR(S40)>

CheckContainsText <$BOXITEM[1].NAME> <$STR(S43)>

#act

DELBOXITEM 1

GOTO @灵气升级

BREAK

#ELSEACT

ReturnBoxItem 0

ReturnBoxItem 1

MESSAGEBOX 请放入对应的物品，需要元宝<$STR(S41)>个!

BREAK

[@灵气升级]

#ACT

GAMEGOLD – <$STR(S41)>

CHANGECUSTOMITEMPROGRESSBAR -1 0 0 1

CHANGECUSTOMITEMPROGRESSBAR -1 0 1 灵气值:

CHANGECUSTOMITEMPROGRESSBAR -1 0 2 69

CHANGECUSTOMITEMPROGRESSBAR -1 0 4 2

CHANGECUSTOMITEMPROGRESSBAR -1 0 3 19

CHANGECUSTOMITEMPROGRESSBARVALUE -1 0 1 = 10000

CHANGECUSTOMITEMPROGRESSBARVALUE -1 0 0 + <$STR(S44)>

UpDateBoxItem 0

GOTO @<$STR(S51)>

break

[@头盔]

#IF

CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 > 9999

#ACT

CHANGECUSTOMITEMPROGRESSBARVALUE -1 0 0 = 0

CHANGECUSTOMITEMABIL -1 7 1 3

CHANGECUSTOMITEMABIL -1 8 1 4

CHANGECUSTOMITEMABIL -1 9 1 5

CHANGECUSTOMITEMABIL -1 7 3 1

CHANGECUSTOMITEMABIL -1 8 3 1

CHANGECUSTOMITEMABIL -1 9 3 1

CHANGECUSTOMITEMABIL -1 7 2 4

CHANGECUSTOMITEMABIL -1 8 2 5

CHANGECUSTOMITEMABIL -1 9 2 6

CHANGECUSTOMITEMABIL -1 7 0 253

CHANGECUSTOMITEMABIL -1 8 0 253

CHANGECUSTOMITEMABIL -1 9 0 253

CHANGECUSTOMITEMVALUE -1 7 = <$STR(S45)>

CHANGECUSTOMITEMVALUE -1 8 = <$STR(S46)>

CHANGECUSTOMITEMVALUE -1 9 = <$STR(S52)>

UpDateBoxItem 0

ReturnBoxItem 0

break

[@项链]

#IF

CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 > 9999

#ACT

CHANGECUSTOMITEMPROGRESSBARVALUE -1 0 0 = 0

SetNewItemValue -1 1 = <$STR(S52)>

UpDateBoxItem 0

ReturnBoxItem 0

break

[@勋章]

#IF

CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 > 9999

#ACT

CHANGECUSTOMITEMPROGRESSBARVALUE -1 0 0 = 0

SetNewItemValue -1 7 = <$STR(S52)>

UpDateBoxItem 0

ReturnBoxItem 0

break

[@手镯]

#IF

CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 > 9999

#ACT

CHANGECUSTOMITEMPROGRESSBARVALUE -1 0 0 = 0

SetNewItemValue -1 7 = <$STR(S52)>

UpDateBoxItem 0

ReturnBoxItem 0

break

[@靴子]

#IF

CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 > 9999

#ACT

CHANGECUSTOMITEMPROGRESSBARVALUE -1 0 0 = 0

CHANGECUSTOMITEMABIL -1 7 1 3

CHANGECUSTOMITEMABIL -1 8 1 4

CHANGECUSTOMITEMABIL -1 9 1 5

CHANGECUSTOMITEMABIL -1 7 3 1

CHANGECUSTOMITEMABIL -1 8 3 1

CHANGECUSTOMITEMABIL -1 9 3 1

CHANGECUSTOMITEMABIL -1 7 2 7

CHANGECUSTOMITEMABIL -1 8 2 8

CHANGECUSTOMITEMABIL -1 9 2 9

CHANGECUSTOMITEMABIL -1 7 0 253

CHANGECUSTOMITEMABIL -1 8 0 253

CHANGECUSTOMITEMABIL -1 9 0 253

CHANGECUSTOMITEMVALUE -1 7 = <$STR(S45)>

CHANGECUSTOMITEMVALUE -1 8 = <$STR(S46)>

CHANGECUSTOMITEMVALUE -1 9 = <$STR(S52)>

UpDateBoxItem 0

ReturnBoxItem 0

break

[@腰带]

#IF

CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 > 9999

#ACT

CHANGECUSTOMITEMPROGRESSBARVALUE -1 0 0 = 0

CHANGECUSTOMITEMABIL -1 7 1 3

CHANGECUSTOMITEMABIL -1 8 1 4

CHANGECUSTOMITEMABIL -1 9 1 5

CHANGECUSTOMITEMABIL -1 7 3 1

CHANGECUSTOMITEMABIL -1 8 3 1

CHANGECUSTOMITEMABIL -1 9 3 1

CHANGECUSTOMITEMABIL -1 7 2 7

CHANGECUSTOMITEMABIL -1 8 2 8

CHANGECUSTOMITEMABIL -1 9 2 9

CHANGECUSTOMITEMABIL -1 7 0 253

CHANGECUSTOMITEMABIL -1 8 0 253

CHANGECUSTOMITEMABIL -1 9 0 253

CHANGECUSTOMITEMVALUE -1 7 = <$STR(S45)>

CHANGECUSTOMITEMVALUE -1 8 = <$STR(S46)>

CHANGECUSTOMITEMVALUE -1 9 = <$STR(S52)>

UpDateBoxItem 0

ReturnBoxItem 0

break

[@配饰]

#IF

CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 > 9999

#ACT

CHANGECUSTOMITEMPROGRESSBARVALUE -1 0 0 = 0

SetNewItemValue -1 0 = <$STR(S52)>

SetNewItemValue -1 1 = <$STR(S52)>

UpDateBoxItem 0

ReturnBoxItem 0

break