传世版本原DB避水神符和避水护符,物品模式46问天丫的没加触发,大家可自行设置,我的改为3,219,客户端没有显示,可通过登录器设置物品显示。
[@永久点化避水]
{
想要骑着陆地的灵兽在深海骑战?那也不是不可以,如果\
你的灵兽能够有能力达到120级以上,我倒是有办法:你只要给\
我一瓶极品兽神水,外加消耗你50点灵力值,你的灵兽就能够承\
载你在海底骑战了。不过话说回来,在海底,海神战鲨才是最适\
合的坐骑啊!\
\
<我要点化我的灵兽/@confirmsetbslx> <那还是算了/@exit>
[@confirmsetbslx]
#ACT
checkitembox 请放入灵兽石 1 1628
[@getboxitem1628]
#IF
checkitemUPBOX
#ELSEACT
SENDMSG 5 升级框中的物品不存在或者是复制物品,升级失败
break
#IF
!CHECKITEM 极品兽神水 1
#ACT
BREAK
#SAY
你的包裹中没有极品兽神水!\
\
<我去弄一瓶再来/@exit>
#IF
EQUAL $CHECKBOXITEM.NAME 战鲨石
#ACT
SENDMSG 5 海底灵兽无需点化避水属性。
BREAK
#ELSEACT
MOV S10 $CHECKBOXITEM.ItemExD
MOV P34 $UpgradeItemExDLS.$STR(S10).23
#IF
EQUAL $ItemExN.$STR(S10).STDMODE 49
EQUAL $ItemExN.$STR(S10).Shape 51
#ELSEACT
SENDMSG 5 你放入的不是灵兽石。
BREAK
#IF
SMALL P34 120
#ACT
SENDMSG 5 此灵兽等级低于120级,无法点化避水属性。
BREAK
#IF
SMALL $YSPOINT 50
#ACT
SENDMSG 5 灵力值不足50点。
BREAK
#ELSEACT
TAKE 极品兽神水 1
YSPOINT - 50
UpgradeItemExDLS $STR(S10) 30 = 1
MESSAGEBOX 你的灵兽永久开启了避水属性。
UPDATEM**TONE
break
}[@避水神符点化]
{
#IF
ISSHADOW
#ACT
SENDMSG 5 元神无法使用<$PARAM(1)>
break
#IF
PO** $USERNAME .\QuestDiary\游戏功能\药水模式\人物模式.txt S10
#ACT
SPLIT $STR(S10) | S11
SENDMSG 6 当前人物正处于避水模式,无须继续服用<$PARAM(1)>。
BREAK
#ELSEACT
#IF
EQUAL $PARAM(1) 避水神符
#ACT
MOV D88 900
MOV D89 $STR(D88)
DIV D89 60
#IF
EQUAL $PARAM(1) 避水护符
#ACT
MOV D88 6000
MOV D89 $STR(D88)
DIV D89 60
#IF
RANDOM 1
#ACT
MOV D89 31
MOV S30 避水模式
TAKEID $PARAM(0)
FORMATSTR S10 %s|%s|%s <$USERNAME>|<$STR(S30)>|<$STR(D89)>
ADDVARLIST $STR(S10) ..\QuestDiary\游戏功能\药水模式\人物模式.TXT
CHANGEMODE $STR(D89) 1
DELAY $STR(D88) @避水属性恢复
SENDMSG 6 服用<$STR(S29)>15分钟内可使人物开启避水属性
BREAK
[@避水属性恢复]
#IF
PO** $USERNAME .\QuestDiary\游戏功能\药水模式\人物模式.txt S10
#ACT
SPLIT $STR(S10) | S11
DELVARLIST $STR(S10) ..\QuestDiary\游戏功能\药水模式\人物模式.txt
CHANGEMODE $STR(S13) 0
SENDMSG 6 <$STR(D89)>分钟冷却时间已到,神秘的避水属性消失了。。。
SENDMSG 6 <$STR(D89)>分钟冷却时间已到,神秘的避水属性消失了。。。
SENDMSG 6 <$STR(D89)>分钟冷却时间已到,神秘的避水属性消失了。。。
BREAK
}