传奇豹子幻化使者脚本
[@main]\
结果神仙指点，我把握了对灵兽进行转生幻化的本领.\
灵兽通过转生幻化，使灵兽灵巧顿悟转化成你的战宠\
\\
<灵兽复活/@灵兽复活> <灵兽转生/@灵兽转生> <灵兽幻化顿悟/@五行属性1>\\
<离开/@exit>
[@五行属性1]
时间万物五行相克，可破金之坚者，必畏水之盈。仙岛\
灵兽生成具有五行属性<COLOR=GREEN （普通灵兽在滴血认主后，也会有五>\
<COLOR=GREEN 行属性）>，而且灵兽二转后<COLOR=GREEN 五行属性会随灵兽顿悟次数的>\
<COLOR=GREEN 增加而成长。>\
每点五行攻击属性就即是 <COLOR=GREEN 1点攻击力、道术攻击或魔法>\
<COLOR=GREEN 攻击，>在战斗时可将此伤害完全开释到对手身上，但五行攻\
<COLOR=GREEN 击属性碰到其相克制的属性就无法施展威力了，>其中更多奥\
妙就有待你去发掘了。收费20万元宝\
<进灵兽幻化顿悟/@五行属性2>\
[@五行属性2]
#IF
CHECKGAMEGOLD < 200000
#ACT
SENDMSG 5 每一个灵兽石的幻化一次数为200000元宝，当前你的元宝不够
break
#IF
LARGE $UpgradeItemExDLS.$PARAM(0).27 20
#ACT
SENDMSG 5 每一个灵兽石的最高幻化次数为20次，当前你的灵兽石不能进行幻化了
break
#ELSEACT
GAMEGOLD - 200000
goto @五行
goto @属性
SENDMSG 5 恭喜你花费200000元宝，成功的为你灵兽进行幻化了
[@五行]
#IF
RANDOM 1
#ACT
MOV P89 1
UpgradeItemExDLS $PARAM(0) 22 = $STR(P89)
#IF
RANDOM 2
#ACT
MOV P89 65
UpgradeItemExDLS $PARAM(0) 22 = $STR(P89)
#IF
RANDOM 3
#ACT
MOV P89 129
UpgradeItemExDLS $PARAM(0) 22 = $STR(P89)
[@属性]
;资质0-50 1 资质20-70 10
;生命值0-20
;魔法值0-20
;防备下限 1 30
;防备上限 1 30
;魔御下限 1 30
;魔御上限 1 30
;攻击下限 1 30
;攻击上限 1 30
;魔法下限 1 30
;魔法上限 1 30
;道术下限 1 30
;道术上限 1 30
;躲避 1 30
;幸运 1 100
#IF
random 1
#ACT
;资质1-5
movr P0 5
inc P0 1
UpgradeItemExDLS $PARAM(0) 25 + $STR(P0)
#IF
random 1
#ACT
;生命值0-20
movr P0 80
inc P0 1
UpgradeItemExDLS $PARAM(0) 18 + $STR(P0)
;魔法值0-20
movr P0 60
inc P0 1
UpgradeItemExDLS $PARAM(0) 19 + $STR(P0)
UpgradeItemExDLS $PARAM(0) 27 + 1
;防备下限
UpgradeItemExDLS $PARAM(0) 19 + 2
;防备下限
UpgradeItemExDLS $PARAM(0) 9 + 2
UpgradeItemExDLS $PARAM(0) 11 + 2
;魔御下限
UpgradeItemExDLS $PARAM(0) 1 + 1
;魔御上限
UpgradeItemExDLS $PARAM(0) 3 + 2
;攻击下限
UpgradeItemExDLS $PARAM(0) 10 + 1
;攻击上限
UpgradeItemExDLS $PARAM(0) 12 + 2
;魔法下限
UpgradeItemExDLS $PARAM(0) 2 + 1
;魔法上限
UpgradeItemExDLS $PARAM(0) 4 + 2
;道术下限
UpgradeItemExDLS $PARAM(0) 6 + 1
;道术上限
UpgradeItemExDLS $PARAM(0) 14 + 2
#IF
random 10
#ACT
;幸运 1 100
UpgradeItemExDLS $PARAM(0) 16 + 1
[@灵兽复活]
#SAY
请放入你的灵兽石，我帮你复活你的灵兽。\\
<下次吧/@exit>
#ACT
DELAY 0 @灵兽复活1
[@灵兽复活1]
#ACT
checkitembox 请放入灵兽石 1 1
[@getboxitem1]
#IF
checkitemx 凤凰石
#ACT
GOTO @是灵兽石
break
#IF
checkitemx 豹魔石
#ACT
GOTO @是灵兽石
break
#IF
checkitemx 狮魔石
#ACT
GOTO @是灵兽石
break
#IF
checkitemx 麒麟石
#ACT
GOTO @是灵兽石
break
#ELSESAY
您提供的好象不是灵兽石啊。\\
<知道了/@exit>
#ELSEACT
break
[@是灵兽石]
#IF
CHECKITEM 兽神水 1
#ACT
take 兽神水 1
RELIVE
break
#SAY
你的灵兽已经复活，\
下次要小心，不要再让他死掉了哦。\\\
<知道了/@exit>
#IF
CHECKITEM 兽神水 1
#ACT
take 兽神水 1
RELIVE
break
#SAY
你的灵兽已经复活，\
下次要小心，不要再让他死掉了哦。\\\
<知道了/@exit>
#ELSESAY
你并没有兽神水，这是复活灵兽所必需的物品。\
要是没有这个我也没办法帮你了。你仍是到处找找看吧。\\\
<知道了/@exit>
#ELSEACT
break
[@sdsdd]
<灵兽转生/@灵兽转生> <灵兽“滴血认主”开启资质/@绑定灵兽>\
<灵兽幻化/@灵兽幻化> <二转灵兽顿悟/@灵兽顿悟>\
<灵兽历练任务/@历练任务> <用妖魔精血为灵兽增加经验/@妖魔精血>\
<如何捕获灵兽/@如何捕获> <了解五行属性/@五行属性>
[@历练任务]
<灵兽历练任务/@灵兽历练>\\
<离开/@exit>
[@灵兽历练]
#IF
CHECKLEVELEX > 29
#ACT
#ELSESAY
需要等级46级以上才能接灵兽历练任务。\\
<离开/@exit>
#ELSEACT
break
#IF
CHECKTASKSTEP 411 418 > 0
#ACT
GOTO @完成检测108
break
#ELSEACT
MOVR P1 8
INC P1 1
MOV S0 @任务类型
INC S0 $STR(P1)
GOTO $STR(S0)
break
[@任务类型1]
炼狱之中妖魔作乱，一塌糊涂坏我等清修之境，你替我\
打败<COLOR=GREEN 30个逆魔弓箭手>，也算是替天行道了。\
打败这些妖魔后，你可以来我这里领取一块妖魔精血。\
<COLOR=GREEN 我可以帮你将妖兽精血中的能量注入你的灵兽体内，化为灵>\
<COLOR=GREEN 兽的经验值，并能让你饥饿的灵兽变为微饿状态。>\
<太好了，我正愁没兽粮喂灵兽呢/@接受任务&灵兽历练1>\
<不感爱好，再见！/@exit>
[@任务类型2]
炼狱之中妖魔作乱，一塌糊涂坏我等清修之境，你替我\
打败<COLOR=GREEN 30个逆魔雕像>，也算是替天行道了。\
打败这些妖魔后，你可以来我这里领取一块妖魔精血。\
<COLOR=GREEN 我可以帮你将妖兽精血中的能量注入你的灵兽体内，化为灵>\
<COLOR=GREEN 兽的经验值，并能让你饥饿的灵兽变为微饿状态。>\
<太好了，我正愁没兽粮喂灵兽呢/@接受任务&灵兽历练2>\
<不感爱好，再见！/@exit>
[@任务类型3]
炼狱之中妖魔作乱，一塌糊涂坏我等清修之境，你替我\
打败<COLOR=GREEN 30个逆魔卫士>，也算是替天行道了。\
打败这些妖魔后，你可以来我这里领取一块妖魔精血。\
<COLOR=GREEN 我可以帮你将妖兽精血中的能量注入你的灵兽体内，化为灵>\
<COLOR=GREEN 兽的经验值，并能让你饥饿的灵兽变为微饿状态。>\
<太好了，我正愁没兽粮喂灵兽呢/@接受任务&灵兽历练3>\
<不感爱好，再见！/@exit>
[@任务类型4]
炼狱之中妖魔作乱，一塌糊涂坏我等清修之境，你替我\
打败<COLOR=GREEN 30个逆魔侍卫>，也算是替天行道了。\
打败这些妖魔后，你可以来我这里领取一块妖魔精血。\
<COLOR=GREEN 我可以帮你将妖兽精血中的能量注入你的灵兽体内，化为灵>\
<COLOR=GREEN 兽的经验值，并能让你饥饿的灵兽变为微饿状态。>\
<太好了，我正愁没兽粮喂灵兽呢/@接受任务&灵兽历练4>\
<不感爱好，再见！/@exit>
[@任务类型5]
炼狱之中妖魔作乱，一塌糊涂坏我等清修之境，你替我\
打败<COLOR=GREEN 30个铁翼魔>，也算是替天行道了。\
打败这些妖魔后，你可以来我这里领取一块妖魔精血。\
<COLOR=GREEN 我可以帮你将妖兽精血中的能量注入你的灵兽体内，化为灵>\
<COLOR=GREEN 兽的经验值，并能让你饥饿的灵兽变为微饿状态。>\
<太好了，我正愁没兽粮喂灵兽呢/@接受任务&灵兽历练5>\
<不感爱好，再见！/@exit>
[@任务类型6]
炼狱之中妖魔作乱，一塌糊涂坏我等清修之境，你替我\
打败<COLOR=GREEN 30个藤妖>，也算是替天行道了。\
打败这些妖魔后，你可以来我这里领取一块妖魔精血。\
<COLOR=GREEN 我可以帮你将妖兽精血中的能量注入你的灵兽体内，化为灵>\
<COLOR=GREEN 兽的经验值，并能让你饥饿的灵兽变为微饿状态。>\
<太好了，我正愁没兽粮喂灵兽呢/@接受任务&灵兽历练6>\
<不感爱好，再见！/@exit>
[@任务类型7]
炼狱之中妖魔作乱，一塌糊涂坏我等清修之境，你替我\
打败<COLOR=GREEN 15个妖力士>，也算是替天行道了。\
打败这些妖魔后，你可以来我这里领取一块妖魔精血。\
<COLOR=GREEN 我可以帮你将妖兽精血中的能量注入你的灵兽体内，化为灵>\
<COLOR=GREEN 兽的经验值，并能让你饥饿的灵兽变为微饿状态。>\
<太好了，我正愁没兽粮喂灵兽呢/@接受任务&灵兽历练7>\
<不感爱好，再见！/@exit>
[@任务类型8]
炼狱之中妖魔作乱，一塌糊涂坏我等清修之境，你替我\
打败<COLOR=GREEN 40个血魔>，也算是替天行道了。\
打败这些妖魔后，你可以来我这里领取一块妖魔精血。\
<COLOR=GREEN 我可以帮你将妖兽精血中的能量注入你的灵兽体内，化为灵>\
<COLOR=GREEN 兽的经验值，并能让你饥饿的灵兽变为微饿状态。>\
<太好了，我正愁没兽粮喂灵兽呢/@接受任务&灵兽历练8>\
<不感爱好，再见！/@exit>
[@接受任务]
#IF
EQUAL $PARAM(0) 灵兽历练1
#SAY
<$SGcount.灵兽历练1.6>\
<离开/@exit>
#ACT
ADDtask 灵兽历练1
break
#IF
EQUAL $PARAM(0) 灵兽历练2
#SAY
<$SGcount.灵兽历练2.6>\
<离开/@exit>
#ACT
ADDtask 灵兽历练2
break
#IF
EQUAL $PARAM(0) 灵兽历练3
#SAY
<$SGcount.灵兽历练3.6>\
<离开/@exit>
#ACT
ADDtask 灵兽历练3
break
#IF
EQUAL $PARAM(0) 灵兽历练4
#SAY
<$SGcount.灵兽历练4.6>\
<离开/@exit>
#ACT
ADDtask 灵兽历练4
break
#IF
EQUAL $PARAM(0) 灵兽历练5
#SAY
<$SGcount.灵兽历练5.6>\
<离开/@exit>
#ACT
ADDtask 灵兽历练5
break
#IF
EQUAL $PARAM(0) 灵兽历练6
#SAY
<$SGcount.灵兽历练6.6>\
<离开/@exit>
#ACT
ADDtask 灵兽历练6
break
#IF
EQUAL $PARAM(0) 灵兽历练7
#SAY
<$SGcount.灵兽历练7.6>\
<离开/@exit>
#ACT
ADDtask 灵兽历练7
break
#IF
EQUAL $PARAM(0) 灵兽历练8
#SAY
<$SGcount.灵兽历练8.6>\
<离开/@exit>
#ACT
ADDtask 灵兽历练8
break
#ELSEACT
SENDMSG 5 异常错误，请小退一次后重新接取任务！
break
close
[@完成检测108]
#IF
LARGE $TASK[灵兽历练1] 0
EQUAL $SGcount.灵兽历练1.1 $SGcount.灵兽历练1.2
#ACT
give 妖魔精血 1
ENDTASK 灵兽历练1
SHOWHUMEFFECT 84
GOTO @灵兽历练奖励
break
#IF
LARGE $TASK[灵兽历练2] 0
EQUAL $SGcount.灵兽历练2.1 $SGcount.灵兽历练2.2
#ACT
give 妖魔精血 1
ENDTASK 灵兽历练2
SHOWHUMEFFECT 84
GOTO @灵兽历练奖励
break
#IF
LARGE $TASK[灵兽历练3] 0
EQUAL $SGcount.灵兽历练3.1 $SGcount.灵兽历练3.2
#ACT
give 妖魔精血 1
ENDTASK 灵兽历练3
SHOWHUMEFFECT 84
GOTO @灵兽历练奖励
break
#IF
LARGE $TASK[灵兽历练4] 0
EQUAL $SGcount.灵兽历练4.1 $SGcount.灵兽历练4.2
#ACT
give 妖魔精血 1
ENDTASK 灵兽历练4
SHOWHUMEFFECT 84
GOTO @灵兽历练奖励
break
#IF
LARGE $TASK[灵兽历练5] 0
EQUAL $SGcount.灵兽历练5.1 $SGcount.灵兽历练5.2
#ACT
give 妖魔精血 1
ENDTASK 灵兽历练5
SHOWHUMEFFECT 84
GOTO @灵兽历练奖励
break
#IF
LARGE $TASK[灵兽历练6] 0
EQUAL $SGcount.灵兽历练6.1 $SGcount.灵兽历练6.2
#ACT
give 妖魔精血 1
ENDTASK 灵兽历练6
SHOWHUMEFFECT 84
GOTO @灵兽历练奖励
break
#IF
LARGE $TASK[灵兽历练7] 0
EQUAL $SGcount.灵兽历练7.1 $SGcount.灵兽历练7.2
#ACT
give 妖魔精血 1
ENDTASK 灵兽历练7
SHOWHUMEFFECT 84
GOTO @灵兽历练奖励
break
#IF
LARGE $TASK[灵兽历练8] 0
EQUAL $SGcount.灵兽历练8.1 $SGcount.灵兽历练8.2
#ACT
give 妖魔精血 1
ENDTASK 灵兽历练8
SHOWHUMEFFECT 84
GOTO @灵兽历练奖励
break
#ELSESAY
任务还未完成，勇士尚需努力阿！\
<再 见/@exit>
[@灵兽历练奖励]
怎么样？替我杀那些妖魔了吗？这块<COLOR=GREEN 妖魔精血>是给你的\
奖励。假如你把灵兽石带来，我可以用这些妖魔精血帮你的\
<COLOR=GREEN 灵兽增加经验，还能让饥饿的灵兽变成微饿状态！>\
<离开/@exit>
[@妖魔精血]
#ACT
checkitembox 请放入灵兽石： 1 6
#SAY
你打败那些妖魔了吗？<COLOR=GREEN 请把你的灵兽石给我，并把妖魔>\
<COLOR=GREEN 精血放到包裹中。>我可以帮你将妖兽精血中的能量注入你的\
灵兽体内，化为你灵兽的经验值，同时还能让你饥饿的灵兽\
变为微饿状态。\
<离开/@exit>
[@getboxitem6]
#IF
CHECKVARLIST $CHECKBOXITEM.NAME ..\QuestDiary\数据文件\灵兽石名字.txt
#ELSESAY
对不起，你放入不是灵兽石，你看看是不是拿错了！\\
<返回/@main>
#ELSEACT
break
#IF
checkitem 妖魔精血 1
#ACT
MOV S1 $CHECKBOXITEM.ItemExD
TAKE 妖魔精血 1
MOVR P1 8
INC P1 3
UpgradeItemExDLS $STR(S1) 24 + $STR(P1)
SENDMSG 5 你的这只灵兽获得了<$STR(P1)>点经验
#SAY
妖魔精血的能量让你的这只灵兽获得了<$STR(P1)>点经验！\\
<谢谢/@exit>
#ELSEACT
break
#ELSESAY
你没有妖魔精血，不能增加灵兽经验！\\
<离开/@exit>
[@如何捕获]
灵犀仙岛上灵兽众多，其资质等都比起普通灵兽来更胜\
一筹。如想捕获到这些野生灵兽，可乘其体力虚弱之时，使\
用<COLOR=GREEN “灵兽项圈”>将其收服捕获。\
<COLOR=GREEN “灵兽项圈”可放入快捷栏上使用。>\
<如斯神奇，我这就去抓几个。/@exit>
[@五行属性]
时间万物五行相克，可破金之坚者，必畏水之盈。仙岛\
灵兽生成具有五行属性<COLOR=GREEN （普通灵兽在滴血认主后，也会有五>\
<COLOR=GREEN 行属性）>，而且灵兽二转后<COLOR=GREEN 五行属性会随灵兽顿悟次数的>\
<COLOR=GREEN 增加而成长。>\
每点五行攻击属性就即是 <COLOR=GREEN 1点攻击力、道术攻击或魔法>\
<COLOR=GREEN 攻击，>在战斗时可将此伤害完全开释到对手身上，但五行攻\
<COLOR=GREEN 击属性碰到其相克制的属性就无法施展威力了，>其中更多奥\
妙就有待你去发掘了。\
<没想到一个小小灵兽竞有如斯讲究！/@exit>
[@灵兽顿悟]
引灵炼体、顿悟天道，顿悟乃灵兽体悟五行变化之根本\
方式，<COLOR=GREEN 二转灵兽每经由五级可以顿悟一次，每次顿悟都会提>\
<COLOR=GREEN 升其五行属性。>\
假如你的二转灵兽达到需要顿悟的等级，我可以帮你释\
放出的灵兽顿悟天道，<COLOR=GREEN 不外需要消耗你本体身上部门灵力。>\
不外在下功力尚浅，<COLOR=GREEN 只能帮71级以下的灵兽进行顿悟，>\
<COLOR=GREEN 71级以后的能力成长道路就要看自己的造化了。>\
<我预备好了/@预备好了1> <稍等，我去预备一下/@exit>
[@预备好了1]
#IF
checkclb
#ACT
#ELSESAY
您没有放出二转灵兽，我怎么帮您灵兽顿悟呢？\\\
<稍等，我去预备一下/@exit>
#ELSEACT
break
#IF
SMALL $PET.ZSD 2
#SAY
您放出的灵兽还没有进行二转，不能进行顿悟！\\\
<稍等，我去预备一下/@exit>
#ACT
break
#ELSEACT
MOV P3 $PET.DWU
MUL P3 5
INC P3 5
#IF
CHECKLEVELEX > 0
#ACT
#ELSEACT
break
#IF
SMALL $PET.LEVEL $STR(P3)
#SAY
你当前灵兽要进行顿悟需要达到<$STR(P3)>级，当前等级还不够！\\
<离开/@exit>
#ACT
break
#ELSESAY
恭喜你的灵兽顿悟成功，五行属性获得晋升。\\
<离开/@exit>
#ELSEACT
UpgradeItemExDLS $PET.IDX 22 + 1
UpgradeItemExDLS $PET.IDX 26 + 1
UPDATEMONSTONE
SENDMSG 5 恭喜你的灵兽顿悟成功，五行属性获得晋升
break
[@灵兽转生]
灵兽共分为3个阶段：<COLOR=GREEN 小灵兽、一转灵兽、二转灵兽。>\
当小灵兽等级达到７级时，携带一副踏云玄铠和一瓶兽\
神水，就可洗髓易骨，进行转生。\
而一转后的灵兽达到7级满经验使用<COLOR=GREEN 20点灵力和一个兽>\
<COLOR=GREEN 神水就可以进行二转，二转后的灵兽更具灵性，本体可进行骑>\
<COLOR=GREEN 战，并开释强盛的骑战技能，战斗凶猛，威力巨大。>\
<COLOR=GREEN 灵兽二转你必需去灵犀仙岛上找灵犀使者进行转生。>\
<灵兽一转/@灵兽一转> <一转灵兽的特点/@一转特点>\
<灵兽二转/@灵兽二转> <二转灵兽的特点/@二转特点>
[@一转特点]
转生后的灵兽将变得更加灵敏更加强盛\
1，它能大声吼叫震慑怪物。\
2，载你在怪物出没的洞穴中疾驰。\
3，以吼叫推开低等级的灵兽和马匹等。\
但是灵兽究竟野性难驯，想真正骑上本性急躁的灵\
兽，还得穿上神奇的<COLOR=GREEN 御兽天袍>和<COLOR=GREEN 御兽天衣>才行。\
<返回/@灵兽转生>
[@二转特点]
灵兽进行二转后，其外貌、品质、功能等都将有天翻地\
覆的变化。<COLOR=GREEN 踏云豹将变为迅天雷豹，震天狮将变为战天狂狮>\
<COLOR=GREEN 而圣麒麟将变为玄天麒麟。>\
灵兽在二转后，被开启了资质，佩带了新的灵兽铠甲，\
更获得了<COLOR=GREEN 五行属性。并且当灵兽骑战时，本体更能继续灵兽>\
<COLOR=GREEN 身上所有属性，使用五行攻击力。>\\
<返回/@灵兽转生>
[@灵兽一转]
只有7级的<COLOR=GREEN 丛林豹、天狮兽、麒麟兽>才可进行一转，转\
生还需要一副灵兽铠。\
请在包裹中预备好灵兽铠，并且开释出你需要转生的小\
灵兽。\\
<我预备好了替小灵兽转生/@小灵兽转生>\
<返回/@灵兽转生>
[@灵兽二转]
只有7级满经验的<COLOR=GREEN 踏云豹、震天狮和圣麒麟>才可进行二\
转，转生还需要<COLOR=GREEN 20点灵力值和一瓶兽神水>。并且只要是二次\
回身的灵兽都将会获得五行属性。\
灵兽在二转时，会进行“滴血认主”，从此灵兽真正臣\
服于你一人。\
请在包裹中预备好兽神水，并且开释出你需要二次转生\
的灵兽。\
灵兽资质越高，其二转的时机来的越早。\
<我预备好了替灵兽二次转生/@二次转生>
[@小灵兽转生]
#IF
checkclb
#ACT
#ELSESAY
您并没有放出7级的未转灵兽，我怎么帮您转生呢？\\\
<稍等，我去预备一下/@exit>
#ELSEACT
break
#IF
LARGE $PET.ZSD 0
#SAY
您并没有放出7级的未转灵兽，我怎么帮您转生呢？\\\
<稍等，我去预备一下/@exit>
#ACT
break
#IF
CHECKITEM 灵兽铠 1
#ACT
#ELSESAY
您并没有带来灵兽铠，我怎么帮您转生呢？\\\
<稍等，我去预备一下/@exit>
#ELSEACT
break
#IF
SMALL $PET.LEVEL 7
#SAY
您并没有放出7级的未转灵兽，我怎么帮您转生呢？\\\
<稍等，我去预备一下/@exit>
#ACT
break
#ELSEACT
take 灵兽铠 1
UPGRADEMONZSD = 1
UPGRADEMON 1
UPGRADEMONEXP = 0
UPGRADEMONLEVEL = 0
UPDATEMONSTONE
SendMsg 5 你的灵兽已经成功进行了一转，重新开释灵兽即可看到新灵兽！
break
close
[@二次转生]
#IF
checkclb
#ACT
#ELSESAY
您并没有放出7级的一转灵兽，我怎么帮您转生呢？\\\
<稍等，我去预备一下/@exit>
#ELSEACT
break
#IF
SMALL $PET.ZSD 1
#SAY
您并没有放出7级的一转灵兽，我怎么帮您转生呢？\\\
<稍等，我去预备一下/@exit>
#ACT
break
#IF
LARGE $PET.ZSD 1
#SAY
您并没有放出7级的一转灵兽，我怎么帮您转生呢？\\\
<稍等，我去预备一下/@exit>
#ACT
break
#IF
CHECKITEM 兽神水 1
#ACT
#ELSESAY
您并没有带来豹神水或者兽神水，我怎么帮您转生呢？\\\
<稍等，我去预备一下/@exit>
#ELSEACT
break
#IF
SMALL $YSPOINT 20
#SAY
您当前的灵力值不足20点，我怎么帮您转生呢？\\\
<稍等，我去预备一下/@exit>
#ACT
break
#IF
SMALL $PET.LEVEL 7
#SAY
您并没有放出7级的一转灵兽，我怎么帮您转生呢？\\\
<稍等，我去预备一下/@exit>
#ACT
break
#IF
SMALL $PET.ZZH 20
#ACT
MOV P9 2000
#IF
LARGE $PET.ZZH 19
#ACT
MOV P9 1800
#IF
LARGE $PET.ZZH 29
#ACT
MOV P9 1600
#IF
LARGE $PET.ZZH 39
#ACT
MOV P9 1400
#IF
LARGE $PET.ZZH 49
#ACT
MOV P9 1200
#IF
LARGE $PET.ZZH 59
#ACT
MOV P9 1000
#IF
LARGE $PET.ZZH 69
#ACT
MOV P9 800
#IF
CHECKLEVELEX > 0
#ACT
#ELSEACT
break
#IF
SMALL $PET.EXP $STR(P9)
#SAY
灵兽经验不足，不能进行二转。\\
您当前灵兽资质为：<$PET.ZZH>\
进行二转需要灵兽达到7级<$STR(P9)>点经验。\\
<COLOR=GREEN 极品兽粮>或<COLOR=GREEN 兽尊灵丹>使用可增加灵兽经验！\\
<稍等，我去预备一下/@exit>
#ACT
break
#ELSEACT
take 兽神水 1
YSPOINT - 20
UPGRADEMONZSD = 2
UPGRADEMONEXP = 0
UPGRADEMONLEVEL = 0
UPGRADEMON 1
UpgradeItemExDLS $PET.IDX 28 = 1
UPDATEMONSTONE
SendMsg 5 你的灵兽已经成功进行了二转，重新开释灵兽即可看到新灵兽！
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
checkitembox 请放入灵兽石 1 5
#SAY
<COLOR=GREEN 请放入你需要“滴血认主”开启资质的灵兽。>\
<COLOR=GREEN 对了，同时这还将花费10万金币。>
[@getboxitem5]
#IF
CHECKGOLD 100000
#ELSEACT
SENDMSG 5 你没有10万金币，不能进行灵兽“滴血认主”
break
#IF
checkitemx 豹魔石
#ACT
MOV S5 $CHECKBOXITEM.ItemExD
MOV P5 $UpgradeItemExDLS.$STR(S5).25
MOV P11 $UpgradeItemExDLS.$STR(S5).28
GOTO @检测石头属性
break
#IF
checkitemx 狮魔石
#ACT
MOV S5 $CHECKBOXITEM.ItemExD
MOV P5 $UpgradeItemExDLS.$STR(S5).25
MOV P11 $UpgradeItemExDLS.$STR(S5).28
GOTO @检测石头属性
break
#IF
checkitemx 麒麟石
#ACT
MOV S5 $CHECKBOXITEM.ItemExD
MOV P5 $UpgradeItemExDLS.$STR(S5).25
MOV P11 $UpgradeItemExDLS.$STR(S5).28
GOTO @检测石头属性
break
#ELSESAY
这个不是灵兽石，无法滴血认主。\\
<我知道了/@exit>
#ELSEACT
break
[@检测石头属性]
#IF
SMALL p11 1
LARGE P5 0
#SAY
灵兽石已经成功进行了滴血认主，并和你绑定在一起了。\\
<谢谢/@exit>
#ACT
UpgradeItemExDLS $STR(S5) 28 = 1
SENDMSG 5 当前灵兽石滴血认主成功，并和你成功绑定在一起
break
#IF
RANDOM 1
#ACT
MOV P89 1
#IF
RANDOM 2
#ACT
MOV P89 65
#IF
RANDOM 3
#ACT
MOV P89 129
#IF
RANDOM 4
#ACT
MOV P89 193
#IF
SMALL P5 1
#ACT
MOVR P90 20
INC P90 45
MOVR P91 3
INC P91 3
MOVR P92 5
INC P92 4
MOVR P93 16
MOVR P94 2
INC P94 1
MOVR P95 16
MOVR P96 2
INC P96 1
MOVR P97 16
MOVR P98 3
INC P98 1
take 金币 100000
#ELSESAY
当前灵兽石已经进行过滴血认主了，无法再次进行。\\
<离开/@exit>
#ELSEACT
SENDMSG 5 当前灵兽石已经进行过滴血认主了
break
#IF
CHECKLEVELEX > 0
#ACT
#ELSEACT
break
#IF
RANDOM 58
#SAY
灵兽石已经成功进行了滴血认主，并和你绑定在一起了。\\
<谢谢/@exit>
#ACT
UpgradeItemExDLS $STR(S5) 28 = 1
UpgradeItemExDLS $STR(S5) 22 = $STR(P89)
UpgradeItemExDLS $STR(S5) 25 = $STR(P90)
UpgradeItemExDLS $STR(S5) 18 = $STR(P91)
UpgradeItemExDLS $STR(S5) 19 = $STR(P92)
UpgradeItemExDLS $STR(S5) $STR(P93) = $STR(P94)
UpgradeItemExDLS $STR(S5) $STR(P95) = $STR(P96)
UpgradeItemExDLS $STR(S5) $STR(P97) = $STR(P98)
UPDATEMONSTONE
break
#IF
RANDOM 16
#SAY
灵兽石已经成功进行了滴血认主，并和你绑定在一起了。\\
<谢谢/@exit>
#ACT
UpgradeItemExDLS $STR(S5) 28 = 1
UpgradeItemExDLS $STR(S5) 22 = $STR(P89)
UpgradeItemExDLS $STR(S5) 25 = $STR(P90)
UpgradeItemExDLS $STR(S5) 18 = $STR(P91)
UpgradeItemExDLS $STR(S5) 19 = $STR(P92)
UpgradeItemExDLS $STR(S5) $STR(P93) = $STR(P94)
UpgradeItemExDLS $STR(S5) $STR(P95) = $STR(P96)
UPDATEMONSTONE
break
#IF
RANDOM 3
#SAY
灵兽石已经成功进行了滴血认主，并和你绑定在一起了。\\
<谢谢/@exit>
#ACT
UpgradeItemExDLS $STR(S5) 28 = 1
UpgradeItemExDLS $STR(S5) 22 = $STR(P89)
UpgradeItemExDLS $STR(S5) 25 = $STR(P90)
UpgradeItemExDLS $STR(S5) 18 = $STR(P91)
UpgradeItemExDLS $STR(S5) 19 = $STR(P92)
UpgradeItemExDLS $STR(S5) $STR(P93) = $STR(P94)
UPDATEMONSTONE
break
#ELSESAY
灵兽石已经成功进行了滴血认主，并和你绑定在一起了。\\
<谢谢/@exit>
#ELSEACT
UpgradeItemExDLS $STR(S5) 28 = 1
UpgradeItemExDLS $STR(S5) 22 = $STR(P89)
UpgradeItemExDLS $STR(S5) 25 = $STR(P90)
UpgradeItemExDLS $STR(S5) 18 = $STR(P91)
UpgradeItemExDLS $STR(S5) 19 = $STR(P92)
UPDATEMONSTONE
break
[@灵兽幻化]
所有的灵兽都可进行幻化。幻化时需要一个主灵兽和一\
个副灵兽。幻化后，主灵兽将会继续副灵兽上的部门属性。\
<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 封元印1 1
SENDMSG 5 你花费1元宝购买了1个地火兽弓箭手封元印
break
#ELSEACT
MessageBox 你元宝不足1个，不能购买封元印
break
[@猛魔统领]
#IF
CHECKGAMEGOLD > 0
#ACT
GAMEGOLD - 1
GIVE 封元印2 1
SENDMSG 5 你花费1元宝购买了1个猛魔统领封元印
break
#ELSEACT
MessageBox 你元宝不足1个，不能购买封元印
break
页:
[1]