(@ArmRemoveStone)
[@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:5,6,10,11,19,20,21,15,24,26,22,23,62,63,64:254#请放入装备>\
<ITEMBOX:1:<$str(p1)>:201:215:200:50:50:46:254#请放入宝石镶嵌>\
\ <ImgEx:<$STR(p1)>:196:197:197:145:210/@开始镶嵌> \
\ \
\ \
<ImgEx:<$STR(p1)>:202:203:202:-5:-45/@main>\
<ImgEx:<$STR(p1)>:205:204:204:-5:-15/@打孔11>\
<ImgEx:<$STR(p1)>:191:190:190:-5:15/@合成22>\
<ImgEx:<$STR(p1)>:193:192:192:-5:45/@ArmRemoveStone>\
[@打孔11]
#IF
#ACT
OPENMERCHANTBIGDLG <$str(p1)> 210 0 0 0 0 1 1160 0 1
#SAY
<img:0:<$str(p1)>:380:-14/@exit>\
\ <img:31:<$str(p1)>:0:52|253#当前武器装备:<$WEAPON>/@武器开孔> <img:32:<$str(p1)>:0:52|253#当前衣服装备:<$DRESS>/@衣服开孔> <img:33:<$str(p1)>:0:52|253#当前项链装备:<$NECKLACE>/@项链开孔>\
\ <img:34:<$str(p1)>:0:82|253#当前头盔装备:<$HELMET>/@头盔开孔> <img:35:<$str(p1)>:0:82|253#当前左手装备:<$ARMRING_R>/@左手镯开孔> <img:35:<$str(p1)>:0:82|253#当前右手装备:<$ARMRING_L>/@右手镯开孔>\
\ <img:36:<$str(p1)>:0:112|253#当前左戒装备:<$RING_R>/@左戒指开孔> <img:36:<$str(p1)>:0:112|253#当前右戒装备:<$RING_L> /@右戒指开孔> <img:37:<$str(p1)>:0:112|253#当前腰带装备:<$BELT>/@腰带开孔>\
\ <img:38:<$str(p1)>:0:142|253#当前鞋子装备:<$BOOTS>/@鞋子开孔>\
<Text:每件装备可开5个孔位置并且需要带在身上:10:185{FCOLOR=150}>\
<ImgEx:<$STR(p1)>:203:202:202:-5:-45/@main>\
<ImgEx:<$STR(p1)>:204:205:205:-5:-15/@打孔11>\
<ImgEx:<$STR(p1)>:191:190:190:-5:15/@合成22>\
<ImgEx:<$STR(p1)>:193:192:192:-5:45/@ArmRemoveStone>\
[@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)> 210 0 0 0 0 1 1160 0 1
#SAY
<img:0:<$str(p1)>:380:-14/@exit>\
\ <img:12:<$str(p1)>:0:50|251#需要三个〖攻击宝石·凡品〗+200慕云币^/@合成攻击宝石极品> <img:15:<$str(p1)>:0:50|251#需要三个〖防御宝石·凡品〗+200慕云币^/@合成防御宝石极品>\
\ <img:13:<$str(p1)>:0:100|251#需要三个〖攻击宝石·极品〗+500慕云币^/@合成攻击宝石珍品> <img:16:<$str(p1)>:0:100|251#需要三个〖防御宝石·极品〗+500慕云币^/@合成防御宝石珍品>\
\ <img:14:<$str(p1)>:0:150|251#需要三个〖攻击宝石·珍品〗+1000慕云币^/@合成攻击宝石绝品> <img:17:<$str(p1)>:0:150|251#需要三个〖防御宝石·珍品〗+1000慕云币^/@合成防御宝石绝品>\ \
\ \
\ \
<ImgEx:<$STR(p1)>:203:202:202:-5:-45/@main>\
<ImgEx:<$STR(p1)>:205:204:204:-5:-15/@打孔11>\
<ImgEx:<$STR(p1)>:190:191:191:-5:15/@合成22>\
<ImgEx:<$STR(p1)>:193:192:192:-5:45/@ArmRemoveStone>\
<Text:以上材料都可以在怪物身上获得:30:100{FCOLOR=150}>\
[@合成攻击宝石极品]
#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
|