antyvfl 发表于 2022-10-9 00:25:17

怎么才可以让我的传世支持玄铁套装

[@怒海凡装]

{
#IF
SMALL $SPIRITY 100
#ACT
REFINEBOXRESULT 1
MESSAGEBOX 精力值不足100点！
BREAK
#IF
EQUAL $ITEMINFO[$PARAM(1)].NAME 金原石
EQUAL $ITEMINFO[$PARAM(2)].NAME 土原石
EQUAL $ITEMINFO[$PARAM(3)].NAME 火原石
EQUAL $ITEMINFO[$PARAM(4)].NAME 水原石
EQUAL $ITEMINFO[$PARAM(5)].NAME 木原石
#ACT
;金土火水木
MOV P1 $ITEMINFO[$PARAM(1)].VALUE(0)
MOV P2 $ITEMINFO[$PARAM(2)].VALUE(0)
MOV P3 $ITEMINFO[$PARAM(3)].VALUE(0)
MOV P4 $ITEMINFO[$PARAM(4)].VALUE(0)
MOV P5 $ITEMINFO[$PARAM(5)].VALUE(0)
#ELSEACT
MESSAGEBOX 只有使用五种五行原石才可以升级！
break
#IF
!EQUAL P1 6
#ACT
SENDMSG 5 怒海凡品需要6阶原石才能升级！
break
#IF
!EQUAL P2 6
#ACT
SENDMSG 5 怒海凡品需要6阶原石才能升级！
break
#IF
!EQUAL P3 6
#ACT
SENDMSG 5 怒海凡品需要6阶原石才能升级！
break
#IF
!EQUAL P4 6
#ACT
SENDMSG 5 怒海凡品需要6阶原石才能升级！
break
#IF
!EQUAL P5 6
#ACT
SENDMSG 5 怒海凡品需要6阶原石才能升级！
break
#IF
POS $ITEMINFO[$PARAM(0)].NAME 炙炎
#ACT
MOV S0 $ITEMINFO[$PARAM(0)].NAME
ReplaceText S0 炙炎 怒涛
ReplaceText S0 (精) (凡)
#IF
POS $ITEMINFO[$PARAM(0)].NAME 魔炎
#ACT
MOV S0 $ITEMINFO[$PARAM(0)].NAME
ReplaceText S0 魔炎 镇海
ReplaceText S0 (精) (凡)
#IF
POS $ITEMINFO[$PARAM(0)].NAME 灵炎
#ACT
MOV S0 $ITEMINFO[$PARAM(0)].NAME
ReplaceText S0 灵炎 凌波
ReplaceText S0 (精) (凡)
#IF
random 1
#ACT
REFINEBOXRESULT 0
SPIRITY - 100
TAKEM $PARAM(0)
TAKEM $PARAM(6)
GIVE $STR(S0) 1
#IF
LARGE $ITEMINFO[$PARAM(1)].DURA 1
#ACT
UpgradeUserItem $PARAM(1) 20 - 1
#ELSEACT
TAKEM $PARAM(1)
#IF
LARGE $ITEMINFO[$PARAM(2)].DURA 1
#ACT
UpgradeUserItem $PARAM(2) 20 - 1
#ELSEACT
TAKEM $PARAM(2)
#IF
LARGE $ITEMINFO[$PARAM(3)].DURA 1
#ACT
UpgradeUserItem $PARAM(3) 20 - 1
#ELSEACT
TAKEM $PARAM(3)
#IF
LARGE $ITEMINFO[$PARAM(4)].DURA 1
#ACT
UpgradeUserItem $PARAM(4) 20 - 1
#ELSEACT
TAKEM $PARAM(4)
#IF
LARGE $ITEMINFO[$PARAM(5)].DURA 1
#ACT
UpgradeUserItem $PARAM(5) 20 - 1
#ELSEACT
TAKEM $PARAM(5)


}

