[TinTin]初体验の星宿炼毒
本帖最后由 kidmouse 于 2019-11-1 06:32 AM 编辑简短小机器，用来练手
#ACTION {%s这里明显的出口有}
{
#variable idle 0
}
#ACTION {$name发现的 %1(%2)}
{
#variable bug %2;
#format bug {%l} {$bug};
hit $bug
}
#ACTION {$name发现的 %1脚下一个不稳，跌在地上一动也不动了。}
{
look;
#delay {2} {get $bug}
}
#ACTION {$name发现的 %1么小的动物你要怎么跟随？}
{
hit $bug
}
#ACTION {$name发现的 %1身体缩成了一团，竟自行成了灰烬。}
{
#delay {2} {xian}
}
#ACTION {$name发现的 %1往%2移动。}
{
#variable dir %2;
#list escape find $dir dirnum;
#list catch get $dirnum dir;
go $dir
}
#ACTION {你当真以为星宿海遍地毒虫？还是你要犁地？}
{
#delay 3 {gonext;#delay {1} {xian}}
}
#ACTION {你对基本毒技的领会又加深了一些！}
{
yun qudu;
eat ganliang;
#delay 4 {gobug}
}
#ACTION {你将$name发现的 %1扶了起来背在背上。}
{
goback
}
#ACTION {你在地上找了半天，却什么也没发现。}
{
#delay 3 {xian}
}
#ACTION {你摘了一只野果下来。}
{
do 3 eat guo
}
#ACTION {一只不知名的虫子爬了出来。}
{
look
}
#ALIAS {goback}
{
#variable here 0;
e;
e;
s;
s;
w;
s;
s;
s;
e;
s;
e;
ne;
e;
enter;
e;
ronghe $bug
}
#ALIAS {gobug}
{
w;
w;
w;
e;
out;
s;
s;
do 3 drink;
#delay 1 {n;n;w;sw;w;n;w;n;n;e;xian}
}
#ALIAS {gonext}
{
#math here $here+1;
#if {$here<9}
{
#list map get $here dir;
go $dir
};
#else
{
#variable here 0;
e;
e;
e;
s;
s;
s;
say FIND HERE AGAIN
}
}
#TICKER {con}{hi}{180}
#TICKER {idle}{#if {$idle==1} {eat ganliang;gobug};#var idle 1} {120}
#VARIABLE {catch}{{1}{east}{2}{south}{3}{west}{4}{north}}
#VARIABLE {dir}{west}
#VARIABLE {dirnum}{3}
#VARIABLE {escape}{{1}{东}{2}{南}{3}{西}{4}{北}}
#VARIABLE {here}{2}
#VARIABLE {idle}{1}
#VARIABLE {map}{{1}{west}{2}{west}{3}{north}{4}{east}{5}{east}{6}{north}{7}{west}{8}{west}}
#VARIABLE {name}{黑匣子}
北大侠客行MUD，中国最好的MUD 厉害~ 厉害~ 耗子原来还是TT高手 赞，tintin是最好的客户端。 求一个推车的tintin机器人吧 汗。。。耗子不要不专心，好好搞462机器！yct76 多多写tt机器，addoil
页:
[1]