喂养宠物脚本_找搜服_传奇私服发布网_国内最大新开传奇网站

[@main]

#act

bigmain 1

#say

你好：【<$USERNAME>】欢迎来到本店，我们为顾客寄养各种珍禽。\

这些小动物不仅是你的宠物，还可以成为你的得力助手，为你而战。\

各职业只能寄养一种宠物，通过喂养宠物来提升它的等级，等级越\

高，宠物的能力越强，可以更好的为你抵抗邪恶的势力。\ \

<各职业领养什么宠物/@宠物情况>\

<进入宠物喂养系统界面/@宠物的阶级>\

<目前没空，以后再说吧/@EXIT>

[@宠物情况]

#act

bigmain 1

#say

各职业可领养宠物如下，从领养之日起便可召唤为宝宝，喂养的等级\

越高，召唤出来的宝宝越厉害。宠物喂养需要〖<宠物蛋/fcolor=9>〗\

<战士宠物/fcolor=210>：千年蛛王<(能喷射毒液，具有高速打击和移动速度)/fcolor=249>\ \

<道士宠物/fcolor=210>：猩红毒蛛<(能喷射毒液，具有高强攻击和移动速度)/fcolor=249>\ \

<法师宠物/fcolor=210>：月魔蛛神<(能施展石化，具有高强攻击和移动速度)/fcolor=249>\ \

<这么爽啊，我马上去搞/@main>\

[@宠物的阶级]

#act

bigmain 2

#say

宠物喂养分为7个等级，宠物每吃一个宠物蛋，体魄值增长10点。\

体魄值与进阶等级之间的关系如下：\

<〖宠物等级〗/fcolor=20> <〖进阶体魄值〗/fcolor=20> <〖攻击能力〗/fcolor=20> <〖生命值〗/fcolor=20>\

〖初始宠物〗 0 +0 1500\

〖一星宠物〗 100 +20 2000\

〖二星宠物〗 200 +40 2500\

〖三星宠物〗 300 +60 3000\

〖四星宠物〗 400 +80 3500\

〖五星宠物〗 500 +100 4000\

〖六星宠物〗 600 +120 4500\

〖七星宠物〗 700 +150 5000\ \

<开启宠物喂养系统/@开启宠物喂养系统> <提示：不开启无法喂食和召唤宠物。/fcolor=249>\

<提示：当宠物达到7星，可以召唤出二只3级宠物为你战斗。/fcolor=249>\

<喂食千年蛛王/@喂食千年蛛王> 蛛王当前星级〖<$HUMAN(战宠星级)>〗蛛王当前体魄值〖<$HUMAN(战宠体魄值)>〗\

<喂食猩红毒蛛/@喂食猩红毒蛛> 兽王当前星级〖<$HUMAN(道宠星级)>〗兽王当前体魄值〖<$HUMAN(道宠体魄值)>〗\

<喂食月魔蛛神/@喂食月魔蛛神> 法王当前星级〖<$HUMAN(法宠星级)>〗法王当前体魄值〖<$HUMAN(法宠体魄值)>〗\

<回收宠物蛋/@回收宠物蛋>\

<我知道了！/@main>\

[@回收宠物蛋]

#IF

CHECKKIMNEEDLE 宠物蛋 1

#ACT

takeKIMNEEDLE 宠物蛋 1

give 金币 20000

SENDMSG 6 回收一个宠物蛋获得了2W金币。

#ELSEACT

MESSAGEBOX 你的宠物蛋在哪儿呢？？？？

[@开启宠物喂养系统]

#act

bigmain 1

#say

我这里有些初生宠物，但是很瘦弱，你需要提供以下物品给宠物补补\

身子。\

一：毒蜘蛛牙齿二：蝎子尾巴三：蛆卵四：鹿血 \

五：食人树果实\ \

<我带来了这些东西，现在开启喂养系统/@开启喂养>\

<提示：开启宠物喂养系统后，请输入@宠物来召唤你的宝宝/fcolor=249>\

<我好像没有备齐物品，我再去搜寻一下/@EXIT>\

[@开启喂养]

#IF

checknamelist ..\QuestDiary\数据文件\喂养系统\开通名单.txt

#act

MESSAGEBOX 你已经开启了喂养系统，还来做什么。

#ELSEACT

goto @给予宠物补品

[@给予宠物补品]

#IF

checkitem 毒蜘蛛牙齿 1

checkitem 蝎子尾巴 1

checkitem 蛆卵 1

checkitem 鹿血 1

checkitem 食人树果实 1

#act

take 毒蜘蛛牙齿 1

take 蝎子尾巴 1

take 蛆卵 1

take 鹿血 1

take 食人树果实 1

addnamelist ..\QuestDiary\数据文件\喂养系统\开通名单.txt

SENDMSG 0 【%s】激活了宠物喂养系统，准备带领一只凶猛的宠物。

#ELSEACT

MESSAGEBOX 你的物品没有备齐，不能开通宠物喂养系统。

;======= ================

[@喂食千年蛛王]

#IF

checkjob warrior

checknamelist ..\QuestDiary\数据文件\喂养系统\开通名单.txt

