Robo aim

extern void object::RoboAim()
{
    object alien;
    float angle;
    int alienList[], nr;

    nr = 0;

    alienList[nr++] = AlienWasp;
    alienList[nr++] = AlienAnt;
    alienList[nr++] = AlienSpider;
    alienList[nr++] = AlienWorm;
    alienList[nr++] = AlienEgg;

    alien = radar(alienList,0,90,0,75);//scan the forward quandrant
    if(alien != null)        //if there still is a alien left
    {
        turn(direction(alien.position));

        angle = atan(((topo(alien.position)+alien.altitude)-(topo(position)+altitude))/distance2d(position, alien.position));

        // aim(angle-pitch);    //aim at the target
        aim(angle);

        if(distance(position, alien.position) < 40)
        {
            fire(0.1);    //kill it
        }
    }
    else message("No target");
    if(temperature > 0.8) message("Engines getting hot");
    if(shieldLevel < 0.2) message("Warning-Shield status critical!");
    if(energyCell.energyLevel < 0.2 and energyCell.category == PowerCell) message("Warning-Energy level low!");
}