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

显示全部楼层 · 2017-10-9 10:05:39

(@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