传奇法师宝宝储存脚本

此脚本由站长亲自编写，测试功能一切正常，比较适合复古版本，我们脚本中用到T10 T11 T12 T13 T14 五种个人字符型变量

如你版本中这些变量已被使用，那么请记得更换，以免冲突，脚本中只写了一个白野猪的储存的对应脚本，其它就没写进去

储存其它宠物需要自己复制白野猪的脚本，改一下变量和要储存的怪物名字即可，怪物数据库中一定要有对应的怪物哦。

此脚本站长是在GOM引擎上写出来的，如果在其它引擎有报错大家根据对应引擎说明书修改即可。

[@main]

这里可以提供宝宝储存服务,每储存一只收取1万金币\
暂时只允许储存以下宝宝，请选择你要储存的宝宝\ \
<储存白猪/@白猪>     <储存虎卫/@虎卫>     <储存多多/@多多>   \ \
<储存待定/@待定>     <储存待定/@待定>     <储存待定/@待定>    \

[@白猪]
此位置提供储存白野猪，你可以储存5个宝宝……\
每储存一个收取10000金币作为看管费……\
而且你可以随时过来取你的宝宝,取出后默认1级……\ \
储存的宝宝：【宝宝1：<$STR(T10)>.  <储存宝宝/@宝宝1>.  <取回宝宝/@取回1>】\ 
储存的宝宝：【宝宝2：<$STR(T11)>.  <储存宝宝/@宝宝2>.  <取回宝宝/@取回2>】\ 
储存的宝宝：【宝宝3：<$STR(T12)>.  <储存宝宝/@宝宝3>.  <取回宝宝/@取回3>】\ 
储存的宝宝：【宝宝4：<$STR(T13)>.  <储存宝宝/@宝宝4>.  <取回宝宝/@取回4>】\ 
储存的宝宝：【宝宝5：<$STR(T14)>.  <储存宝宝/@宝宝5>.  <取回宝宝/@取回5>】\ 

[@宝宝5]
#if
CHECKGOLD 10000
CHECKSLAVENAME 白野猪
EQUAL T14
#act
TAKE 金币 10000
mov T14 白野猪
KILLCALLMOB 白野猪
messagebox 你的宠物【<$STR(T14)>】已储存！
goto @白猪
#elseact
messagebox \\\储存失败:【只能储存白野猪】【你没有一万金币】【已经储存了宝宝】

[@取回5]
#if
EQUAL T14 白野猪
CHECKSLAVECOUNT < 5
#ACT 
RECALLMOB  白野猪 0  32000 0 
mov T14
goto @白猪
#elseact
messagebox \\\取回失败:【没有待取回的宝宝】【你已经带了5个宝宝了】

[@宝宝4]
#if
CHECKGOLD 10000
CHECKSLAVENAME 白野猪
EQUAL T13
#act
TAKE 金币 10000
mov T13 白野猪
KILLCALLMOB 白野猪
messagebox 你的宠物【<$STR(T13)>】已储存！
goto @白猪
#elseact
messagebox \\\储存失败:【只能储存白野猪】【你没有一万金币】【已经储存了宝宝】

[@取回4]
#if
EQUAL T13 白野猪
CHECKSLAVECOUNT < 5
#ACT 
RECALLMOB  白野猪 0  32000 0 
mov T13
goto @白猪
#elseact
messagebox \\\取回失败:【没有待取回的宝宝】【你已经带了5个宝宝了】

[@宝宝3]
#if
CHECKGOLD 10000
CHECKSLAVENAME 白野猪
EQUAL T12
#act
TAKE 金币 10000
mov T12 白野猪
KILLCALLMOB 白野猪
messagebox 你的宠物【<$STR(T12)>】已储存！
goto @白猪
#elseact
messagebox \\\储存失败:【只能储存白野猪】【你没有一万金币】【已经储存了宝宝】

[@取回3]
#if
EQUAL T12 白野猪
CHECKSLAVECOUNT < 5
#ACT 
RECALLMOB  白野猪 0  32000 0 
mov T12
goto @白猪
#elseact
messagebox \\\取回失败:【没有待取回的宝宝】【你已经带了5个宝宝了】

[@宝宝2]
#if
CHECKGOLD 10000
CHECKSLAVENAME 白野猪
EQUAL T11
#act
TAKE 金币 10000
mov T11 白野猪
KILLCALLMOB 白野猪
messagebox 你的宠物【<$STR(T11)>】已储存！
goto @白猪
#elseact
messagebox \\\储存失败:【只能储存白野猪】【你没有一万金币】【已经储存了宝宝】

[@取回2]
#if
EQUAL T11 白野猪
CHECKSLAVECOUNT < 5
#ACT 
RECALLMOB  白野猪 0  32000 0 
mov T11
goto @白猪
#elseact
messagebox \\\取回失败:【没有待取回的宝宝】【你已经带了5个宝宝了】

[@宝宝1]
#if
CHECKGOLD 10000
CHECKSLAVENAME 白野猪
EQUAL T10
#act
TAKE 金币 10000
mov T10 白野猪
KILLCALLMOB 白野猪
messagebox 你的宠物【<$STR(T10)>】已储存！
goto @白猪
#elseact
messagebox \\\储存失败:【只能储存白野猪】【你没有一万金币】【已经储存了宝宝】

[@取回1]
#if
EQUAL T10 白野猪
CHECKSLAVECOUNT < 5
#ACT 
RECALLMOB  白野猪 0  32000 0 
mov T10
goto @白猪
#elseact

messagebox \\\取回失败:【没有待取回的宝宝】【你已经带了5个宝宝了】