传奇世界私服灵兽坐骑打怪升级脚本

把此脚本放入NPC，打怪后就可以升级你的灵兽骑宠

[@灵兽经验]
{
#IF
CHECKSLAVENAME 丛林豹
#ACT
MOV S0 丛林豹
GOTO @计算经验
break

#IF
CHECKSLAVENAME 踏云豹1
#ACT
MOV S0 踏云豹1
GOTO @计算经验
break

#IF
CHECKSLAVENAME 踏云豹2
#ACT
MOV S0 踏云豹2
GOTO @计算经验
break

#IF
CHECKSLAVENAME 踏云豹3
#ACT
MOV S0 踏云豹3
GOTO @计算经验
break

#IF
CHECKSLAVENAME 迅天雷豹1
#ACT
MOV S0 迅天雷豹1
GOTO @计算经验
break

#IF
CHECKSLAVENAME 迅天雷豹2
#ACT
MOV S0 迅天雷豹2
GOTO @计算经验
break

#IF
CHECKSLAVENAME 迅天雷豹3
#ACT
MOV S0 迅天雷豹3
GOTO @计算经验
break

#IF
CHECKSLAVENAME 天狮兽
#ACT
MOV S0 天狮兽
GOTO @计算经验
break

#IF
CHECKSLAVENAME 震天狮1
#ACT
MOV S0 震天狮1
GOTO @计算经验
break

#IF
CHECKSLAVENAME 震天狮2
#ACT
MOV S0 震天狮2
GOTO @计算经验
break

#IF
CHECKSLAVENAME 震天狮3
#ACT
MOV S0 震天狮3
GOTO @计算经验
break

#IF
CHECKSLAVENAME 战天狂狮1
#ACT
MOV S0 战天狂狮1
GOTO @计算经验
break

#IF
CHECKSLAVENAME 战天狂狮2
#ACT
MOV S0 战天狂狮2
GOTO @计算经验
break

#IF
CHECKSLAVENAME 战天狂狮3
#ACT
MOV S0 战天狂狮3
GOTO @计算经验
break

#IF
CHECKSLAVENAME 麒麟兽
#ACT
MOV S0 麒麟兽
GOTO @计算经验
break

#IF
CHECKSLAVENAME 圣麒麟1
#ACT
MOV S0 圣麒麟1
GOTO @计算经验
break

#IF
CHECKSLAVENAME 圣麒麟2
#ACT
MOV S0 圣麒麟2
GOTO @计算经验
break

#IF
CHECKSLAVENAME 圣麒麟3
#ACT
MOV S0 圣麒麟3
GOTO @计算经验
break

#IF
CHECKSLAVENAME 玄天麒麟1
#ACT
MOV S0 玄天麒麟1
GOTO @计算经验
break

#IF
CHECKSLAVENAME 玄天麒麟2
#ACT
MOV S0 玄天麒麟2
GOTO @计算经验
break

#IF
CHECKSLAVENAME 玄天麒麟3
#ACT
MOV S0 玄天麒麟3
GOTO @计算经验
break

#IF
CHECKSLAVENAME 赤翎凤
#ACT
MOV S0 赤翎凤
GOTO @计算经验
break

#IF
CHECKSLAVENAME 傲天凤1
#ACT
MOV S0 傲天凤1
GOTO @计算经验
break

#IF
CHECKSLAVENAME 傲天凤2
#ACT
MOV S0 傲天凤2
GOTO @计算经验
break

#IF
CHECKSLAVENAME 炽天凤凰
#ACT
MOV S0 炽天凤凰
GOTO @计算经验
break

#IF
CHECKSLAVENAME 炽天神凤
#ACT
MOV S0 炽天神凤
GOTO @计算经验
break

#IF
CHECKSLAVENAME 炽天神凤1
#ACT
MOV S0 炽天神凤1
GOTO @计算经验
break

#IF
CHECKSLAVENAME 炽天魔凤
#ACT
MOV S0 炽天魔凤
GOTO @计算经验
break
#IF
CHECKSLAVENAME 撼天灵虎1
#ACT
MOV S0 撼天灵虎1
GOTO @计算经验
break

#IF
CHECKSLAVENAME 海神战鲨1
#ACT
MOV S0 海神战鲨1
GOTO @计算经验
break
#IF
CHECKSLAVENAME 海神战鲨2
#ACT
MOV S0 海神战鲨2
GOTO @计算经验
break


[@计算经验]
#IF
CHECKSLAVENAME $STR(S0)
#ACT
MOV P2 $PARAM(0)
MOV P3
INC P3 $LEVEL
INC P3 $PET.LEVEL
INC P3 $PET.RELIVE
DIV P2 $STR(P3)
GOTO @增加了经验
BREAK

[@增加了经验]
#IF
!Small P2 1
#ACT
SETPETATTRIBUTE $PET.MAKEINDEX 17 + $STR(P2)
SENDMSG 5 你带着你的<$STR(S0)>成功杀死了<$PARAM(1)>，奖励<$STR(S0)><$STR(P2)>点经验值
break

#IF
Small P2 1
Large $PARAM(0) 500
#ACT
MOV P2 1
SETPETATTRIBUTE $PET.MAKEINDEX 17 + $STR(P2)
SENDMSG 5 你带着你的<$STR(S0)>成功杀死了强大的<$PARAM(1)>，奖励<$STR(S0)><$STR(P2)>点经验值
break

#IF
Small P2 1
Small $PARAM(0) 500
#ACT
SENDMSG 5 由于<$PARAM(1)>过于弱小，你的<$STR(S0)>经验值没有任何变化
break
}

感恩无私的分享与奉献

楼主加油，我们都看好你哦。

强烈支持楼主ing……

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

感恩无私的分享与奉献

强烈支持楼主ing……

淡定，淡定，淡定……

强烈支持楼主ing……

看到这帖子真是高兴！