灵犀使者

[@main]
灵犀仙岛常年被云雾笼罩，当年灵犀仙人飞升后，大量\
仙气弥漫四周。仙岛上许多千年灵兽，自幼被仙气笼罩，充\
满了灵性，其资质成长都远超于被人类驯养的灵兽。\
已经是二转的灵兽就不需要转生啦！\\\
<灵兽三转：兽丹化形/@_animal_sanzhuan> <仙兽反馈奖励/@_animal_sanzhuanPrize> <灵兽二转相关/@_animal_erzhuanXiangguan>\
<更换虎王/@_animal_genhuandun> <五灵精魄相关/@hejingpo> <合成龙灵/@helongling> <龙王装备强化/@longequipup>

[@_animal_genhuandun]
更换器灵需要先将原先的器灵释放，然后将新的器灵封印\
入盾牌中，把你的虎王盾给我，我可以为你把虎王从其中解封\
释放，同时把你的准备好的龙灵封印到盾牌中。注意，只有满级\
并且装备穿戴齐全的虎王才可以被解封释放。\\
<我要更换虎王/@genhuandun2> <离开/@exit>a

[@genhuandun2]
#SAY
请放入虎王盾\\
<返回/@main>
#ACT
ShowSpotDlg 6 请放入虎王盾 @更换虎王
BREAK

[@更换虎王]
#IF
!POS $PARAM(0) 虎王盾
#SAY
你放入的不是虎王盾。
#ACT
break
#IF
SMALL $TIGER.LEVEL 100
#SAY
您的虎王等级未满100级，不可以更换龙王。
#ACT
break


[@hejingpo]
在我这里消耗10点精力值可以将6个同阶的五灵精魄合成\
高阶五灵精魄。\
<我要合成五灵精魄/@@HEJINGPO> <我要拆分五灵精魄/@chaifenlingp>\
<我再去准备一下/@exit>
[@@HEJINGPO]
恭喜你, 合成五行灵精魄成功

[@helongling]
近日，东方七宿光华日盛，此乃东方青龙现世之兆。中州\
勇士皆欲取龙之精魄“龙灵”封印于通灵盾中，获得龙王器灵，\
但不得其途。我发现，将中州已有的六种灵兽祭炼融合可获得龙\
之精魄”龙灵“，如果你带来六种灵兽，我可以帮你祭炼。\\
<我要合成龙灵/@@HELONGLING> <我再去准备一下/@exit>\
[@@HELONGLING]
灵兽祭炼后，您祭炼的灵兽将会消失。您确定要这么做吗？
恭喜你, 合成龙灵成功

[@longequipup]
将妖魂精魄的魄力融入龙王装备之中，有概率可以让龙王装备\
获得更强大的属性。你带来足够的材料，我可以为你强化龙王\
装备。\
<查看强化属性/@chakanequipattr>\
<我要强化装备/@uplongequip>\
<我再准备一下/@exit>\

[@chakanequipattr]
强化0：每次强化消耗10个妖魂精魄\
强化1：每次强化消耗20个妖魂精魄，五行+1\
强化2：每次强化消耗30个妖魂精魄，五行+2\
强化3；每次强化消耗40个妖魂精魄，五行+3\
强化4：每次强化消耗50个妖魂精魄，五行+5\
强化5：每次强化消耗60个妖魂精魄，五行+7\
强化6：每次强化消耗70个妖魂精魄，五行+10\
强化7：强化最高等级，不可继续强化，五行+14\
<返回/@longequipup>

[@uplongequip]
#SAY
请放入你要强化的龙王装备\\
<返回/@main>
#ACT
ShowSpotDlg 6 请放入龙王装备 @龙王装备
BREAK

[@龙王装备]
#IF
!CHECKVARLIST $PARAM(0) ..\QuestDiary\游戏读取\龙王装备.txt 
#SAY
请放入龙王装备！
#ACT
break

[@_animal_erzhuanXiangguan]
<灵兽幻化/@灵兽幻化>　　　　　<灵兽“滴血认主”开启资质/@绑定灵兽>\
<二转灵兽顿悟/@灵兽顿悟>　　　<灵兽转生/@灵兽转生>\
<复活死亡灵兽/@复活灵兽>　　　<用妖魔精血为灵兽增加经验/@妖魔精血>\
<如何捕捉灵兽/@如何捕捉>　　　<了解五行属性/@五行属性>\

