传奇版本宠物系统之老虎喂养脚本

[@饲养]
{
#IF
checknamelist ..\QuestDiary\数据文件\白虎.txt
#ACT
#CALL [\宠物系统\金蛋宝宝.txt] @金蛋宝宝
break
#IF
#SAY
你想拥有勇猛的宠物老虎？你想成为宠物家族史上的开山始祖？\
那么快来领养一只宠物！点击选取下面的白虎圣王，你就有可能领\
养到一只可爱的宠物老虎!老虎喂养到25级就开始变色了!\ \
<白虎圣王/@金蛋>    <返回上页/@饲养宝宝>\

[@金蛋]
#IF
checknamelist ..\QuestDiary\数据文件\白虎.txt
#ACT
MESSAGEBOX 提示：你已经领养过，无法再次领养！
goto @饲养
break
#IF
checkitem 老虎蛋 1
#ACT
take 老虎蛋 1
CALCVAR HUMAN CWDJ = 1
CALCVAR HUMAN CWCZ = 10
CALCVAR HUMAN CWWL = 1
CALCVAR HUMAN CWFY = 1
CALCVAR HUMAN CWMY = 1
CALCVAR HUMAN CWZQ = 5
CALCVAR HUMAN CWMJ = 3
CALCVAR HUMAN CWZH = 3
GAMEPOINT = 0
SAVEVAR HUMAN CWMJ ..\QuestDiary\数据文件\CWMJSave.txt
SAVEVAR HUMAN CWZQ ..\QuestDiary\数据文件\CWZQSave.txt
SAVEVAR HUMAN CWWL ..\QuestDiary\数据文件\CWWLSave.txt
SAVEVAR HUMAN CWFY ..\QuestDiary\数据文件\CWFYSave.txt
SAVEVAR HUMAN CWMY ..\QuestDiary\数据文件\CWMYSave.txt
SAVEVAR HUMAN CWCZ ..\QuestDiary\数据文件\CWCZSave.txt
SAVEVAR HUMAN CWDJ ..\QuestDiary\数据文件\CWDJSave.txt
addnamelist ..\QuestDiary\数据文件\白虎.txt
SENDMSG 6 提示：你成功领养到宝宝一只，你以后可要好好照顾它哦！
close
#ELSEACT
MESSAGEBOX 提示：你没有老虎蛋，不能领养宠物！
goto @饲养
}