装备强化脚本
[@MAIN]#IF
#ACT
#SAY
<想让装备变得更加强力?我可以帮你实现.当然这也是需要钱和运气的/FCOLOR=146>\
<>\
<ITEMBOX:3:1:240:50:0:36:36:5,6,10,11,15,16,19,20,21,22,23,24,26,29,30,48,53,62,64,65:^250#请放入需要精炼的装备^255#只可放入：武器,衣服,头盔,项链,手镯,戒指,腰带,靴子,勋章,斗笠,盾牌>
<ITEMBOX:0:1:240:210:0:36:36:5,6,10,11,15,16,19,20,21,22,23,24,26,29,30,48,53,62,64,65:^250#请放入需要转移的装备>
<ITEMBOX:1:1:240:250:0:36:36:5,6,10,11,15,16,19,20,21,22,23,24,26,29,30,48,53,62,64,65:^250#请放入被转移的装备>\
<>\
<>\
<>\
<精炼费用:/FCOLOR=250>30000元宝 <装备精炼/@装备精炼> <转移费用:/FCOLOR=250>300000元宝<确定转移/@精炼转移>\
<精炼费用:/FCOLOR=250>1金币【100%加2点攻击】<装备金币精炼/@装备大米精炼>\
;<>\
<> <一键30攻击需要75大米/@一键30攻击需要75大米>\
;<> <3金币+10攻击/@3金币+10攻击>\
精炼提示：<精炼可以为绝大多数装备随机增加功魔道极品属性/FCOLOR=253>: <成功率：80%/FCOLOR=251>。\
成功说明：<成功随机增加2点攻魔道/FCOLOR=250>失败说明：<失败,全部功魔道清零>。\\
[@3金币+10攻击]
#IF
#ACT
SetUpgradeItem 3
#IF
NOT CheckBoxItemCount 3 1
#ACT
MESSAGEBOX 请在装备框一中放入装备!
BREAK
#IF
SMALL <$GOLDCOUNT> 3
#ACT
MESSAGEBOX 对不起您的金币不足3点！
BREAK
#OR
CheckItemAddValue -1 0 > 29
CheckItemAddValue -1 1 > 29
CheckItemAddValue -1 2 > 29
CheckItemAddValue -1 3 > 29
CheckItemAddValue -1 4 > 29
#ACT
#ELSEACT
MESSAGEBOX 对不起您的装备还没有+30无法使用！！
BREAK
#OR
CheckItemAddValue -1 0 > 39
CheckItemAddValue -1 1 > 39
CheckItemAddValue -1 2 > 39
CheckItemAddValue -1 3 > 39
CheckItemAddValue -1 4 > 39
#ACT
MESSAGEBOX 您放入的装备已经强化40！！
BREAK
#IF
#ACT
TAKE 金币3
MOV N$属性位 2
#if
EQUAL <$BOXITEM.STDMODE>5
#ACT
MOV N$属性位 0
#IF
#ACT
SetUpgradeItem 3
CHANGEITEMADDVALUE -1 <$STR(N$属性位)> = 40
UpDateBoxItem 3
ReturnBoxItem 3
;SetUpgradeItem 3
;CHANGEITEMADDVALUE -1 <$STR(N$属性位)> + 6
;UpDateBoxItem 3
;ReturnBoxItem 3
MESSAGEBOX 装备精炼成功!
BREAK
[@一键30攻击需要75大米]
#IF
#ACT
SetUpgradeItem 3
#IF
NOT CheckBoxItemCount 3 1
#ACT
MESSAGEBOX 请在装备框一中放入装备!
BREAK
#IF
CHECKGAMEPOINT < 75
#ACT
MESSAGEBOX 对不起您的大米不足75点！
BREAK
#OR
CheckItemAddValue -1 0 > 29
CheckItemAddValue -1 1 > 29
CheckItemAddValue -1 2 > 29
CheckItemAddValue -1 3 > 29
CheckItemAddValue -1 4 > 29
#ACT
MESSAGEBOX 您放入的装备已经强化30！！
BREAK
#IF
#ACT
GAMEPOINT - 75
MOV N$属性位 2
#if
EQUAL <$BOXITEM.STDMODE>5
#ACT
MOV N$属性位 0
#IF
#ACT
SetUpgradeItem 3
CHANGEITEMADDVALUE -1 <$STR(N$属性位)> = 30
UpDateBoxItem 3
ReturnBoxItem 3
MESSAGEBOX 装备精炼成功!
BREAK
[@装备精炼]
#IF
NOT CheckBoxItemCount 3 1
#ACT
MESSAGEBOX 请在装备框一中放入装备!
BREAK
#IF
SMALL <$GAMEGOLD> 30000
#ACT
MESSAGEBOX 你元宝都没有。还想变强?
BREAK
#IF
#ACT
GAMEGOLD - 30000
MOVR N$装备精炼随机数 1 4
#IF
LARGE N$装备精炼随机数 2
#ACT
MESSAGEBOX 装备精炼失败,装备极品属性已消失.
GOTO @装备极品属性还原1
BREAK
#IF
#ACT
MOV N$属性升级位置MIN 2
MOV N$属性升级位置MAX 5
#if
EQUAL <$BOXITEM.STDMODE>5
#ACT
MOV N$属性升级位置MIN 0
MOV N$属性升级位置MAX 3
#IF
#ACT
MOVR N$属性升级位置选择 <$STR(N$属性升级位置MIN)> <$STR(N$属性升级位置MAX)>
SetUpgradeItem 3
CHANGEITEMADDVALUE -1 <$STR(N$属性升级位置选择)> + 2
UpDateBoxItem 3
MESSAGEBOX 装备精炼成功!
BREAK
[@装备大米精炼]
#IF
#ACT
SetUpgradeItem 3
#IF
NOT CheckBoxItemCount 3 1
#ACT
MESSAGEBOX 请在装备框一中放入装备!
BREAK
#IF
SMALL <$GOLDCOUNT> 1
#ACT
MESSAGEBOX 你金币都没有。还想变强?
BREAK
#OR
CheckItemAddValue -1 0 = 40
CheckItemAddValue -1 1 = 40
CheckItemAddValue -1 2 = 40
CheckItemAddValue -1 3 = 40
CheckItemAddValue -1 4 = 40
#ACT
MESSAGEBOX 对不起您的装备已经封顶+40无法继续使用！！
BREAK
#OR
CheckItemAddValue -1 0 > 29
CheckItemAddValue -1 1 > 29
CheckItemAddValue -1 2 > 29
CheckItemAddValue -1 3 > 29
CheckItemAddValue -1 4 > 29
#ACT
#ELSEACT
MESSAGEBOX 对不起您的装备还没有+30无法使用！！
BREAK
#IF
#ACT
TAKE 金币 1
#IF
#ACT
MOV N$属性升级位置MIN 2
#if
EQUAL <$BOXITEM.STDMODE>5
#ACT
MOV N$属性升级位置MIN 0
#IF
#ACT
SetUpgradeItem 3
CHANGEITEMADDVALUE -1 <$STR(N$属性升级位置MIN)> + 2
UpDateBoxItem 3
MESSAGEBOX 装备精炼成功!
BREAK
[@精炼转移]
#IF
EQUAL <$BOXITEM.NAME> 菩提圣莲·觉醒
#ACT
MESSAGEBOX 此装备不能转移!
BREAK
#IF
SMALL <$GAMEGOLD> 300000
#ACT
MESSAGEBOX 请先准备好元宝再来!
BREAK
#IF
NOT CheckBoxItemCount 0 1
#ACT
MESSAGEBOX 请在装备框一中放入装备!
BREAK
#IF
NOT CheckBoxItemCount 1 1
#ACT
MESSAGEBOX 请在装备框二中放入接收转移装备!
BREAK
#IF
#ACT
SetUpgradeItem 0
MOV N$装备精炼附加属性保存1 0
MOV N$装备精炼附加属性保存2 0
MOV N$装备精炼附加属性保存3 0
MOV N$清洗位置1 2
MOV N$清洗位置2 3
MOV N$清洗位置3 4
MOV N$增加位置1 2
MOV N$增加位置2 3
MOV N$增加位置3 4
#if
EQUAL <$BOXITEM.STDMODE> 5
#ACT
MOV N$清洗位置1 0
MOV N$清洗位置2 1
MOV N$清洗位置3 2
#if
EQUAL <$BOXITEM.STDMODE> 5
#ACT
MOV N$增加位置1 0
MOV N$增加位置2 1
MOV N$增加位置3 2
#IF
CHECKITEMADDVALUE -1 <$STR(N$清洗位置1)> < 1
CHECKITEMADDVALUE -1 <$STR(N$清洗位置2)> < 1
CHECKITEMADDVALUE -1 <$STR(N$清洗位置3)> < 1
#ACT
UpDateBoxItem 0
MESSAGEBOX 装备框一中装备并未拥有极品属性!
BREAK
#IF
#ACT
GETITEMADDVALUE -1 <$STR(N$清洗位置1)> <$STR(N$装备精炼附加属性保存1)>
GETITEMADDVALUE -1 <$STR(N$清洗位置2)> <$STR(N$装备精炼附加属性保存2)>
GETITEMADDVALUE -1 <$STR(N$清洗位置3)> <$STR(N$装备精炼附加属性保存3)>
UpDateBoxItem 0
GOTO @装备属性转移执行
GOTO @装备极品属性还原2
[@装备属性转移执行]
#IF
#ACT
SetUpgradeItem 1
CHANGEITEMADDVALUE -1 <$STR(N$增加位置1)> = <$STR(N$装备精炼附加属性保存1)>
CHANGEITEMADDVALUE -1 <$STR(N$增加位置2)> = <$STR(N$装备精炼附加属性保存2)>
CHANGEITEMADDVALUE -1 <$STR(N$增加位置3)> = <$STR(N$装备精炼附加属性保存3)>
MESSAGEBOX 精炼属性转成功!
GAMEGOLD - 300000
UpDateBoxItem 1
ReturnBoxItem 1
[@装备极品属性还原1]
#if
EQUAL <$BOXITEM.STDMODE> 5
#ACT
SetUpgradeItem 3
CHANGEITEMADDVALUE -1 0 = 0
CHANGEITEMADDVALUE -1 1 = 0
CHANGEITEMADDVALUE -1 2 = 0
UpDateBoxItem 3
BREAK
#IF
#ACT
SetUpgradeItem 3
CHANGEITEMADDVALUE -1 2 = 0
CHANGEITEMADDVALUE -1 3 = 0
CHANGEITEMADDVALUE -1 4 = 0
UpDateBoxItem 3
BREAK
[@装备极品属性还原2]
#if
EQUAL <$BOXITEM.STDMODE> 5
#ACT
SetUpgradeItem 0
CHANGEITEMADDVALUE -1 0 = 0
CHANGEITEMADDVALUE -1 1 = 0
CHANGEITEMADDVALUE -1 2 = 0
UpDateBoxItem 0
ReturnBoxItem 0
BREAK
#IF
#ACT
SetUpgradeItem 0
CHANGEITEMADDVALUE -1 2 = 0
CHANGEITEMADDVALUE -1 3 = 0
CHANGEITEMADDVALUE -1 4 = 0
UpDateBoxItem 0
ReturnBoxItem 0
BREAK
引擎默认角色成长属性修改方案
页:
[1]