GEE引擎脚本-装备镶嵌大师

一揽众山小卑

(@ArmRemoveStone)

[@main]
#IF
#ACT
MOV P1 52
OPENMERCHANTBIGDLG <$str(p1)> 304 1 4 0 -60 1 625 40 1
#SAY
<ITEMBOX:0:<$str(p1)>:200:410:80:50:50:5,6,10,11,19,20,21,15,24,26,22,23,62,63,64:254#在这放入装备>\
<ITEMBOX:1:<$str(p1)>:200:410:200:50:50:46:254#在这放入宝石>\
\     <ImgEx:<$STR(p1)>:197:196:196:365:270/@开始镶嵌> \
\     \
\     \
<ImgEx:<$STR(p1)>:202:203:202:90:10/@main>\
<ImgEx:<$STR(p1)>:204:205:205:90:50/@打孔11>\
<ImgEx:<$STR(p1)>:190:191:191:90:90/@合成22>\
<ImgEx:<$STR(p1)>:192:193:193:90:130/@ArmRemoveStone>\
<PlayImg:63:49:10:300:200:-220:0>
[@打孔11]
#IF
#ACT
OPENMERCHANTBIGDLG <$str(p1)> 304 0 0 0 0 1 625 40 1
#SAY
\                 <img:31:<$str(p1)>:225:80|253#点击开启武器：<$WEAPON> 孔位/@武器开孔>        <img:32:<$str(p1)>:225:80|253#点击开启衣服：<$DRESS> 孔位/@衣服开孔>        <img:33:<$str(p1)>:225:80|253#点击开启项链：<$NECKLACE> 孔位/@项链开孔>\
\                 <img:34:<$str(p1)>:225:110|253#点击开启头盔：<$HELMET> 孔位/@头盔开孔>        <img:35:<$str(p1)>:225:110|253#点击开启左手：<$ARMRING_R> 孔位/@左手镯开孔>        <img:35:<$str(p1)>:225:110|253#点击开启右手：<$ARMRING_L> 孔位/@右手镯开孔>\
\                 <img:36:<$str(p1)>:225:140|253#点击开启左戒：<$RING_R> 孔位/@左戒指开孔>        <img:36:<$str(p1)>:225:140|253#点击开启右戒：<$RING_L> 孔位/@右戒指开孔>        <img:37:<$str(p1)>:225:140|253#点击开启腰带：<$BELT> 孔位/@腰带开孔>\
\                　　　　　 　　  <img:38:<$str(p1)>:225:170|253#点击开启鞋子：<$BOOTS> 孔位/@鞋子开孔>\
　　　　          　　　　　<Text:每件装备可开５个孔位置并且必须带在身上:165:230{FCOLOR=250}>\
<ImgEx:<$STR(p1)>:202:203:202:90:10/@main>\
<ImgEx:<$STR(p1)>:204:205:205:90:50/@打孔11>\
<ImgEx:<$STR(p1)>:190:191:191:90:90/@合成22>\
<ImgEx:<$STR(p1)>:192:193:193:90:130/@ArmRemoveStone>\
<PlayImg:63:176:2:200:370:-100:0><Text:【暗黑·独家制作】:370:-98{FCOLOR=253}><PlayImg:63:176:2:200:370:-100:0>\
　　　　          　　　　　<Text:点击上方按钮即可打开相应装备位置的孔位:165:160{FCOLOR=254}>\

[@ItemIntoBox0]
#IF
#ACT
MOV S$OK框装备宝石数
MOV <$STR(S$OK框装备孔数)>


#IF
CheckFluteCount boxitem0 = 1
#ACT
MOV S$OK框装备孔数 1

#IF
CheckFluteCount boxitem0 = 2
#ACT
MOV S$OK框装备孔数 2


#IF
CheckFluteCount boxitem0 = 3
#ACT
MOV S$OK框装备孔数 3


#IF
CheckFluteCount boxitem0 = 4
#ACT
MOV S$OK框装备孔数 4

#IF
CheckFluteCount boxitem0 = 5
#ACT
MOV S$OK框装备孔数 5

#IF
CheckItemStoneCount boxitem0 = 1
#ACT
MOV S$OK框装备宝石数 1

#IF
CheckItemStoneCount boxitem0 = 2
#ACT
MOV S$OK框装备宝石数 2