[@如何捕捉]
灵犀仙岛上灵兽众多，其资质等都比起普通灵兽来更胜\
一筹。如想捕捉到这些野生灵兽，可乘其体力虚弱之时，使\
用<COLOR=GREEN “灵兽项圈”>将其收服捕捉。\
<COLOR=GREEN “灵兽项圈”可放入快捷栏上使用。>\
<如此神奇，我这就去抓几个。/@exit>

[@五行属性]
时间万物五行相克，可破金之坚者，必畏水之盈。仙岛\
灵兽天生具有五行属性<COLOR=GREEN （普通灵兽在滴血认主后，也会有五>\
<COLOR=GREEN 行属性）>，而且灵兽二转后<COLOR=GREEN 五行属性会随灵兽顿悟次数的>\
<COLOR=GREEN 增加而成长。>\
每点五行攻击属性就等于 <COLOR=GREEN 1点攻击力、道术攻击或魔法>\
<COLOR=GREEN 攻击，>在战斗时可将此伤害完全释放到对手身上，但五行攻\
<COLOR=GREEN 击属性遇到其相克制的属性就无法发挥威力了，>其中更多奥\
妙就有待你去发掘了。\
<没想到一个小小灵兽竞有如此讲究！/@exit>

[@了解凤凰]
凤凰，来自天界的禽类。善于飞行和打斗。\
小凤凰名为赤翎凤，飞升入天界的天人都可获得。赤翎\ 
凤满7级后，就可以转生为傲天凤，如果天人崇尚以月之太阴\
之力修炼，赤翎凤将转变为金黄色的傲天凤，并且凤凰石将\
变为凤神石，如果天人崇尚以日之太阳之力淬炼自身，赤翎\
凤将转变为红紫色的傲天凤，并且凤凰将变为凤魔石。傲\
天凤进行二转后，将会变为炽天神凤和炽天魔凤。\
凤凰在天界中，还可在云端翱翔，穿越特殊障碍。\ 
<了解凤凰探宝/@凤凰探宝>　　<返回/@main>

[@凤凰探宝]
当赤翎凤转生为傲天凤后，凤凰就可以进行探宝。\
凤凰可探宝获得银月和炙日藏宝图碎片，将碎片拼凑完\ 
整就可带领宗族进入神秘的银月和炙日地图中，在30分钟内\
清除完地图中的怪物，就可开启中间的宝箱获得宝物。\
将饱食的傲天凤释放出就可进行探宝，天人不在传世，\ 
凤凰照样可进行探宝，探宝将消耗一定的饱食度。\
<返回/@了解凤凰>

[@灵兽幻化]
所有的灵兽都可进行幻化。幻化时需要一个主灵兽和一\
个副灵兽。幻化后，主灵兽将会继承副灵兽上的部分属性。\
<COLOR=GREEN 而副灵兽的等级越高，幻化时的成功概率也越高，同时>\
<COLOR=GREEN 能通过幻化转移的属性也越多。>\
<COLOR=GREEN 无论幻化是否成功，副灵兽都会消失。>\
在幻化时加入封元印，还可提高幻化的成功率。幻化时\ 
需要<COLOR=GREEN 10点灵力和20万金币>。\\
<进行幻化/@@HUANHUA>　　<购买封元印/@购买封元印>

[@购买封元印]
你需要哪种封元印呢？\\
<购买地火兽弓箭手封元印/@弓箭手>　　<COLOR=GREEN 1元宝／个>\\
<购买猛魔统领封元印/@猛魔统领>　　　　<COLOR=GREEN 1元宝／个>\\
<返回/@main>

[@弓箭手]
#IF
CHECKGAMEGOLD > 0
#ACT
GAMEGOLD - 1
GIVE 封元印2 1
UPGRADEUSERITEM $PARAM(10) 1 = 5
SENDMSG 5 你花费1元宝购买了1个地火兽弓箭手封元印
break
#ELSEACT
MessageBox 你元宝不足1个，不能购买封元印
break

[@猛魔统领]
#IF
CHECKGAMEGOLD > 0
#ACT
GAMEGOLD - 1
GIVE 封元印1 1
UPGRADEUSERITEM $PARAM(10) 1 = 6
SENDMSG 5 你花费1元宝购买了1个猛魔统领封元印
break
#ELSEACT
MessageBox 你元宝不足1个，不能购买封元印
break


