一骑当千 发表于 2020-2-11 10:24:34

传奇一条龙新编的神秘工匠师脚本

[@main]

#IF
#ACT
MOV P1 52
;55为sucai.Pak的资源编号
OPENMERCHANTBIGDLG <$str(p1)> 210 0 0 0 0 1 1160 0 1
#SAY
<img:0:<$str(p1)>:380:-14/@exit>\
<ITEMBOX:0:<$str(p1)>:201:215:110:50:50:28,65,90:254#请放入装备BUff加持>\
<ITEMBOX:1:<$str(p1)>:201:215:200:50:50:41:254#请放入BUff材料>\
\   <ImgEx:<$STR(p1)>:198:199:199:145:210/@BUff熔炼>\
\ \
\ \
<ImgEx:<$STR(p1)>:208:209:209:-5:-45/@main>\
<ImgEx:<$STR(p1)>:207:206:206:-5:-15/@分解>\


[@分解]
#IF
#ACT
OPENMERCHANTBIGDLG <$str(p1)> 210 0 0 0 0 1 1160 0 1
#SAY
<img:0:<$str(p1)>:380:-14/@exit>\
<ITEMBOX:2:<$str(p1)>:201:215:110:50:50:28,65,90:254#请放入装备分解>\
\ \
\   <ImgEx:<$STR(p1)>:194:195:195:145:210/@BUf分解>\
\ \
\ \
<ImgEx:<$STR(p1)>:209:208:208:-5:-45/@main>\
<ImgEx:<$STR(p1)>:206:207:207:-5:-15/@分解>\



[@BUf分解]
#IF
CheckBoxItemCount 2 1
#ACt
GetDBItemFieldValue <$BOXITEM.NAME> STDMODE <$STR(S$装备类型)>
#elseact
BREAK

#IF
EQUAL <$STR(S$装备类型)> 90
CheckBoxItemCount 2 1
CHECKTEXTLIST ..\Market_def\锋哥\分解列表.txt <$BOXITEM.NAME>
#ACT
GIVE 玄冰灵魄 1
MOV S$分解文本 <$BOXITEM.NAME>
DEC S$分解文本
GIVE <$STR(S$分解文本)> 1
DelBoxItem 2
BREAK



#IF
EQUAL <$STR(S$装备类型)> 65
CheckBoxItemCount 2 1
CHECKTEXTLIST ..\Market_def\锋哥\分解列表.txt <$BOXITEM.NAME>
#ACT
GIVE 烈焰灼心 1
MOV S$分解文本 <$BOXITEM.NAME>
DEC S$分解文本
GIVE <$STR(S$分解文本)> 1
DelBoxItem 2
BREAK

#IF
EQUAL <$STR(S$装备类型)> 28
CHECKTEXTLIST ..\Market_def\锋哥\分解列表.txt <$BOXITEM.NAME>
#ACT
GIVE 金刚炼魂 1
MOV S$分解文本 <$BOXITEM.NAME>
DEC S$分解文本
GIVE <$STR(S$分解文本)> 1
DelBoxItem 2
BREAK

[@ItemIntoBox1]
#IF
NOT CheckBoxItemCount 0 1
#ACT
ReturnBoxItem 0
ReturnBoxItem 1
BREAK

#IF
NOT EQUAL <$BOXITEM.NAME> <$STR(S$BUFF材料)>
#ACT
ReturnBoxItem 0
ReturnBoxItem 1
BREAK



[@ItemIntoBox0]
#IF
CheckBoxItemCount 0 1
#ACt
GetDBItemFieldValue <$BOXITEM.NAME> STDMODE <$STR(S$装备类型)>
#elseact
BREAK

#IF
EQUAL <$STR(S$装备类型)> 90
#ACT
MOV S$BUFF材料 玄冰灵魄
BREAK

#IF
EQUAL <$STR(S$装备类型)> 65
#ACT
MOV S$BUFF材料 烈焰灼心
BREAK

#IF
EQUAL <$STR(S$装备类型)> 28
#ACT
MOV S$BUFF材料 金刚炼魂
BREAK

[@BUff熔炼]
#IF
CheckBoxItemCount 0 1
#ACt
GetDBItemFieldValue <$BOXITEM.NAME> STDMODE <$STR(S$装备类型)>
#elseact
BREAK

#IF
EQUAL <$STR(S$装备类型)> 90
NOT CheckContainsText <$BOXITEM.NAME>
CHECKTEXTLIST ..\Market_def\锋哥\熔炼列表.txt <$BOXITEM.NAME>
EQUAL <$BOXITEM.NAME> 玄冰灵魄
CheckBoxItemCount 1 1
CheckBoxItemCount 0 1
#ACT
GIVE <$BOXITEM.NAME> 1
messagebox 玄冰灵魄已熔炼在<$BOXITEM.NAME>装备上
DelBoxItem 1
DelBoxItem 0
MOV S$装备类型
MOV S$BUFF材料
BREAK

#IF
EQUAL <$STR(S$装备类型)> 65
NOT CheckContainsText <$BOXITEM.NAME>
CHECKTEXTLIST ..\Market_def\锋哥\熔炼列表.txt <$BOXITEM.NAME>
EQUAL <$BOXITEM.NAME> 烈焰灼心
CheckBoxItemCount 1 1
CheckBoxItemCount 0 1
#ACT
GIVE <$BOXITEM.NAME> 1
messagebox 烈焰灼心已熔炼在<$BOXITEM.NAME>装备上
DelBoxItem 1
DelBoxItem 0
MOV S$装备类型
MOV S$BUFF材料
BREAK

#IF
EQUAL <$STR(S$装备类型)> 28
NOT CheckContainsText <$BOXITEM.NAME>
CHECKTEXTLIST ..\Market_def\锋哥\熔炼列表.txt <$BOXITEM.NAME>
EQUAL <$BOXITEM.NAME> 金刚炼魂
CheckBoxItemCount 1 1
CheckBoxItemCount 0 1
#ACT
ReadConfigFileItem ..Market_def\锋哥\物品名字.txt 物品列表 <$BOXITEM.NAME> <$STR(S$合成后BUFF物品)>
GIVE <$BOXITEM.NAME> 1
DelBoxItem 1
DelBoxItem 0
MOV S$装备类型
MOV S$BUFF材料
BREAK

萝卜饲养鲭鲨 发表于 2020-2-11 16:04:58

好，很好，非常好！

梓沫233 发表于 2020-2-20 02:40:03

好，很好，非常好！

家家顺小伍 发表于 2020-2-20 06:43:02

支持，赞一个

959c 发表于 2020-2-28 10:05:13

顶起顶起顶起

chenshibin 发表于 2020-2-29 05:01:28

珍爱生命，果断回帖。

黎映玲 发表于 2020-3-3 11:54:09

支持楼主，用户楼主，楼主英明呀！！！

三年是一种痛 发表于 2020-3-6 09:39:20

楼下的接上。。。。

say_beautiful 发表于 2020-4-22 23:00:42

锄禾日当午，发帖真辛苦。谁知坛中餐，帖帖皆辛苦！

世纪婴儿3000 发表于 2020-4-27 05:28:03

楼下的接上。。。。
页: [1] 2 3 4 5 6 7 8
查看完整版本: 传奇一条龙新编的神秘工匠师脚本