define
{
NewRobotType beeper_bot
{
IsLikeA basic_bot;
DefineInitialBeepers 5;
DefineInteger beepers_dropped;
}
}
execute
{
new beeper_bot kathy at 5,4;
tell kathy:
{
beepers_dropped = 0;
while (BeepersInBag > 0)
{
PutBeeper;
beepers_dropped = beepers_dropped + 1;
}
}
}
You can also go:
Created on 7 January 1996
Last revised 27 January 1997