[@怒海上装]
{
#IF
CHECKVARLIST $ITEMINFO[$PARAM(0)].NAME ..\QuestDiary\游戏读取\装备融合\深海灵饰.txt
#ELSEACT
MESSAGEBOX 你放入的物品不能用于提升品质
BREAK
#IF
EQUAL $ITEMINFO[$PARAM(1)].NAME 金原石
EQUAL $ITEMINFO[$PARAM(2)].NAME 土原石
EQUAL $ITEMINFO[$PARAM(3)].NAME 火原石
EQUAL $ITEMINFO[$PARAM(4)].NAME 水原石
EQUAL $ITEMINFO[$PARAM(5)].NAME 木原石
#ACT
;金土火水木
MOV P1 $ITEMINFO[$PARAM(1)].VALUE(0)
MOV P2 $ITEMINFO[$PARAM(2)].VALUE(0)
MOV P3 $ITEMINFO[$PARAM(3)].VALUE(0)
MOV P4 $ITEMINFO[$PARAM(4)].VALUE(0)
MOV P5 $ITEMINFO[$PARAM(5)].VALUE(0)
#ELSEACT
MESSAGEBOX 只有使用五种五行原石才可以升级！
break
#IF
!EQUAL P1 7
!EQUAL $ITEMINFO[$PARAM(1)].NAME
#ACT
SENDMSG 5 怒海凡品需要7阶原石才能升级！
break
#IF
!EQUAL P2 7
!EQUAL $ITEMINFO[$PARAM(1)].NAME
#ACT
SENDMSG 5 怒海凡品需要7阶原石才能升级！
break
#IF
!EQUAL P3 7
!EQUAL $ITEMINFO[$PARAM(1)].NAME
#ACT
SENDMSG 5 怒海凡品需要7阶原石才能升级！
break
#IF
!EQUAL P4 7
!EQUAL $ITEMINFO[$PARAM(1)].NAME
#ACT
SENDMSG 5 怒海凡品需要7阶原石才能升级！
break
#IF
!EQUAL P5 7
!EQUAL $ITEMINFO[$PARAM(1)].NAME
#ACT
SENDMSG 5 怒海凡品需要7阶原石才能升级！
break
#IF
POS $ITEMINFO[$PARAM(0)].NAME 怒涛
POS $ITEMINFO[$PARAM(0)].NAME (凡)
#ACT
MOV S0 $ITEMINFO[$PARAM(0)].NAME
ReplaceText S0 (凡) (上)
#IF
POS $ITEMINFO[$PARAM(0)].NAME 镇海
POS $ITEMINFO[$PARAM(0)].NAME (凡)
#ACT
MOV S0 $ITEMINFO[$PARAM(0)].NAME
ReplaceText S0 (凡) (上)
#IF
POS $ITEMINFO[$PARAM(0)].NAME 凌波
POS $ITEMINFO[$PARAM(0)].NAME (凡)
#ACT
MOV S0 $ITEMINFO[$PARAM(0)].NAME
ReplaceText S0 (凡) (上)
#IF
random 1
#ACT
REFINEBOXRESULT 0
SPIRITY - 100
TAKEM $PARAM(0)
GIVE $STR(S0) 1
#IF
LARGE $ITEMINFO[$PARAM(1)].DURA 1
#ACT
UpgradeUserItem $PARAM(1) 20 - 1
#ELSEACT
TAKEM $PARAM(1)
#IF
LARGE $ITEMINFO[$PARAM(2)].DURA 1
#ACT
UpgradeUserItem $PARAM(2) 20 - 1
#ELSEACT
TAKEM $PARAM(2)
#IF
LARGE $ITEMINFO[$PARAM(3)].DURA 1
#ACT
UpgradeUserItem $PARAM(3) 20 - 1
#ELSEACT
TAKEM $PARAM(3)
#IF
LARGE $ITEMINFO[$PARAM(4)].DURA 1
#ACT
UpgradeUserItem $PARAM(4) 20 - 1
#ELSEACT
TAKEM $PARAM(4)
#IF
LARGE $ITEMINFO[$PARAM(5)].DURA 1
#ACT
UpgradeUserItem $PARAM(5) 20 - 1
#ELSEACT
TAKEM $PARAM(5)

}
[@怒海极装]
{

#IF
CHECKVARLIST $ITEMINFO[$PARAM(0)].NAME ..\QuestDiary\游戏读取\装备融合\深海灵饰.txt
#ELSEACT
MESSAGEBOX 你放入的物品不能用于提升品质
BREAK
#IF
EQUAL $ITEMINFO[$PARAM(1)].NAME 金原石
EQUAL $ITEMINFO[$PARAM(2)].NAME 土原石
EQUAL $ITEMINFO[$PARAM(3)].NAME 火原石
EQUAL $ITEMINFO[$PARAM(4)].NAME 水原石
EQUAL $ITEMINFO[$PARAM(5)].NAME 木原石
#ACT
;金土火水木
MOV P1 $ITEMINFO[$PARAM(1)].VALUE(0)
MOV P2 $ITEMINFO[$PARAM(2)].VALUE(0)
MOV P3 $ITEMINFO[$PARAM(3)].VALUE(0)
MOV P4 $ITEMINFO[$PARAM(4)].VALUE(0)
MOV P5 $ITEMINFO[$PARAM(5)].VALUE(0)
#ELSEACT
MESSAGEBOX 只有使用五种五行原石才可以升级！
break
#IF
!EQUAL P1 8
!EQUAL $ITEMINFO[$PARAM(1)].NAME
#ACT
SENDMSG 5 怒海凡品需要8阶原石才能升级！
break
#IF
!EQUAL P2 8
!EQUAL $ITEMINFO[$PARAM(1)].NAME
#ACT
SENDMSG 5 怒海凡品需要四阶原石才能升级！
break
#IF
!EQUAL P3 8
!EQUAL $ITEMINFO[$PARAM(1)].NAME
#ACT
SENDMSG 5 怒海凡品需要8阶原石才能升级！
break
#IF
!EQUAL P4 8
!EQUAL $ITEMINFO[$PARAM(1)].NAME
#ACT
SENDMSG 5 怒海凡品需要8阶原石才能升级！
break
#IF
!EQUAL P5 8
!EQUAL $ITEMINFO[$PARAM(1)].NAME
#ACT
SENDMSG 5 怒海凡品需要8阶原石才能升级！
break
#IF
POS $ITEMINFO[$PARAM(0)].NAME 怒涛
POS $ITEMINFO[$PARAM(0)].NAME (上)
#ACT
MOV S0 $ITEMINFO[$PARAM(0)].NAME
ReplaceText S0 (上) (极)
#IF
POS $ITEMINFO[$PARAM(0)].NAME 镇海
POS $ITEMINFO[$PARAM(0)].NAME (上)
#ACT
MOV S0 $ITEMINFO[$PARAM(0)].NAME
ReplaceText S0 (上) (极)
#IF
POS $ITEMINFO[$PARAM(0)].NAME 凌波
POS $ITEMINFO[$PARAM(0)].NAME (上)
#ACT
MOV S0 $ITEMINFO[$PARAM(0)].NAME
ReplaceText S0 (上) (极)
#IF
random 1
#ACT
REFINEBOXRESULT 0
SPIRITY - 100
TAKEM $PARAM(0)
GIVE $STR(S0) 1
#IF
LARGE $ITEMINFO[$PARAM(1)].DURA 1
#ACT
UpgradeUserItem $PARAM(1) 20 - 1
#ELSEACT
TAKEM $PARAM(1)
#IF
LARGE $ITEMINFO[$PARAM(2)].DURA 1
#ACT
UpgradeUserItem $PARAM(2) 20 - 1
#ELSEACT
TAKEM $PARAM(2)
#IF
LARGE $ITEMINFO[$PARAM(3)].DURA 1
#ACT
UpgradeUserItem $PARAM(3) 20 - 1
#ELSEACT
TAKEM $PARAM(3)
#IF
LARGE $ITEMINFO[$PARAM(4)].DURA 1
#ACT
UpgradeUserItem $PARAM(4) 20 - 1
#ELSEACT
TAKEM $PARAM(4)
#IF
LARGE $ITEMINFO[$PARAM(5)].DURA 1
#ACT
UpgradeUserItem $PARAM(5) 20 - 1
#ELSEACT
TAKEM $PARAM(5)
}
[@怒海仙装]
{
#IF
CHECKVARLIST $ITEMINFO[$PARAM(0)].NAME ..\QuestDiary\游戏读取\装备融合\深海灵饰.txt
#ELSEACT
MESSAGEBOX 你放入的物品不能用于提升品质
BREAK
#IF
EQUAL $ITEMINFO[$PARAM(1)].NAME 金原石
EQUAL $ITEMINFO[$PARAM(2)].NAME 土原石
EQUAL $ITEMINFO[$PARAM(3)].NAME 火原石
EQUAL $ITEMINFO[$PARAM(4)].NAME 水原石
EQUAL $ITEMINFO[$PARAM(5)].NAME 木原石
#ACT
;金土火水木
MOV P1 $ITEMINFO[$PARAM(1)].VALUE(0)
MOV P2 $ITEMINFO[$PARAM(2)].VALUE(0)
MOV P3 $ITEMINFO[$PARAM(3)].VALUE(0)
MOV P4 $ITEMINFO[$PARAM(4)].VALUE(0)
MOV P5 $ITEMINFO[$PARAM(5)].VALUE(0)
#ELSEACT
MESSAGEBOX 只有使用五种五行原石才可以升级！
break
#IF
!EQUAL P1 9
!EQUAL $ITEMINFO[$PARAM(1)].NAME
#ACT
SENDMSG 5 怒海凡品需要9阶原石才能升级！
break
#IF
!EQUAL P2 9
!EQUAL $ITEMINFO[$PARAM(1)].NAME
#ACT
SENDMSG 5 怒海凡品需要9阶原石才能升级！
break
#IF
!EQUAL P3 9
!EQUAL $ITEMINFO[$PARAM(1)].NAME
#ACT
SENDMSG 5 怒海凡品需要9阶原石才能升级！
break
#IF
!EQUAL P4 9
!EQUAL $ITEMINFO[$PARAM(1)].NAME
#ACT
SENDMSG 5 怒海凡品需要9阶原石才能升级！
break
#IF
!EQUAL P5 9
!EQUAL $ITEMINFO[$PARAM(1)].NAME
#ACT
SENDMSG 5 怒海凡品需要9阶原石才能升级！
break
#IF
POS $ITEMINFO[$PARAM(0)].NAME 怒涛
POS $ITEMINFO[$PARAM(0)].NAME (极)
#ACT
MOV S0 $ITEMINFO[$PARAM(0)].NAME
ReplaceText S0 (极) (仙)
#IF
POS $ITEMINFO[$PARAM(0)].NAME 镇海
POS $ITEMINFO[$PARAM(0)].NAME (极)
#ACT
MOV S0 $ITEMINFO[$PARAM(0)].NAME
ReplaceText S0 (极) (仙)
#IF
POS $ITEMINFO[$PARAM(0)].NAME 凌波
POS $ITEMINFO[$PARAM(0)].NAME (极)
#ACT
MOV S0 $ITEMINFO[$PARAM(0)].NAME
ReplaceText S0 (极) (仙)
#IF
random 1
#ACT
SPIRITY - 100
TAKEM $PARAM(0)
GIVE $STR(S0) 1
REFINEBOXRESULT 0
#IF
LARGE $ITEMINFO[$PARAM(1)].DURA 1
#ACT
UpgradeUserItem $PARAM(1) 20 - 1
#ELSEACT
TAKEM $PARAM(1)
#IF
LARGE $ITEMINFO[$PARAM(2)].DURA 1
#ACT
UpgradeUserItem $PARAM(2) 20 - 1
#ELSEACT
TAKEM $PARAM(2)
#IF
LARGE $ITEMINFO[$PARAM(3)].DURA 1
#ACT
UpgradeUserItem $PARAM(3) 20 - 1
#ELSEACT
TAKEM $PARAM(3)
#IF
LARGE $ITEMINFO[$PARAM(4)].DURA 1
#ACT
UpgradeUserItem $PARAM(4) 20 - 1
#ELSEACT
TAKEM $PARAM(4)
#IF
LARGE $ITEMINFO[$PARAM(5)].DURA 1
#ACT
UpgradeUserItem $PARAM(5) 20 - 1
#ELSEACT
TAKEM $PARAM(5)
}

heeb0957 发表于 2022-10-9 03:30:19

太生气了，无法HOLD啦 >_<......

sxmnwk 发表于 2022-10-9 08:06:38

激动人心，无法言表！

liyunde 发表于 2022-10-10 17:49:00

看到这帖子真是高兴！

jdyuxp12 发表于 2022-10-11 18:17:36

感恩无私的分享与奉献 :)

ismiao 发表于 2022-10-13 15:29:58

我只是路过打酱油的。

animarui 发表于 2022-10-16 02:07:12

看到这帖子真是高兴！

liushuich 发表于 2022-10-16 03:48:53

感恩无私的分享与奉献 :)

lk5158130 发表于 2022-10-17 17:26:13

无回帖，不论坛，这才是人道。

takashi79 发表于 2022-10-18 11:45:39

太生气了，无法HOLD啦 >_<......
页: [1] 2
查看完整版本: 怎么才可以让我的传世支持玄铁套装