#IF
CheckItemStoneCount boxitem0 = 3
#ACT
MOV S$OK框装备宝石数 3

#IF
CheckItemStoneCount boxitem0 = 4
#ACT
MOV S$OK框装备宝石数 4

#IF
CheckItemStoneCount boxitem0 = 5
#ACT
MOV S$OK框装备宝石数 5

#IF
EQUAL S$OK框装备孔数 0
#ACT
ReturnBoxItem 0


#IF
SMALL S$OK框装备宝石数 <$STR(S$OK框装备孔数)>
#ACT
#elseact
ReturnBoxItem 0
MessageBox 你的装备不可镶嵌。\没有多余孔位或已镶满５颗宝石。



[@项链开孔]
#ACT
MOV S$位置 3
GOTO @装备开孔
break

[@头盔开孔]
#ACT
MOV S$位置 4
GOTO @装备开孔
break

[@左手镯开孔]
#ACT
MOV S$位置 6
GOTO @装备开孔
break

[@右手镯开孔]
#ACT
MOV S$位置 5
GOTO @装备开孔
break

[@左戒指开孔]
#ACT
MOV S$位置 8
GOTO @装备开孔
break

[@右戒指开孔]
#ACT
MOV S$位置 7
GOTO @装备开孔
break

[@腰带开孔]
#ACT
MOV S$位置 10
GOTO @装备开孔
break

[@鞋子开孔]
#ACT
MOV S$位置 11
GOTO @装备开孔
break


[@武器开孔]
#ACT
MOV S$位置 1
GOTO @装备开孔
break



[@衣服开孔]
#ACT
MOV S$位置 0
GOTO @装备开孔
break


[@装备开孔]
#IF
CheckFluteCount S$位置 = 1
#ACT
mov p111 1

#IF
CheckFluteCount S$位置 = 2
#ACT
mov p111 2

#IF
CheckFluteCount S$位置 = 3
#ACT
mov p111 3

#IF
CheckFluteCount S$位置 = 4
#ACT
mov p111 4

#IF
CheckFluteCount S$位置 = 5
#ACT
mov p111 5

#if
SMALL p111 5
#ACT
inc p111 1
SETFLUTECOUNT S$位置 <$STR(p111)>
MessageBox 你已成功开启第<$STR(p111)>个孔。
MOV p111 0
MOV S$位置 -1
break
#elseact
MessageBox 对不起你的装备已有<$STR(p111)>个孔。
break




[@开始镶嵌]
#IF
CheckBoxItemCount boxitem0 1
CheckBoxItemCount boxitem1 1
#ACT
ItemFluteStone 0 1
DelBoxItem 1
UpdateItem boxitem0
ReturnBoxItem 0
messagebox 镶嵌成功。
#ELSEACT
messagebox 镶嵌失败。






[@合成22]
#IF
#ACT
OPENMERCHANTBIGDLG <$str(p1)> 304 0 0 0 0 1 625 40 1
#SAY
\                 <img:12:<$str(p1)>:220:80|251#需要三个〖攻击宝石·凡品〗＋ 200暗黑币/@合成攻击宝石极品>     <img:15:<$str(p1)>:220:80|251#需要三个〖防御宝石·凡品〗＋ 200暗黑币/@合成防御宝石极品>\
\                 <img:13:<$str(p1)>:220:130|251#需要三个〖攻击宝石·极品〗＋ 500暗黑币/@合成攻击宝石珍品>     <img:16:<$str(p1)>:220:130|251#需要三个〖防御宝石·极品〗＋ 500暗黑币/@合成防御宝石珍品>\
\                 <img:14:<$str(p1)>:220:180|251#需要三个〖攻击宝石·珍品〗＋ 1000暗黑币/@合成攻击宝石绝品>     <img:17:<$str(p1)>:220:180|251#需要三个〖防御宝石·珍品〗＋ 1000暗黑币/@合成防御宝石绝品>\ \
<ImgEx:<$STR(p1)>:202:203:202:90:26/@main>\
<ImgEx:<$STR(p1)>:204:205:205:90:66/@打孔11>\
<ImgEx:<$STR(p1)>:190:191:191:90:106/@合成22>\
<ImgEx:<$STR(p1)>:192:193:193:90:146/@ArmRemoveStone>\

