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

 找回密码
 立即注册

GEE引擎脚本-神秘工匠师 - 传奇私服脚本

查看: 756|回复: 0

GEE引擎脚本-神秘工匠师

[复制链接]
发表于 2017-9-8 12:32:19 | 显示全部楼层 |阅读模式
[@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[2].NAME> STDMODE <$STR(S$装备类型)>
#elseact
BREAK

#IF
EQUAL <$STR(S$装备类型)> 90
CheckBoxItemCount 2 1
CHECKTEXTLIST ..\Market_def\锋哥\分解列表.txt <$BOXITEM[2].NAME>
#ACT
GIVE [BUFF]空蝉吟 1
MOV S$分解文本 <$BOXITEM[2].NAME>
DEC S$分解文本 [BUFF]
GIVE <$STR(S$分解文本)> 1
DelBoxItem 2
BREAK



#IF
EQUAL <$STR(S$装备类型)> 65
CheckBoxItemCount 2 1
CHECKTEXTLIST ..\Market_def\锋哥\分解列表.txt <$BOXITEM[2].NAME>
#ACT
GIVE [BUFF]天罗变 1
MOV S$分解文本 <$BOXITEM[2].NAME>
DEC S$分解文本 [BUFF]
GIVE <$STR(S$分解文本)> 1
DelBoxItem 2
BREAK

#IF
EQUAL <$STR(S$装备类型)> 28
CHECKTEXTLIST ..\Market_def\锋哥\分解列表.txt <$BOXITEM[2].NAME>
#ACT
GIVE [BUFF]凌霄法 1
MOV S$分解文本 <$BOXITEM[2].NAME>
DEC S$分解文本 [BUFF]
GIVE <$STR(S$分解文本)> 1
DelBoxItem 2
BREAK

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

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



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

#IF
EQUAL <$STR(S$装备类型)> 90
#ACT
MOV S$BUFF材料 [BUFF]空蝉吟
BREAK

#IF
EQUAL <$STR(S$装备类型)> 65
#ACT
MOV S$BUFF材料 [BUFF]天罗变
BREAK

#IF
EQUAL <$STR(S$装备类型)> 28
#ACT
MOV S$BUFF材料 [BUFF]凌霄法
BREAK

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

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

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

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

回复

使用道具 举报

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

本版积分规则

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

GMT+8, 2024-12-24 11:21 , Processed in 0.095836 second(s), 16 queries .

Powered by GM版本库 X3.4

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