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

admin

[@main]　　 \  \
　　鸿蒙首饰：鸿蒙·盔，鸿蒙·之心，鸿蒙·手，鸿蒙·镯，鸿蒙·靴，鸿蒙·带\
　　灵气值注满后会随机出现属性！,\
　　注满后出现的属性不满意可以继续注入\  \  \
　　\                  \ \
　　;\              
　　[@开始锻造]
　　此功能暂未开放！
　　[@重铸]
　　放入一个我打造出的首饰！\
　　\
　　\
　　\
　　\       \
　　\
　　\                \ \ \
　　\                       
　　[@ItemIntoBox2]
　　#IF
　　CheckContainsTextList ..\QuestDiary\装备碎片系统\八转装备.txt
　　#ACT
　　GOTO @这个可以重铸
　　BREAK
　　#ELSEACT
　　MESSAGEBOX 　\　\你放置的物品不能重铸！
　　ReturnBoxItem 2
　　BREAK
　　[@这个可以重铸]
　　#IF
　　EQUAL  
　　#ACT
　　;MESSAGEBOX 　\　\你放置的物品还没有铸造，铸造后不满意在重铸！
　　BREAK
　　#ELSEACT
　　MOV S40
　　MOV S41 200000
　　MOV S42 199999
　　GOTO @重铸
　　BREAK
　　[@ItemIntoBox3]
　　#IF
　　EQUAL  鸿蒙灵气
　　#ACT
　　GOTO @重铸
　　BREAK
　　#ELSEACT
　　ReturnBoxItem 3
　　MESSAGEBOX 　\　\请放置[鸿蒙灵气]！
　　BREAK
　　[@确定锻造]
　　#ACT
　　SetUpgradeItem 2
　　#IF
　　CheckBoxItemCount 3
　　EQUAL  
　　EQUAL  鸿蒙灵气
　　CheckContainsText  
　　CheckContainsText  鸿蒙灵气
　　#act
　　GOTO @A铸造A
　　#ELSEACT
　　MESSAGEBOX 　\　\请放置好[鸿蒙灵气]后点击升级！
　　ReturnBoxItem 3
　　BREAK
　　[@A铸造A]
　　#IF
　　CHECKGAMEGOLD >
　　#act
　　DELBOXITEM 3
　　GOTO @铸造升级
　　BREAK
　　#ELSEACT
　　ReturnBoxItem 2
　　ReturnBoxItem 3
　　MESSAGEBOX 请放入对应的物品，需要元宝个!
　　BREAK
　　[@铸造升级]
　　#ACT
　　GAMEGOLD -
　　CHANGECUSTOMITEMTEXT -1 --::[铸]
　　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 =
　　CHANGECUSTOMITEMVALUE -1 5 =
　　CHANGECUSTOMITEMVALUE -1 6 =
　　UpDateBoxItem 3
　　UpDateBoxItem 2
　　ReturnBoxItem 2
　　break
　　[@灵饰]
　　\                    首饰注入灵气系统\
　　\                              \
　　\       \
　　\                    \
　　\                                                     \
　　\                                                     \ \
　　\\
　　\\ \
　　\
　　\
　　
　　[@ItemIntoBox0]
　　#IF
　　EQUAL  鸿蒙·盔
　　#ACT
　　MOV S40
　　MOV S41 50000
　　MOV S42 49999
　　MOVR S45 10
　　MOVR S46 10
　　MOVR S52 10
　　MOV S51 头盔
　　BREAK
　　#IF
　　EQUAL  鸿蒙·战链
　　#ACT
　　MOV S40
　　MOV S41 50000
　　MOV S42 49999
　　MOVR S52 10
　　MOV S51 项链
　　BREAK
　　#IF
　　EQUAL  鸿蒙·之心
　　#ACT
　　MOV S40
　　MOV S41 50000
　　MOV S42 49999
　　MOVR S52 30
　　MOV S51 勋章
　　BREAK
　　#IF
　　EQUAL  鸿蒙·手
　　#ACT
　　MOV S40
　　MOV S41 50000
　　MOV S42 49999
　　MOVR S52 20
　　MOV S51 手镯
　　BREAK
　　#IF
　　EQUAL  鸿蒙·镯
　　#ACT
　　MOV S40
　　MOV S41 50000
　　MOV S42 49999
　　MOVR S52 20
　　MOV S51 手镯
　　BREAK
　　#IF
　　EQUAL  鸿蒙·靴
　　#ACT
　　MOV S40
　　MOV S41 50000
　　MOV S42 49999
　　MOVR S45 3
　　MOVR S46 3
　　MOVR S52 3
　　MOV S51 靴子
　　BREAK
　　#IF
　　EQUAL  鸿蒙·带
　　#ACT
　　MOV S40
　　MOV S41 50000
　　MOV S42 49999
　　MOVR S45 3
　　MOVR S46 3
　　MOVR S52 3
　　MOV S51 腰带
　　BREAK
　　#IF
　　EQUAL  鸿蒙·佩
　　#ACT
　　MOV S40
　　MOV S41 50000
　　MOV S42 49999
　　MOVR S52 5
　　MOV S51 配饰
　　BREAK
　　#ELSEACT
　　ReturnBoxItem 0
　　MESSAGEBOX 　\　\你放置的物品不能吸收灵气！
　　BREAK
　　[@ItemIntoBox1]
　　#IF
　　CheckContainsTextList ..\QuestDiary\装备碎片系统\五转装备.txt
　　#ACT
　　MOV S43
　　MOV S44 18
　　BREAK
　　#IF
　　CheckContainsTextList ..\QuestDiary\装备碎片系统\残武器.txt
　　#ACT
　　MOV S43
　　MOV S44 88
　　BREAK
　　#IF
　　CheckContainsTextList ..\QuestDiary\装备碎片系统\成品武器.txt
　　#ACT
　　MOV S43
　　MOV S44 588
　　BREAK
　　#IF
　　CheckContainsTextList ..\QuestDiary\装备碎片系统\上古残武器.txt
　　#ACT
　　MOV S43
　　MOV S44 288
　　BREAK
　　#IF
　　CheckContainsTextList ..\QuestDiary\装备碎片系统\上古成品武器.txt
　　#ACT
　　MOV S43
　　MOV S44 2880
　　BREAK
　　#IF
　　CheckContainsTextList ..\QuestDiary\装备碎片系统\起源残武器.txt
　　#ACT
　　MOV S43
　　MOV S44 1888
　　BREAK
　　#IF
　　CheckContainsTextList ..\QuestDiary\装备碎片系统\起源成品武器.txt
　　#ACT
　　MOV S43
　　MOV S44 3880
　　BREAK
　　#IF
　　CheckContainsTextList ..\QuestDiary\装备碎片系统\六转装备.txt
　　#ACT
　　MOV S43
　　MOV S44 88
　　BREAK
　　#IF
　　CheckContainsTextList ..\QuestDiary\装备碎片系统\七转装备.txt
　　#ACT
　　MOV S43
　　MOV S44 488
　　BREAK
　　#IF
　　CheckContainsTextList ..\QuestDiary\装备碎片系统\八转装备.txt
　　#ACT
　　MOV S43
　　MOV S44 888
　　BREAK
　　#ELSEACT
　　ReturnBoxItem 1
　　MESSAGEBOX 　\　\你放置的物品不能提取灵气！
　　BREAK
　　[@灵气注入]
　　#ACT
　　SetUpgradeItem 0
　　#IF
　　CHECKGAMEGOLD >
　　EQUAL  
　　EQUAL  
　　CheckContainsText  
　　CheckContainsText  
　　#act
　　DELBOXITEM 1
　　GOTO @灵气升级
　　BREAK
　　#ELSEACT
　　ReturnBoxItem 0
　　ReturnBoxItem 1
　　MESSAGEBOX 请放入对应的物品，需要元宝个!
　　BREAK
　　[@灵气升级]
　　#ACT
　　GAMEGOLD -
　　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 +
　　UpDateBoxItem 0
　　GOTO @
　　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 =
　　CHANGECUSTOMITEMVALUE -1 8 =
　　CHANGECUSTOMITEMVALUE -1 9 =
　　UpDateBoxItem 0
　　ReturnBoxItem 0
　　break
　　[@项链]
　　#IF
　　CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 > 9999
　　#ACT
　　CHANGECUSTOMITEMPROGRESSBARVALUE -1 0 0 = 0
　　SetNewItemValue -1 1 =
　　UpDateBoxItem 0
　　ReturnBoxItem 0
　　break
　　[@勋章]
　　#IF
　　CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 > 9999
　　#ACT
　　CHANGECUSTOMITEMPROGRESSBARVALUE -1 0 0 = 0
　　SetNewItemValue -1 7 =
　　UpDateBoxItem 0
　　ReturnBoxItem 0
　　break
　　[@手镯]
　　#IF
　　CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 > 9999
　　#ACT
　　CHANGECUSTOMITEMPROGRESSBARVALUE -1 0 0 = 0
　　SetNewItemValue -1 7 =
　　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 =
　　CHANGECUSTOMITEMVALUE -1 8 =
　　CHANGECUSTOMITEMVALUE -1 9 =
　　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 =
　　CHANGECUSTOMITEMVALUE -1 8 =
　　CHANGECUSTOMITEMVALUE -1 9 =
　　UpDateBoxItem 0
　　ReturnBoxItem 0
　　break
　　[@配饰]
　　#IF
　　CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 > 9999
　　#ACT
　　CHANGECUSTOMITEMPROGRESSBARVALUE -1 0 0 = 0
　　SetNewItemValue -1 0 =
　　SetNewItemValue -1 1 =
　　UpDateBoxItem 0
　　ReturnBoxItem 0
　　break