　　　<Text:以上材料全部都可以在怪物身上获得:315:160{FCOLOR=249}>\
<PlayImg:63:176:2:200:370:-100:0><Text:【暗黑·独家制作】:370:-98{FCOLOR=253}><PlayImg:63:176:2:200:370:-100:0>\
　　　<Text:鼠标移到相应宝石位可查看合成要求:315:160{FCOLOR=254}>\



[@合成攻击宝石极品]
#IF
checkitem 攻击宝石·凡品 3
CHECKGAMEGIRD > 199
#ACT
GAMEGIRD - 200
TAKE 攻击宝石·凡品 3
give 攻击宝石·极品 1
messagebox 提示：恭喜您的〖攻击宝石·凡品〗三个成功合成〖攻击宝石·极品〗。
#elseact
messagebox 提示：您的〖攻击宝石·凡品〗不足三个或没有200暗黑币不可合成。
BREAK


[@合成攻击宝石珍品]
#IF
CHECKGAMEGIRD > 499
checkitem 攻击宝石·极品 3
#ACT
GAMEGIRD - 500
TAKE 攻击宝石·极品 3
give 攻击宝石·珍品 1
messagebox 提示：恭喜您的〖攻击宝石·极品〗三个成功合成〖攻击宝石·珍品〗。
#elseact
messagebox 提示：您的〖攻击宝石·极品〗不足三个或没有500暗黑币不可合成。
BREAK



[@合成攻击宝石绝品]
#IF
CHECKGAMEGIRD > 999
checkitem 攻击宝石·珍品 3
#ACT
GAMEGIRD - 1000
TAKE 攻击宝石·珍品 3
give 攻击宝石·绝品 1
messagebox 提示：恭喜您的〖攻击宝石·珍品〗三个成功合成〖攻击宝石·绝品〗。
#elseact
messagebox 提示：您的〖攻击宝石·珍品〗不足三个或没有1000暗黑币不可合成。
BREAK



[@合成防御宝石极品]
#IF
checkitem 防御宝石·凡品 3
CHECKGAMEGIRD > 199
#ACT
GAMEGIRD - 200
TAKE 防御宝石·凡品 3
give 防御宝石·极品 1
messagebox 提示：恭喜您的〖防御宝石·凡品〗三个成功合成〖防御宝石·极品〗。
#elseact
messagebox 提示：您的〖防御宝石·凡品〗不足三个或没有200暗黑币不可合成。
BREAK


[@合成防御宝石珍品]
#IF
CHECKGAMEGIRD > 499
checkitem 防御宝石·极品 3
#ACT
GAMEGIRD - 500
TAKE 防御宝石·极品 3
give 防御宝石·珍品 1
messagebox 提示：恭喜您的〖防御宝石·极品〗三个成功合成〖防御宝石·珍品〗。
#elseact
messagebox 提示：您的〖防御宝石·极品〗不足三个或没有500暗黑币不可合成。
BREAK




[@合成防御宝石绝品]
#IF
CHECKGAMEGIRD > 999
checkitem 防御宝石·珍品 3
#ACT
GAMEGIRD - 1000
TAKE 防御宝石·珍品 3
give 防御宝石·绝品 1
messagebox 提示：恭喜您的〖防御宝石·珍品〗三个成功合成〖防御宝石·绝品〗。
#elseact
messagebox 提示：您的〖防御宝石·珍品〗不足三个或没有1000暗黑币不可合成。
BREAK

周水子的天空

这是我第一次玩的最开心的一个游戏；传奇也是我最爱的一个游戏

杰里米

Gm版本库传奇私服发布网是一个非常有特色并且非常有品位的经典优质私服发布网

黄金来

传奇服务端下载,传奇私服服务端,传奇版本免费下载

那么骄傲

奇私服商业版本等热门版本服务端；下载速度最快，最专业的传奇私服服务端提供商

夏伟勇

LZ是天才，坚定完毕

忠涛

Gm版本库,中国GM爱好者,传奇版本论坛,Gm论坛,传奇私服,传奇私服发布网

伊伊思密达

看帖要回，回帖才健康，在踩踩，楼主辛苦了！

石头剪刀步

啊啊啊啊啊啊啊啊啊啊啊

张云瑞

传奇游戏，融入了动作及格斗游戏要素，很多人都喜欢玩，我是认准Gm版本库的，资源很丰富给力。