()
%100
[@main]
#ACT
;OPENMERCHANTBIGDLG 19 232 1 4 0 -90 0
#SAY
<Img:0:19:350:-15/@EXIT>\
< > <放入主装备/SCOLOR=251> < > < 每次 吞噬 收费30万金币/SCOLOR=253 > <说明：移动鼠标看|250#建议优先使用极品装备升级哦^250#武器会根据当前职业增加1点攻击属性^250#其他装备则会随机加防御，魔防，物理，魔法，道术/SCOLOR=70 > \ \ \
< > <放入副装备1/SCOLOR=251> < > \ \
< > <放入副装备2/SCOLOR=251> < > <注意：切勿吞噬时关闭窗口。后果自负！！！垃圾装备也可以变神器/SCOLOR=253 > \ \
< > <确定吞噬/@吞噬开> \ \
<ITEMBOX:3:5:513:27:20:100:100:5,6,10,11,15,22,23,24,26,30,62,64:主装备> <ITEMBOX:4:5:513:27:60:100:100:5,6,10,11,15,22,23,24,26,30,62,64:副装备> <ITEMBOX:5:5:513:27:100:100:100:5,6,10,11,15,22,23,24,26,30,62,64:副装备> \ \ \ \ \ \ \ \
; <ITEMBOX:3:5:513:27:60:100:100:5,6,10,11,15,19,20,21,22,23,24,26,30,62,64:主装备> <ITEMBOX:4:5:513:27:100:100:100:5,6,10,11,15,19,20,21,22,23,24,26,30,62,64:副装备> <ITEMBOX:5:5:513:27:140:100:100:5,6,10,11,15,19,20,21,22,23,24,26,30,62,64:副装备> \ \ \ \ \ \ \ \
[@ItemIntoBox3]
[@ItemIntoBox4]
#act
MOV S$副武器1名字 <$BOXITEM[4].NAME>
[@ItemIntoBox5]
#act
MOV S$副武器2名字 <$BOXITEM[5].NAME>
[@ItemOutBox3]
#act
Close
[@ItemOutBox4]
#act
Close
[@ItemOutBox5]
#act
Close
[@吞噬开]
#act
MOV S$主武器名字 <$BOXITEM[3].NAME>
GetCustomItemText boxitem3 <$STR(S51)>
Mov P9 0
#if
Equal S51 装备已吞噬次数:10/10
#act
ReturnBoxItem 3
Messagebox 该装备吞噬次数用完
#if
Equal S51 装备已吞噬次数:1/10
#act
Mov P9 1
#if
Equal S51 装备已吞噬次数:2/10
#act
Mov P9 2
#if
Equal S51 装备已吞噬次数:3/10
#act
Mov P9 3
#if
Equal S51 装备已吞噬次数:4/10
#act
Mov P9 4
#if
Equal S51 装备已吞噬次数:5/10
#act
Mov P9 5
#if
Equal S51 装备已吞噬次数:6/10
#act
Mov P9 6
#if
Equal S51 装备已吞噬次数:7/10
#act
Mov P9 7
#if
Equal S51 装备已吞噬次数:8/10
#act
Mov P9 8
#if
Equal S51 装备已吞噬次数:9/10
#act
Mov P9 9
#IF
CheckGold 300000
#act
GOLDCOUNT - 300000
DelayCall 500 @吞噬开始
break
#ELSEACT
MESSAGEBOX 金币不足30万！！！
BREAK
[@吞噬开始]
#or
NOT CheckBoxItemCount 3
NOT CheckBoxItemCount 4
NOT CheckBoxItemCount 5
#ACT
MESSAGEBOX 请放入武器!
break
#IF
Equal S$主武器名字 <$STR(S$副武器1名字)>
Equal S$主武器名字 <$STR(S$副武器2名字)>
#act
SetUpgradeItem 3
#elseact
MESSAGEBOX 请放入三把相同的武器!
break
;#OR
;CheckItemAddValue boxitem3 0 > 7
;CheckItemAddValue boxitem3 1 > 7
;CheckItemAddValue boxitem3 2 > 7
;#ACT
;MESSAGEBOX 装备已经达到升级极限，或者你的金币不足。
;BREAK
#if
CheckContainsText S51 装备已吞噬次数:10
#act
ReturnBoxItem 3
Messagebox 该装备吞噬次数用完
BREAK
#IF
#ACT
GetDBItemFieldValue <$BOXITEM[3].NAME> stdmode <$STR(N$装备位置)>
MOV N$距离 0
#OR
EQUAL N$装备位置 5
EQUAL N$装备位置 6
#ACT
DelayCall 50 @检测职业
BREAK
#elseact
MOV N$距离 5
#if
#ACT
Inc P9 1
SetCustomItemText boxitem3 装备已吞噬次数:<$STR(P9)>/10
SetCustomItemTextColor boxitem3 250
DelBoxItem 4
DelBoxItem 5
UpdateItem boxitem3
MOV N$位置 0
MOVR N$位置 0 <$STR(N$距离)>
CHANGEITEMADDVALUE boxitem3 <$STR(N$位置)> + 1
SendMsg 5 恭喜：你的【<$BOXITEM[3].NAME>】吞噬成功！随机属性提升1点！！！
Close
BREAK
[@检测职业]
#IF
checkjob warrior
#ACT
Inc P9 1
SetCustomItemText boxitem3 装备已吞噬次数:<$STR(P9)>/10
SetCustomItemTextColor boxitem3 250
DelBoxItem 4
DelBoxItem 5
UpdateItem boxitem3
CHANGEITEMADDVALUE boxitem3 0 + 1
SendMsg 5 恭喜：<$BOXITEM[3].NAME>吞噬成功，攻击+1！
Close
BREAK
#IF
checkjob wizard
#ACT
Inc P9 1
SetCustomItemText boxitem3 装备已吞噬次数:<$STR(P9)>/10
SetCustomItemTextColor boxitem3 250
DelBoxItem 4
DelBoxItem 5
UpdateItem boxitem3
CHANGEITEMADDVALUE boxitem3 1 + 1
SendMsg 5 恭喜：<$BOXITEM[3].NAME>吞噬成功，魔法+1！
Close
BREAK
#IF
checkjob taoist
#ACT
Inc P9 1
SetCustomItemText boxitem3 装备已吞噬次数:<$STR(P9)>/10
SetCustomItemTextColor boxitem3 250
DelBoxItem 4
DelBoxItem 5
UpdateItem boxitem3
CHANGEITEMADDVALUE boxitem3 2 + 1
SendMsg 5 恭喜：<$BOXITEM[3].NAME>吞噬成功，道术+1！
Close
BREAK
|