#act

goto @战士给宠物蛋

#ELSEACT

MESSAGEBOX 你不是战士，或者为开启宠物喂养系统。

[@战士给宠物蛋]

#IF

CHECKVAR HUMAN 战宠体魄值 = 700

#ACT

MESSAGEBOX 你的宠物已经到顶级了，不能再喂食宠物蛋了？

#ELSEACT

goto @战士递交宠物蛋

[@战士递交宠物蛋]

#IF

CHECKKIMNEEDLE 宠物蛋 1

#ACT

takeKIMNEEDLE 宠物蛋 1

CALCVAR HUMAN 战宠体魄值 + 10

SAVEVAR HUMAN 战宠体魄值 ..\QuestDiary\数据文件\喂养系统\战宠体魄值.txt

SENDMSG 6 宠物体魄增加了10点，请继续饲养你的宝宝。

goto @宠物的阶级

goto @战宠星级检测

#ELSEACT

MESSAGEBOX 你的宠物蛋在哪儿？

[@战宠星级检测]

#IF

CHECKVAR HUMAN 战宠体魄值 = 100

#ACT

CALCVAR HUMAN 战宠星级 = 1

SAVEVAR HUMAN 战宠星级 ..\QuestDiary\数据文件\喂养系统\战宠星级.txt

SENDMSG 0 【<$USERNAME>】喂食的千年蛛王进阶到1星，宠物等级提升。

goto @宠物的阶级

break

#IF

CHECKVAR HUMAN 战宠体魄值 = 200

#ACT

CALCVAR HUMAN 战宠星级 = 2

SAVEVAR HUMAN 战宠星级 ..\QuestDiary\数据文件\喂养系统\战宠星级.txt

SENDMSG 0 【<$USERNAME>】喂食的千年蛛王进阶到2星，宠物等级提升。

goto @宠物的阶级

break

#IF

CHECKVAR HUMAN 战宠体魄值 = 300

#ACT

CALCVAR HUMAN 战宠星级 = 3

SAVEVAR HUMAN 战宠星级 ..\QuestDiary\数据文件\喂养系统\战宠星级.txt

SENDMSG 0 【<$USERNAME>】喂食的千年蛛王进阶到3星，宠物等级提升。

goto @宠物的阶级

break

#IF

CHECKVAR HUMAN 战宠体魄值 = 400

#ACT

CALCVAR HUMAN 战宠星级 = 4

SAVEVAR HUMAN 战宠星级 ..\QuestDiary\数据文件\喂养系统\战宠星级.txt

SENDMSG 0 【<$USERNAME>】喂食的千年蛛王进阶到4星，宠物等级提升。

goto @宠物的阶级

break

#IF

CHECKVAR HUMAN 战宠体魄值 = 500

#ACT

CALCVAR HUMAN 战宠星级 = 5

SAVEVAR HUMAN 战宠星级 ..\QuestDiary\数据文件\喂养系统\战宠星级.txt

SENDMSG 0 【<$USERNAME>】喂食的千年蛛王进阶到5星，宠物等级提升。

goto @宠物的阶级

break

#IF

CHECKVAR HUMAN 战宠体魄值 = 600

#ACT

CALCVAR HUMAN 战宠星级 = 6

SAVEVAR HUMAN 战宠星级 ..\QuestDiary\数据文件\喂养系统\战宠星级.txt

SENDMSG 0 【<$USERNAME>】喂食的千年蛛王进阶到6星，宠物等级提升。

goto @宠物的阶级

break

#IF

CHECKVAR HUMAN 战宠体魄值 = 700

#ACT

CALCVAR HUMAN 战宠星级 = 7

SAVEVAR HUMAN 战宠星级 ..\QuestDiary\数据文件\喂养系统\战宠星级.txt

SENDMSG 0 【<$USERNAME>】喂食的千年蛛王进阶到7星，宠物等级提升至顶级了。

goto @宠物的阶级

break

;=========================

[@喂食猩红毒蛛]

#IF

checkjob taoist

checknamelist ..\QuestDiary\数据文件\喂养系统\开通名单.txt

#act

goto @道士给宠物蛋

#ELSEACT

MESSAGEBOX 你不是道士，或者为开启宠物喂养系统。

[@道士给宠物蛋]

#IF

CHECKVAR HUMAN 道宠体魄值 = 700

#ACT

MESSAGEBOX 你的宠物已经到顶级了，不能再喂食宠物蛋了？

#ELSEACT

goto @道士递交宠物蛋

[@道士递交宠物蛋]

#IF

CHECKKIMNEEDLE 宠物蛋 1

#ACT

takeKIMNEEDLE 宠物蛋 1

CALCVAR HUMAN 道宠体魄值 + 10

SAVEVAR HUMAN 道宠体魄值 ..\QuestDiary\数据文件\喂养系统\道宠体魄值.txt

SENDMSG 6 宠物体魄增加了10点，请继续饲养你的宝宝。

goto @宠物的阶级

goto @道宠星级检测

#ELSEACT

MESSAGEBOX 你的宠物蛋在哪儿？
(责任编辑：找搜服传奇发布网)