[@妖魔精血]
#ACT
ShowSpotDlg 6 请放入你的灵兽石 @妖魔精血1
#SAY
你打败那些妖魔了吗？ <COLOR=GREEN 请把你的灵兽石给我，并把妖魔>\
<COLOR=GREEN 精血放到包裹中。>我可以帮你将妖兽精血中的能量注入你的\
灵兽体内，化为你灵兽的经验值，同时还能让你饥饿的灵兽\
变为微饿状态。\
<离开/@exit>

[@妖魔精血1]
#IF
!EQUAL $ITEMINFO[$PARAM(1)].STDMODE 49
!EQUAL $ITEMINFO[$PARAM(1)].SHAPE 51
#ACT
MESSAGEBOX 你放入的不是灵兽石，请检查后操作！
BREAK
#IF
checkitem 妖魔精血 1
#ACT
TAKE 妖魔精血 1
MOVR P1 8
INC P1 3
SETPETATTRIBUTE $PAEAM(1) 17 + $STR(P1)
SENDMSG 5 你的这只灵兽获得了<$STR(P1)>点经验
#SAY
妖魔精血的能量让你的这只灵兽获得了<$STR(P1)>点经验！\\
<谢谢/@exit>
#ELSEACT
break
#ELSESAY
你没有妖魔精血，不能增加灵兽经验！\\
<离开/@exit>

[@复活灵兽]
#ACT
ShowSpotDlg 6 请放入你的灵兽石 @开始复活

[@开始复活]
#IF
!equal $ITEMINFO[$PARAM(1)].stdmode 49
!equal $ITEMINFO[$PARAM(1)].shape 51
#ACT
MESSAGEBOX 你放入的不是灵兽石，请检查后操作！
close
break
#IF
CHECKITEM 兽神水 1
#ACT
take 兽神水 1
RELIVEPET
#SAY
你的灵兽已经复活，\
下次要小心，不要再让他死掉了哦。\\\
<知道了/@exit1>
#ELSESAY
你没有兽神水啊，这是复活灵兽所必须的，要是没有这个我也没\
办法帮你了。\\\
<知道了/@exit1>
break

[@灵兽顿悟]
引灵炼体、顿悟天道，顿悟乃灵兽体悟五行变化之根本\
方式，<COLOR=GREEN 二转灵兽每经过五级可以顿悟一次，每次顿悟都会提>\
<COLOR=GREEN 升其五行属性。>\
如果你的二转灵兽达到需要顿悟的等级，我可以帮你释\ 
放出的灵兽顿悟天道，<COLOR=GREEN 不过需要消耗你本体身上部分灵力。>\
不过在下功力尚浅， <COLOR=GREEN 只能帮71级以下的灵兽进行顿悟，>\
<COLOR=GREEN 71级以后的能力成长道路就要看自己的造化了。>\
<我准备好了/@准备好了1>　　　<稍等，我去准备一下/@exit>

