Colony

#include "lineFollow.h"

#define NOBARCODE -2

#define CODESIZE 5 

#define INTERSECTION -25

#define FULL_LINE -26

int countHi = 0;

int countLo = 0;

int maxAvg, avg;

int barCode[ CODESIZE ];

int barCodePosition=0;

int turnDistance=0;

int intersection=0;

int disableBarCode=0;

void lineFollow_init()

{

        analog_init(0);

        lost = 0;

        intersection=0;

        disableBarCode=0;

}

int lineFollow(int speed)

{

        int colors[5];

        int position;

        updateLine(colors);

        position = lineLocate(colors);         

        //not on line

        if(position == NOLINE)

        {

                if(lost++>20)

                {

                        orb2_set_color(GREEN);

                        motors_off();

                        return LINELOST;

                }

        }

        else if(position == FULL_LINE)

        {

                if(intersection++>4)

                {

                        orb2_set_color(RED);

                        barCodePosition=0;

                        disableBarCode=15;

                        return INTERSECTION;

                }

        }

        //on line

        else

        {

                position*=30;

                orb2_set_color(ORB_OFF);

                motorLeft(min(speed+position, 255));

                motorRight(min(speed-position, 255));

                lost=0;

                intersection=0;

        }

        if(disableBarCode)

        {

                disableBarCode--;

                return NOBARCODE;

        }

        updateBarCode();

        return getBarCode();

}

int turnLeft()

{

        motor_l_set(BACKWARD, 200);

        motor_r_set(FORWARD, 200);

        int colors[5];

        updateLine(colors);

        int position = lineLocate(colors);

        if(position==NOLINE)turnDistance++;

        else if(turnDistance>10) return 0;//turnDistance = 0;

        return 1;

}

int turnRight()

{

        motor_r_set(BACKWARD, 200);

        motor_l_set(FORWARD, 200);

        int colors[5];

        updateLine(colors);

        int position = lineLocate(colors);

        if(position==NOLINE)turnDistance++;

        else if(turnDistance>10) return 0;//turnDistance = 0;

        return 1;

}

int getBarCode()

{

        if(barCodePosition!=CODESIZE) return NOBARCODE ;

        int temp = 0;

        int i;

        for(i=0; i<CODESIZE; i++)

                temp += (barCode[i] << i);

        barCodePosition = 0;

        return temp;

}

void updateLine(int* values)

{        

        int ports[5] = {13, 12, 3, 2, 9};

        for(int i = 0; i<5; i++)

                values[i] = analog_get10(ports[i])<150 ? WHITE : BLACK;

}

int lineLocate(int* colors)

{

        int i;

        int wsum = 0;

        int count=0;

        for(i = 0; i<5; i++)

        {

                count += colors[i]/2;

                wsum += (i)*colors[i];

        }

        if(count==0)

                return NOLINE;        

        if(count==5)

                return FULL_LINE;

        return (wsum/count)-4;

}

void updateBarCode()

{

        //maps the sensors to the analog input ports

        int ports[2] = {8,1};

        int current[2];

//        current[0] = analog_get10(8);

        current[1] = analog_get10(1);

//        usb_puti(analog_get10(8));

//        usb_putc('\t');

//        usb_puti(analog_get10(1));

//        usb_putc('\n');

        if(current[1]>500)

        {

                if(countHi++==0) 

                {

                        avg = 500;

                        maxAvg = 500;

                }

                else

                {

                        avg = 3*avg + current[1];

                        avg/=4;

                        maxAvg = max(maxAvg, avg);

                }

        }

        else if(countHi>5)

        {

                if(countLo++>15)

                {

                        countHi=countLo=0;

                        if(maxAvg>825)orb1_set_color(RED);

                        else orb1_set_color(BLUE);

                        barCode[barCodePosition++] = maxAvg > 825 ? 1:0;

                }

        }

        else countHi/=2;

        if(countHi==0)countLo=0; 

}

int min(int x, int y){return x>y ? y : x;}

int max(int x, int y){return x<y ? y : x;}

void motorLeft(int speed){

        ((speed-=127)>=0)?motor_l_set(FORWARD, 160+speed*95/128):motor_l_set(BACKWARD, 160-speed*95/127);

}

void motorRight(int speed){

        ((speed-=127)>=0)?motor_r_set(FORWARD, 160+speed*95/128):motor_r_set(BACKWARD, 160-speed*95/127);

}