一休论坛

 找回密码
 立即注册

QQ登录

只需一步,快速开始

查看: 431|回复: 0

[常用脚本] 传奇豹子幻化使者脚本

[复制链接]
  • TA的每日心情
    擦汗
    2015-2-25 10:43
  • 签到天数: 1 天

    [LV.1]初来乍到

    发表于 2014-11-25 12:35:47 | 显示全部楼层 |阅读模式
    网络广告风险自担 网络广告风险自担
    网络广告风险自担
    [@main]
    \
      结果神仙指点,我把握了对灵兽进行转生幻化的本领.\
    灵兽通过转生幻化,使灵兽灵巧顿悟转化成你的战宠\
    \\
      <灵兽复活/@灵兽复活>  <灵兽转生/@灵兽转生>  <灵兽幻化顿悟/@五行属性1>\\
    <离开[url=]/@exit[/url]>

    [@五行属性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
      请放入你的灵兽石,我帮你复活你的灵兽。\\
      <下次吧[url=]/@exit[/url]>
    #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
      您提供的好象不是灵兽石啊。\\
      <知道了[url=]/@exit[/url]>
    #ELSEACT
    break
    [@是灵兽石]
    #IF
    CHECKITEM 兽神水 1
    #ACT
    take 兽神水 1
    RELIVE
    break
    #SAY
    你的灵兽已经复活,\
    下次要小心,不要再让他死掉了哦。[url=]\\\[/url]
    <知道了[url=]/@exit[/url]>
    #IF
    CHECKITEM 兽神水 1
    #ACT
    take 兽神水 1
    RELIVE
    break
    #SAY
    你的灵兽已经复活,\
    下次要小心,不要再让他死掉了哦。[url=]\\\[/url]
    <知道了[url=]/@exit[/url]>
    #ELSESAY
      你并没有兽神水,这是复活灵兽所必需的物品。\
    要是没有这个我也没办法帮你了。你仍是到处找找看吧。[url=]\\\[/url]
    <知道了[url=]/@exit[/url]>
    #ELSEACT
    break
    [@sdsdd]
      <灵兽转生/@灵兽转生>     <灵兽“滴血认主”开启资质/@绑定灵兽>\
      <灵兽幻化/@灵兽幻化>     <二转灵兽顿悟/@灵兽顿悟>\
      <灵兽历练任务/@历练任务>   <用妖魔精血为灵兽增加经验/@妖魔精血>\
      <如何捕获灵兽/@如何捕获>   <了解五行属性/@五行属性>
    [@历练任务]
    <灵兽历练任务/@灵兽历练>\\
    <离开[url=]/@exit[/url]>
    [@灵兽历练]
    #IF
    CHECKLEVELEX > 29
    #ACT
    #ELSESAY
    需要等级46级以上才能接灵兽历练任务。\\
    <离开[url=]/@exit[/url]>
    #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>\
    <不感爱好,再见![url=]/@exit[/url]>
    [@任务类型2]
      炼狱之中妖魔作乱,一塌糊涂坏我等清修之境,你替我\
    打败<COLOR=GREEN 30个逆魔雕像>,也算是替天行道了。\
      打败这些妖魔后,你可以来我这里领取一块妖魔精血。\
    <COLOR=GREEN 我可以帮你将妖兽精血中的能量注入你的灵兽体内,化为灵>\
    <COLOR=GREEN 兽的经验值,并能让你饥饿的灵兽变为微饿状态。>\
    <太好了,我正愁没兽粮喂灵兽呢/@接受任务&灵兽历练2>\
    <不感爱好,再见![url=]/@exit[/url]>

    [@任务类型3]
      炼狱之中妖魔作乱,一塌糊涂坏我等清修之境,你替我\
    打败<COLOR=GREEN 30个逆魔卫士>,也算是替天行道了。\
      打败这些妖魔后,你可以来我这里领取一块妖魔精血。\
    <COLOR=GREEN 我可以帮你将妖兽精血中的能量注入你的灵兽体内,化为灵>\
    <COLOR=GREEN 兽的经验值,并能让你饥饿的灵兽变为微饿状态。>\
    <太好了,我正愁没兽粮喂灵兽呢/@接受任务&灵兽历练3>\
    <不感爱好,再见![url=]/@exit[/url]>
    [@任务类型4]
      炼狱之中妖魔作乱,一塌糊涂坏我等清修之境,你替我\
    打败<COLOR=GREEN 30个逆魔侍卫>,也算是替天行道了。\
      打败这些妖魔后,你可以来我这里领取一块妖魔精血。\
    <COLOR=GREEN 我可以帮你将妖兽精血中的能量注入你的灵兽体内,化为灵>\
    <COLOR=GREEN 兽的经验值,并能让你饥饿的灵兽变为微饿状态。>\
    <太好了,我正愁没兽粮喂灵兽呢/@接受任务&灵兽历练4>\
    <不感爱好,再见![url=]/@exit[/url]>
    [@任务类型5]
      炼狱之中妖魔作乱,一塌糊涂坏我等清修之境,你替我\
    打败<COLOR=GREEN 30个铁翼魔>,也算是替天行道了。\
      打败这些妖魔后,你可以来我这里领取一块妖魔精血。\
    <COLOR=GREEN 我可以帮你将妖兽精血中的能量注入你的灵兽体内,化为灵>\
    <COLOR=GREEN 兽的经验值,并能让你饥饿的灵兽变为微饿状态。>\
    <太好了,我正愁没兽粮喂灵兽呢/@接受任务&灵兽历练5>\
    <不感爱好,再见![url=]/@exit[/url]>

    [@任务类型6]
      炼狱之中妖魔作乱,一塌糊涂坏我等清修之境,你替我\
    打败<COLOR=GREEN 30个藤妖>,也算是替天行道了。\
      打败这些妖魔后,你可以来我这里领取一块妖魔精血。\
    <COLOR=GREEN 我可以帮你将妖兽精血中的能量注入你的灵兽体内,化为灵>\
    <COLOR=GREEN 兽的经验值,并能让你饥饿的灵兽变为微饿状态。>\
    <太好了,我正愁没兽粮喂灵兽呢/@接受任务&灵兽历练6>\
    <不感爱好,再见![url=]/@exit[/url]>
    [@任务类型7]
      炼狱之中妖魔作乱,一塌糊涂坏我等清修之境,你替我\
    打败<COLOR=GREEN 15个妖力士>,也算是替天行道了。\
      打败这些妖魔后,你可以来我这里领取一块妖魔精血。\
    <COLOR=GREEN 我可以帮你将妖兽精血中的能量注入你的灵兽体内,化为灵>\
    <COLOR=GREEN 兽的经验值,并能让你饥饿的灵兽变为微饿状态。>\
    <太好了,我正愁没兽粮喂灵兽呢/@接受任务&灵兽历练7>\
    <不感爱好,再见![url=]/@exit[/url]>

    [@任务类型8]
      炼狱之中妖魔作乱,一塌糊涂坏我等清修之境,你替我\
    打败<COLOR=GREEN 40个血魔>,也算是替天行道了。\
      打败这些妖魔后,你可以来我这里领取一块妖魔精血。\
    <COLOR=GREEN 我可以帮你将妖兽精血中的能量注入你的灵兽体内,化为灵>\
    <COLOR=GREEN 兽的经验值,并能让你饥饿的灵兽变为微饿状态。>\
    <太好了,我正愁没兽粮喂灵兽呢/@接受任务&灵兽历练8>\
    <不感爱好,再见![url=]/@exit[/url]>

    [@接受任务]
    #IF
    EQUAL $PARAM(0) 灵兽历练1
    #SAY
    <$SGcount.灵兽历练1.6>\
    <离开[url=]/@exit[/url]>
    #ACT
    ADDtask 灵兽历练1
    break
    #IF
    EQUAL $PARAM(0) 灵兽历练2
    #SAY
    <$SGcount.灵兽历练2.6>\
    <离开[url=]/@exit[/url]>
    #ACT
    ADDtask 灵兽历练2
    break
    #IF
    EQUAL $PARAM(0) 灵兽历练3
    #SAY
    <$SGcount.灵兽历练3.6>\
    <离开[url=]/@exit[/url]>
    #ACT
    ADDtask 灵兽历练3
    break
    #IF
    EQUAL $PARAM(0) 灵兽历练4
    #SAY
    <$SGcount.灵兽历练4.6>\
    <离开[url=]/@exit[/url]>
    #ACT
    ADDtask 灵兽历练4
    break
    #IF
    EQUAL $PARAM(0) 灵兽历练5
    #SAY
    <$SGcount.灵兽历练5.6>\
    <离开[url=]/@exit[/url]>
    #ACT
    ADDtask 灵兽历练5
    break
    #IF
    EQUAL $PARAM(0) 灵兽历练6
    #SAY
    <$SGcount.灵兽历练6.6>\
    <离开[url=]/@exit[/url]>
    #ACT
    ADDtask 灵兽历练6
    break
    #IF
    EQUAL $PARAM(0) 灵兽历练7
    #SAY
    <$SGcount.灵兽历练7.6>\
    <离开[url=]/@exit[/url]>
    #ACT
    ADDtask 灵兽历练7
    break
    #IF
    EQUAL $PARAM(0) 灵兽历练8
    #SAY
    <$SGcount.灵兽历练8.6>\
    <离开[url=]/@exit[/url]>
    #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
    任务还未完成,勇士尚需努力阿!\
    <再 见[url=]/@exit[/url]>

    [@灵兽历练奖励]
      怎么样?替我杀那些妖魔了吗?这块<COLOR=GREEN 妖魔精血>是给你的\
    奖励。假如你把灵兽石带来,我可以用这些妖魔精血帮你的\
    <COLOR=GREEN 灵兽增加经验,还能让饥饿的灵兽变成微饿状态!>\
    <离开[url=]/@exit[/url]>

    [@妖魔精血]
    #ACT
    checkitembox 请放入灵兽石: 1 6
    #SAY
      你打败那些妖魔了吗?<COLOR=GREEN 请把你的灵兽石给我,并把妖魔>\
    <COLOR=GREEN 精血放到包裹中。>我可以帮你将妖兽精血中的能量注入你的\
    灵兽体内,化为你灵兽的经验值,同时还能让你饥饿的灵兽\
    变为微饿状态。\
      <离开[url=]/@exit[/url]>
    [@getboxitem6]
    #IF
    CHECKVARLIST $CHECKBOXITEM.NAME ..\QuestDiary\数据文件\灵兽石名字.txt
    #ELSESAY
    对不起,你放入不是灵兽石,你看看是不是拿错了!\\
    <返回[url=]/@main[/url]>
    #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)>点经验!\\
    <谢谢[url=]/@exit[/url]>
    #ELSEACT
    break
    #ELSESAY
    你没有妖魔精血,不能增加灵兽经验!\\
    <离开[url=]/@exit[/url]>
    [@如何捕获]
      灵犀仙岛上灵兽众多,其资质等都比起普通灵兽来更胜\
    一筹。如想捕获到这些野生灵兽,可乘其体力虚弱之时,使\
    用<COLOR=GREEN “灵兽项圈”>将其收服捕获。\
      <COLOR=GREEN “灵兽项圈”可放入快捷栏上使用。>\
      <如斯神奇,我这就去抓几个。[url=]/@exit[/url]>
    [@五行属性]
      时间万物五行相克,可破金之坚者,必畏水之盈。仙岛\
    灵兽生成具有五行属性<COLOR=GREEN (普通灵兽在滴血认主后,也会有五>\
    <COLOR=GREEN 行属性)>,而且灵兽二转后<COLOR=GREEN 五行属性会随灵兽顿悟次数的>\
    <COLOR=GREEN 增加而成长。>\
      每点五行攻击属性就即是 <COLOR=GREEN 1点攻击力、道术攻击或魔法>\
    <COLOR=GREEN 攻击,>在战斗时可将此伤害完全开释到对手身上,但五行攻\
    <COLOR=GREEN 击属性碰到其相克制的属性就无法施展威力了,>其中更多奥\
    妙就有待你去发掘了。\
      <没想到一个小小灵兽竞有如斯讲究![url=]/@exit[/url]>

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

    [@预备好了1]
    #IF
    checkclb
    #ACT
    #ELSESAY
      您没有放出二转灵兽,我怎么帮您灵兽顿悟呢?[url=]\\\[/url]
      <稍等,我去预备一下[url=]/@exit[/url]>
    #ELSEACT
    break
    #IF
    SMALL $PET.ZSD 2
    #SAY
      您放出的灵兽还没有进行二转,不能进行顿悟![url=]\\\[/url]
      <稍等,我去预备一下[url=]/@exit[/url]>
    #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)>级,当前等级还不够!\\
    <离开[url=]/@exit[/url]>
    #ACT
    break
    #ELSESAY
    恭喜你的灵兽顿悟成功,五行属性获得晋升。\\
    <离开[url=]/@exit[/url]>
    #ELSEACT
    UpgradeItemExDLS $PET.IDX 22 + 1
    UpgradeItemExDLS $PET.IDX 26 + 1
    UPDATEMONSTONE
    SENDMSG 5 恭喜你的灵兽顿悟成功,五行属性获得晋升
    break

    [@灵兽转生]
      灵兽共分为3个阶段:<COLOR=GREEN 小灵兽、一转灵兽、二转灵兽。>\
      当小灵兽等级达到7级时,携带一副踏云玄铠和一瓶兽\
    神水,就可洗髓易骨,进行转生。\
      而一转后的灵兽达到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级的未转灵兽,我怎么帮您转生呢?[url=]\\\[/url]
      <稍等,我去预备一下[url=]/@exit[/url]>
    #ELSEACT
    break
    #IF
    LARGE $PET.ZSD 0
    #SAY
      您并没有放出7级的未转灵兽,我怎么帮您转生呢?[url=]\\\[/url]
      <稍等,我去预备一下[url=]/@exit[/url]>
    #ACT
    break
    #IF
    CHECKITEM 灵兽铠 1
    #ACT
    #ELSESAY
      您并没有带来灵兽铠,我怎么帮您转生呢?[url=]\\\[/url]
      <稍等,我去预备一下[url=]/@exit[/url]>
    #ELSEACT
    break
    #IF
    SMALL $PET.LEVEL 7
    #SAY
      您并没有放出7级的未转灵兽,我怎么帮您转生呢?[url=]\\\[/url]
      <稍等,我去预备一下[url=]/@exit[/url]>
    #ACT
    break
    #ELSEACT
    take 灵兽铠 1
    UPGRADEMONZSD = 1
    UPGRADEMON 1
    UPGRADEMONEXP = 0
    UPGRADEMONLEVEL = 0
    UPDATEMONSTONE
    SendMsg 5 你的灵兽已经成功进行了一转,重新开释灵兽即可看到新灵兽!
    break
    close

    [@二次转生]
    #IF
    checkclb
    #ACT
    #ELSESAY
      您并没有放出7级的一转灵兽,我怎么帮您转生呢?[url=]\\\[/url]
      <稍等,我去预备一下[url=]/@exit[/url]>
    #ELSEACT
    break
    #IF
    SMALL $PET.ZSD 1
    #SAY
      您并没有放出7级的一转灵兽,我怎么帮您转生呢?[url=]\\\[/url]
      <稍等,我去预备一下[url=]/@exit[/url]>
    #ACT
    break
    #IF
    LARGE $PET.ZSD 1
    #SAY
      您并没有放出7级的一转灵兽,我怎么帮您转生呢?[url=]\\\[/url]
      <稍等,我去预备一下[url=]/@exit[/url]>
    #ACT
    break
    #IF
    CHECKITEM 兽神水 1
    #ACT
    #ELSESAY
      您并没有带来豹神水或者兽神水,我怎么帮您转生呢?[url=]\\\[/url]
      <稍等,我去预备一下[url=]/@exit[/url]>
    #ELSEACT
    break
    #IF
    SMALL $YSPOINT 20
    #SAY
      您当前的灵力值不足20点,我怎么帮您转生呢?[url=]\\\[/url]
      <稍等,我去预备一下[url=]/@exit[/url]>
    #ACT
    break
    #IF
    SMALL $PET.LEVEL 7
    #SAY
      您并没有放出7级的一转灵兽,我怎么帮您转生呢?[url=]\\\[/url]
      <稍等,我去预备一下[url=]/@exit[/url]>
    #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 兽尊灵丹>使用可增加灵兽经验!\\
      <稍等,我去预备一下[url=]/@exit[/url]>
    #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
      这个不是灵兽石,无法滴血认主。\\
      <我知道了[url=]/@exit[/url]>
    #ELSEACT
    break
    [@检测石头属性]
    #IF
    SMALL p11 1
    LARGE P5 0
    #SAY
    灵兽石已经成功进行了滴血认主,并和你绑定在一起了。\\
    <谢谢[url=]/@exit[/url]>
    #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
    当前灵兽石已经进行过滴血认主了,无法再次进行。\\
    <离开[url=]/@exit[/url]>
    #ELSEACT
    SENDMSG 5 当前灵兽石已经进行过滴血认主了
    break
    #IF
    CHECKLEVELEX > 0
    #ACT
    #ELSEACT
    break
    #IF
    RANDOM 58
    #SAY
    灵兽石已经成功进行了滴血认主,并和你绑定在一起了。\\
    <谢谢[url=]/@exit[/url]>
    #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
    灵兽石已经成功进行了滴血认主,并和你绑定在一起了。\\
    <谢谢[url=]/@exit[/url]>
    #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
    灵兽石已经成功进行了滴血认主,并和你绑定在一起了。\\
    <谢谢[url=]/@exit[/url]>
    #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
    灵兽石已经成功进行了滴血认主,并和你绑定在一起了。\\
    <谢谢[url=]/@exit[/url]>
    #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万金币>。\\
      <进行幻化[url=]/@@HUANHUA[/url]>  <购买封元印/@购买封元印>

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

    [@弓箭手]
    #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



    上一篇:传奇怎么利用npc功能创建文本
    下一篇:传奇宝石凝练巨大的功能脚本
    您需要登录后才可以回帖 登录 | 立即注册

    本版积分规则

    网络广告风险自担

    小黑屋|传奇一条龙|GM基地|GM版本库|一休论坛

    GMT+8, 2016-12-4 11:53 , Processed in 1.669203 second(s), 85 queries , Gzip On.

    传奇一条龙 GM基地 版本库 传奇论坛 传奇漏洞论坛 传奇服务端下载 传奇版本

    站长QQ:1921249589 一休论坛资料来自网络仅供学习交流之用,用于商业后果自负

    快速回复 返回顶部 返回列表