[@准备好了1]
#IF
!CHECKPETFOLLOW
#SAY
您没有放出你需要顿悟的灵兽\\\ 
<稍等，我去准备一下/@exit>\
#ACT
break
#IF
LARGE $PET.LEVEL 70
#SAY
目前在下功力尚浅， <Color=green 只能帮71级以下的灵兽进行顿悟，>\
<Color=green 71级以后的能力成长道理就要看自己的造化了。>\
<知道了/@exit>\
#ACT
break
#IF
EQUAL $PET.RELIVE 2
#ACT
MOV D70 1
INC D70 $PET.SAVVY
MULT D70 5
MOV D71 $STR(D70)
MULT D71 2
#ELSESAY
你的灵兽并非二转灵兽先去进行二转以后再来吧！\\ 
<我知道了/@exit>\
#ELSEACT
break
#IF
SMALL $PET.APTITUDE $STR(D71)
#SAY
你的灵兽资质过低，无法进行顿悟，请幻化灵兽提高资质\ 
到<$STR(D71)>点再来吧！\\
<我知道了/@exit>\
#ACT
break
#IF
SMALL $PET.LEVEL $STR(D70)
#SAY
你的灵兽等级不够无法顿悟，请把灵兽升级到 <$STR(D70)>级，\
以后再来找我吧！\
<我知道了/@exit>\
#ACT
break
#IF
CHECKPETFOLLOW
#SAY
本次的灵兽顿悟需要消耗{Color=green <$STR(D70)>点灵力和<$STR(D79)>万}金币你准备好\
了吗？\\
{我已经准备好了/@lsdunss >\
<我去准备一下/@exit>\
#ACT
MOV D79 $STR(D70)
INC D79 $STR(D70)
break

[@lsdunss]
#IF
!CHECKPETFOLLOW
#SAY
您没有放出你需要顿悟的灵兽\\\ 
<稍等，我去准备一下/@exit>\
#ACT
break
#IF
LARGE $PET.LEVEL 70
#SAY
目前在下功力尚浅， <Color=green 只能帮71级以下的灵兽进行顿悟，>\
<Color=green 71级以后的能力成长道理就要看自己的造化了。>\
<知道了/@exit>\
#ACT
break
#IF
EQUAL $PET.RELIVE 2
#ACT
MOV P0 1
INC P0 $PET.SAVVY
MULT P0 5
MOV P1 $STR(P0)
MULT P1 2
#ELSESAY
你的灵兽并非二转灵兽先去进行二转以后再来吧！\\ 
<我知道了/@exit>\
#ELSEACT
break
#IF
SMALL $PET.APTITUDE $STR(P1)
#SAY
你的灵兽资质过低，无法进行顿悟，请幻化灵兽提高资\ 
质到<$STR(P1)>点再来吧！\\
<我知道了/@exit>\
#ACT
break
#IF
SMALL $PET.LEVEL $STR(P0)
#SAY
你的灵兽等级不够无法顿悟，请把灵兽升级到 <$STR(P0)>级，\
以后再来找我吧！\
<我知道了/@exit>\
#ACT
break
#IF
SMALL $NIMBUSPOINT $STR(D70)
#SAY
你的灵力不足无法完成顿悟！\ 
<我知道了/@exit>\
#ACT
break
MOV P9 $STR(D79)
MULT P9 20000
#IF
CHECKGOLD $STR(P9)
#SAY
你的灵兽顿悟了，五行属性大幅度提高了！\ 
<我知道了/@exit>\
#ACT
TAKE 金币 $STR(P9)
NIMBUSPOINT - $STR(D70)
SETPETATTRIBUTE $PET.MAKEINDEX 14 + 1 ;顿悟+1
#ELSESAY
你的金币不足无法完成顿悟！\ 
<我知道了/@exit>\
#ELSEACT
break
#IF
random 1
#ACT
MOV D72 $PET.MAKEINDEX
#IF
TRUE
#ACT
MOVR P0 4
INC P0 4
SETPETATTRIBUTE $PET.MAKEINDEX 3 + $STR(P0) ;生命
#IF
SMALL $ITEMINFO[$PET.MAKEINDEX].PET.MP 255
#ACT
MOVR P0 4
INC P0 4
SETPETATTRIBUTE $PET.MAKEINDEX 4 + $STR(P0) ;魔法值
#IF
random 12
#ACT
MOVR P0 7
MOV S1 @顿悟攻击属性
INC S1 $str(P0)
GOTO $str(S1)
#IF
random 6
#ACT
MOVR P0 9
MOV S1 @顿悟属性
INC S1 $str(P0)
GOTO $str(S1)
#IF
random 2
#ACT
MOVR P0 9
MOV S1 @顿悟属性
INC S1 $str(P0)
GOTO $str(S1)
#IF
SMALL $ITEMINFO[$STR(D72)].PET.FELEMENT1 金
#ACT
GOTO @元素1
#ELSEACT
GOTO @元素2

[@元素1]
#IF
random 5
#ACT
MOVR P1 4
INC P1 1
SETPETATTRIBUTE $PET.MAKEINDEX 15 + $STR(P1)
#ELSEACT
MOVR P1 2
INC P1 1
SETPETATTRIBUTE $PET.MAKEINDEX 15 + $STR(P1)

[@元素2]
#IF
random 5
#ACT
MOVR P1 4
INC P1 1
SETPETATTRIBUTE $PET.MAKEINDEX 16 + $STR(P1)
#ELSEACT
MOVR P1 2
INC P1 1
SETPETATTRIBUTE $PET.MAKEINDEX 16 + $STR(P1)

[@顿悟属性0]
#IF
SMALL $ITEMINFO[$STR(D72)].PET.POISONNICETY 31
#ACT
SETPETATTRIBUTE $PET.MAKEINDEX 13 + 1 ;;中毒命中0－31
[@顿悟属性1]
#IF
SMALL $ITEMINFO[$STR(D72)].PET.ANTIPOISON 31
#ACT
SETPETATTRIBUTE $PET.MAKEINDEX 5 + 1 ;;中毒躲避0－31
[@顿悟属性2]
#IF
SMALL $ITEMINFO[$STR(D72)].PET.MAC1 31
#ACT
SETPETATTRIBUTE $PET.MAKEINDEX 6 + 1 ;;魔防力下限：0-31
[@顿悟属性3]
#IF
SMALL $ITEMINFO[$STR(D72)].PET.MAC2 31
#ACT
SETPETATTRIBUTE $PET.MAKEINDEX 7 + 1 ;;魔防力上限：0-31
[@顿悟属性4]
#IF
SMALL $ITEMINFO[$STR(D72)].PET.MAGICNICETY 31
#ACT
SETPETATTRIBUTE $PET.MAKEINDEX 8 + 1 ;;魔法命中 0-31
[@顿悟属性5]
#IF
SMALL $ITEMINFO[$STR(D72)].PET.EVADET 31
#ACT
SETPETATTRIBUTE $PET.MAKEINDEX 9 + 1 ;;退避 0－31 
[@顿悟属性6]
#IF
SMALL $ITEMINFO[$STR(D72)].PET.AC1 31
#ACT
SETPETATTRIBUTE $PET.MAKEINDEX 10 + 1 ;;防御力下限：0-31 
[@顿悟属性7]
#IF
SMALL $ITEMINFO[$STR(D72)].PET.AC2 31
#ACT
SETPETATTRIBUTE $PET.MAKEINDEX 11 + 1 ;;防御力上限：0-31 
[@顿悟属性8]
#IF
SMALL $ITEMINFO[$STR(D72)].PET.ANTIMAGIC 31
#ACT
SETPETATTRIBUTE $PET.MAKEINDEX 12 + 1 ;;魔法退避 0-31 

[@顿悟攻击属性0]
#IF
SMALL $ITEMINFO[$STR(D72)].PET.MC1 7
#ACT
SETPETATTRIBUTE $PET.MAKEINDEX 19 + 1 ;;魔功下限 0－7
[@顿悟攻击属性1]
#IF
SMALL $ITEMINFO[$STR(D72)].PET.DC1 7
#ACT
SETPETATTRIBUTE $PET.MAKEINDEX 23 + 1 ;;攻击下限 0－7
[@顿悟攻击属性2]
#IF
SMALL $ITEMINFO[$STR(D72)].PET.SC2 7
#ACT
SETPETATTRIBUTE $PET.MAKEINDEX 22 + 1 ;;道攻上限 0－7
[@顿悟攻击属性3]
#IF
SMALL $ITEMINFO[$STR(D72)].PET.DC2 7
#ACT
SETPETATTRIBUTE $PET.MAKEINDEX 24 + 1 ;;攻击上限 0－7
[@顿悟攻击属性4]
#IF
SMALL $ITEMINFO[$STR(D72)].PET.SC1 7
#ACT
SETPETATTRIBUTE $PET.MAKEINDEX 21 + 1 ;;道攻下限 0－7
[@顿悟攻击属性5]
#IF
SMALL $ITEMINFO[$STR(D72)].PET.MC2 7
#ACT
SETPETATTRIBUTE $PET.MAKEINDEX 20 + 1 ;;魔功上限 0－7
[@顿悟攻击属性6]
#IF
SMALL $ITEMINFO[$STR(D72)].PET.NICETY 7
#ACT
SETPETATTRIBUTE $PET.MAKEINDEX 25 + 1 ;;命中 0－7

[@灵兽转生]
灵兽共分为3个阶段：<Color=green 小灵兽、一转灵兽、二转灵兽。>\
当小灵兽等级达到7级时，携带一副灵兽铠和一瓶兽\ 
神水，就可洗髓易骨，进行转生。\
而一转后的灵兽达到7级满经验 <Color=green 使用20点灵力和一个兽>\
<Color=green 神水就可以进行二转，二转后的灵兽更具灵性，本体可进行骑>\
<Color=green 战，并释放强大的骑战技能，战斗凶猛，威力巨大。>\
<灵兽一转/@灵兽一转>　　　　<一转灵兽的特点/@一转特点>　　<转生与资质的关系/@关系>\
<灵兽二转/@灵兽二转>　　　　<二转灵兽的特点/@二转特点>　　<返回/@main>\

[@关系]
神奇灵兽，以灵铸体，顿悟天道，以先天资质为贵。\
资质高者可及早迈入二转之境。\
资质高于<Color=green 20>者一转<Color=green 7级600点经验>可进行二转。\
资质高于<Color=green 30>者一转<Color=green 7级500点经验>可进行二转。\
资质高于<Color=green 40>者一转<Color=green 7级400点经验>可进行二转。\
资质高于<Color=green 50>者一转<Color=green 7级300点经验>可进行二转。\
资质高于<Color=green 60>者一转<Color=green 7级200点经验>可进行二转。\
资质高于<Color=green 70>者一转<Color=green 7级100点经验>可进行二转。\
<原来灵兽也有这么多讲究！/@exit>　　<返回/@main>\ 

[@一转特点]
一转后的灵兽将变得更加敏捷更加强大\
1，它能大声吼叫震慑怪物。\ 
2，载你在怪物出没的洞穴中奔驰。\ 
3，以吼叫推开低等级的灵兽和马匹等。\ 
但是灵兽毕竟野性难驯，想真正骑上本性暴躁的灵\ 
兽，还得穿上神奇的<COLOR=GREEN 御兽天袍>和<COLOR=GREEN 御兽天衣>才行。\
<返回/@灵兽转生>

[@二转特点]
灵兽进行二转后，其外貌、品质、功能等都将有天翻地\
覆的变化。<COLOR=GREEN 踏云豹将变为迅天雷豹，震天狮将变为战天狂狮>\
<COLOR=GREEN 而圣麒麟将变为玄天麒麟。>\
灵兽在二转后，被开启了资质，佩带了新的灵兽铠甲，\ 
更获得了<COLOR=GREEN 五行属性。并且当灵兽骑战时，本体更能继承灵兽>\
<COLOR=GREEN 身上所有属性，使用五行攻击力。>\\
<返回/@灵兽转生>

[@_animal_sanzhuan]
灵兽每次的转生都将给其带来莫大的好处。其第三次转\
生不但能突破二转时的附加属性和资质等的上限，更是能通\
过进一步的修炼，将其体内的“兽丹”化形而出，形成 “\
仙兽元神”，能让元神骑战。\
只有200级满经验的2转灵兽才能进行3转，并且还额外\ 
需要<Color=green 1000点灵力和1个灵兽铠>，你准备好了吗？\
注意：不管2转时是普通灵兽还是魂佑灵兽，3转后将\ 
<Color=red 统一进阶为魂佑灵兽>。\
<请帮我的灵兽进行三转吧/@doSanzhuan> <稍后再试/@exit>

[@doSanzhuan]
#IF
!CHECKPETFOLLOW
#SAY
请先放出一个灵兽跟随\ 
<好的/@exit>\
#ACT
break
#IF
SMALL $PET.LEVEL 200
#SAY
您并没有跟随200级的二转灵兽，我怎么帮您转生呢？\\\ 
<梢等，我去准备一下/@exit>\
#ACT
break
#IF
!EQUAL $PET.RELIVE 2
#SAY
您并没有跟随200级的二转灵兽，我怎么帮您转生呢？\\\ 
<梢等，我去准备一下/@exit>\
#ACT
break
#IF
EQUAL $PET.RELIVE 3
#SAY
你的灵兽已经是三转灵兽，你可以通过幻化提高它的属性。\\ 
<知道了/@exit>\
#ACT
break
#IF
EQUAL $PET.APTITUDE 0
#SAY
你的灵兽还没有获得资质灵犀仙岛找灵犀使者“滴血认主”\ 
开启资质，获得五行属性！\\
<梢等，我去准备一下/@exit>\
#ACT
break
#IF
SMALL $NIMBUSPOINT 1000
#SAY
转生还需要 <Color=green 1000点灵力值>\\
<梢等，我去准备一下/@exit>\
#ACT
break
#IF
CHECKITEM 灵兽铠 1
#SAY
您的灵兽已经成功的进阶为三转仙兽了，从此将不在“\ 
天地灵兽榜”中排名，而是进阶到专门的“化形仙兽榜”，\
在该榜中的第一灵兽将获得“无双仙兽”头衔。\
<Color=green 请将仙兽收回再放出，仙兽会变化为瓣的样子>\
注意：虽然您的灵兽已经进阶为仙兽，但是要想成功让\ 
仙兽元神被元神骑乘，您还需要学习天赋技能书<Color=green “化形骑战”>\
<告辞/@exit>\　
#ACT
take 灵兽铠 1
NIMBUSPOINT - 1000
UPGRADEMON
UPGRADEUSERITEM $PET.MAKEINDEX 93 = 2 
UPGRADEUSERITEM $PET.MAKEINDEX 4 = 1
ShowAdditionalInfo 8 $PET.MAKEINDEX
SENDMSG 15 %s的骑宠玄<$PET.NAME>成功突破二转灵兽，进阶为三转化形仙兽。
GOTO @血脉纯净度
break
close
#ELSESAY
灵兽铠是转生的必须道具，可以从元宝商城里购买到！\
<知道了/@exit>

[@血脉纯净度]
#IF
SMALL $ITEMINFO[$PET.MAKEINDEX].ITEMEXT(92) 1
#ACT
MOVR P0 75
INC P0 25
UPGRADEUSERITEM $PET.MAKEINDEX 92 = $STR(P0) ;血脉纯净度
break

[@灵兽一转]
只有7级的<COLOR=GREEN 丛林豹、天狮兽、麒麟兽>才可进行一转，转\
生还需要一副灵兽铠。\
请在包裹中准备好灵兽铠，并且释放出你需要转生的小\ 
灵兽。\\
<我准备好了替小灵兽转生/@小灵兽转生>\
<返回/@灵兽转生>

[@灵兽二转]
只有7级满经验的<COLOR=GREEN 踏云豹、震天狮和圣麒麟>才可进行二\
转，转生还需要<COLOR=GREEN 20点灵力值和一瓶兽神水>。并且只要是二次\
转身的灵兽都将会获得五行属性。\
灵兽在二转时，会进行“滴血认主”，从此灵兽真正臣\ 
服于你一人。\
请在包裹中准备好兽神水，并且释放出你需要二次转生\ 
的灵兽。\
灵兽资质越高，其二转的时机来的越早。\ 
<我准备好了替灵兽二次转生/@二次转生>

[@小灵兽转生]
#IF
!CHECKPETFOLLOW
#SAY
您并没有放出7级的未转灵兽，我怎么帮您转生呢？\\\ 
<稍等，我去准备一下/@exit>
#ACT
break

#IF
SMALL $PET.LEVEL 7
#SAY
您并没有放出7级的未转灵兽，我怎么帮您转生呢？\\\ 
<稍等，我去准备一下/@exit>
#ACT
break
#IF
!EQUAL $PET.ZSD 0
#SAY
您并没有跟随7级的未转小灵兽，我怎么帮您转生呢？\\\ 
<梢等，我去准备一下/@exit>\
#ACT
break

#IF
CHECKITEM 灵兽铠 1
#ACT
take 灵兽铠 1
UPGRADEMON
break
close
#ELSESAY
灵兽铠是转生的必须道具，可以从元宝商城里购买到！\
<知道了/@exit>

[@二次转生]
#IF
!CHECKPETFOLLOW
#SAY
您并没有放出7级的一转灵兽，我怎么帮您转生呢？\\\ 
<稍等，我去准备一下/@exit>
#ACT
break

#IF
SMALL $PET.LEVEL 7
#SAY
您并没有放出7级的一转灵兽，我怎么帮您转生呢？\\\ 
<稍等，我去准备一下/@exit>
#ACT
break
#IF
!EQUAL $PET.RELIVE 1
#SAY
您并没有放出7级的一转灵兽，我怎么帮您转生呢？\\\ 
<稍等，我去准备一下/@exit>
#ACT
break

#IF
CHECKITEM 豹神水 1
#ACT
MOV S3 豹神水
GOTO @检测灵力
break
#IF
CHECKITEM 极品兽神水 1
#ACT
MOV S3 极品兽神水
GOTO @检测灵力
break
#IF
CHECKITEM 兽神水 1
#ACT
MOV S3 兽神水
GOTO @检测灵力
#ELSESAY
您并没有带来豹神水或者兽神水，我怎么帮您转生呢？\\\ 
<稍等，我去准备一下/@exit>


[@检测灵力]
#IF
SMALL $NIMBUSPOINT 20
#SAY
您当前的灵力值不足20点，我怎么帮您转生呢？\\\ 
<稍等，我去准备一下/@exit>
#ACT
break
#IF
SMALL $PET.LEVEL 7
#SAY
您并没有放出7级的一转灵兽，我怎么帮您转生呢？\\\ 
<稍等，我去准备一下/@exit>
#ACT
break
#IF
SMALL $PET.APTITUDE 20
#ACT
MOV P9 2000
#IF
LARGE $PET.APTITUDE 19
#ACT
MOV P9 1800
#IF
LARGE $PET.APTITUDE 29
#ACT
MOV P9 1600
#IF
LARGE $PET.APTITUDE 39
#ACT
MOV P9 1400
#IF
LARGE $PET.APTITUDE 49
#ACT
MOV P9 1200
#IF
LARGE $PET.APTITUDE 59
#ACT
MOV P9 1000
#IF
LARGE $PET.APTITUDE 69
#ACT
MOV P9 800
#IF
CHECKLEVELEX > 0
#ACT
#ELSEACT
break
#IF
SMALL $PET.EXP $STR(P9)
#SAY
灵兽经验不足，不能进行二转。\\ 
您当前灵兽资质为： <$PET.APTITUDE>\
进行二转需要灵兽达到7级 <$STR(P9)>点经验。\\
<COLOR=GREEN 极品兽粮>或<COLOR=GREEN 兽尊灵丹>使用可增加灵兽经验！\\
<稍等，我去准备一下/@exit>
#ACT
break
#ELSEACT
take $STR(S3) 1
NIMBUSPOINT - 20
UPGRADEMON
UPGRADEUSERITEM $PET.MAKEINDEX 59 = 1
SendMsg 10 <$USERNAME>的灵兽成功进行了二转，灵兽二转请到灵犀仙岛116:30找灵犀使者进行
break
close

[@绑定灵兽]
每个灵兽都有一个先天属性，名为<COLOR=GREEN “资质”>，每个野生\
的灵兽在被捕获时就可以发现它的资质，而非野生的灵兽则\
需要主人进行“滴血认主”才可被发现。<COLOR=GREEN 同时你也无法以任>\
<COLOR=GREEN 何方式将此灵兽转给别人！>\
<COLOR=GREEN 只要是开启过资质的灵兽，就会获得一个五行属性。在>\
<COLOR=GREEN 骑战状态下，可获得五行属性的攻击力加成，并且，提升二>\
<COLOR=GREEN 转灵兽的顿悟次数才可提升五行攻击力。>\
还有，灵兽资质越高，其二转的时机来得越早。\ 
<好的，请帮我“滴血认主”并发现资质/@发现资质>　　<资质的作用/@资质作用>

[@资质作用]
一个灵兽的资质直接决定了它二转后能升到的最高等\
级，而<COLOR=GREEN 灵兽的等级越高其主人使用骑战技能的威力也越大、>\
<COLOR=GREEN 其作为副灵兽幻化时的成功概率也越高，同时能通过幻化转>\
<COLOR=GREEN 移的属性也越多。>\
<COLOR=GREEN 资质越高灵兽二转所需要的经验也越少。>\
<COLOR=GREEN 同时告诉你个秘密资质也可通过幻化来进行提升的哦。>\
<返回/@绑定灵兽>

[@发现资质]
#ACT
ShowSpotDlg 6 请放入你的灵兽石 @资质发现
#SAY
<COLOR=GREEN 请放入你需要“滴血认主”开启资质的灵兽。>\
<COLOR=GREEN 对了，同时这还将花费10万金币。>

[@资质发现]
#IF
CHECKITEMID $PARAM(1)
#ACT
#ELSEACT
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].NAME 战鲨石
#SAY
战鲨无需滴血认主
#ACT
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].STDMODE 49
EQUAL $ITEMINFO[$PARAM(1)].SHAPE 51
#ACT
MOV P0 $PARAM(1)
#ELSESAY
你认为你给我的是灵兽石吗？你没有疯吧！\\ 
<搞错了/@exit>
#ELSEACT
break
;=============================================================
#IF
EQUAL $PARAM(1) 0
#SAY
你的灵兽是领养来的，不能开启资质！\ 
<离开/@exit>\
#ACT
break
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(59) 0
#SAY
你的灵兽已经“滴血认主”并发现了资质，无法再次\ 
发现。\
<离开/@exit>\
#ACT
UPGRADEUSERITEM $PARAM(1) 59 = 1
break
#IF
CHECKGOLD 100000
#SAY
你的灵兽“滴血认主”发现了资质。\ 
<离开/@exit>\
#ACT
UPGRADEUSERITEM $PARAM(1) 59 = 1
MOV S0 $PARAM(1)
#CALL [\游戏功能\灵兽属性.txt] @普通属性
TAKE 金币 100000
#ELSESAY
你连10W金币都没有吗？\ 
<离开/@exit>\
#ELSEACT
break