Dec 072017
C-Robots robot – the undefeated BEAR.R. | |||
---|---|---|---|
File Name | File Size | Zip Size | Zip Type |
BEAR.DOC | 1221 | 498 | deflated |
BEAR.R | 110 | 98 | deflated |
Download File CRB_BEAR.ZIP Here
Contents of the BEAR.DOC file
/* Bear */
Written by Anthony Li for use with CROBOTS. 8/30/88
In its current format, BEAR.R is only 110 bytes in size, but a formidable
opponent despite its simplicity. In an expanded format, BEAR.R might be:
/*-------------------------------------------------------------------------*/
/* Bear.R: A CRobot program */
main ()
{
int Enemy_Range;
int Heading;
Heading = 0; /* Initialize Heading, facing Bear towards coord 0 */
while (1) /* Perform a continuous loop */
{
Enemy_Range = scan (Heading, 5); /* Look for an enemy straight ahead */
if (Enemy_Range > 40)
{ /* If there is an enemy in range, */
cannon (Heading, Enemy_Range); /* then fire at it */
}
else
{ /* If no enemy was detected, */
if (Heading < 360) /* then turn around a little */
Heading += 5;
else
Heading = 0;
drive (Heading, 50); /* and move forward slowly */
}
}
}
/*-------------------------------------------------------------------------*/
Written by Anthony Li for use with CROBOTS. 8/30/88
In its current format, BEAR.R is only 110 bytes in size, but a formidable
opponent despite its simplicity. In an expanded format, BEAR.R might be:
/*-------------------------------------------------------------------------*/
/* Bear.R: A CRobot program */
main ()
{
int Enemy_Range;
int Heading;
Heading = 0; /* Initialize Heading, facing Bear towards coord 0 */
while (1) /* Perform a continuous loop */
{
Enemy_Range = scan (Heading, 5); /* Look for an enemy straight ahead */
if (Enemy_Range > 40)
{ /* If there is an enemy in range, */
cannon (Heading, Enemy_Range); /* then fire at it */
}
else
{ /* If no enemy was detected, */
if (Heading < 360) /* then turn around a little */
Heading += 5;
else
Heading = 0;
drive (Heading, 50); /* and move forward slowly */
}
}
}
/*-------------------------------------------------------------------------*/
December 7, 2017
Add comments