// Bromley College
// Linden Script Exhibition
 
// Code for poster 19
// Colour vectors are set up as follows < red,green,blue > where red green and blue can be anything from 0 (dark) to 1 (full bright). e.g. < 1,0,0 > will be bright red, whereas < 0.5, 0.5, 0 > will be medium yellow.
 
default
{
    state_entry()
    {
        vector prim_color = < 1,1,1 >;
        llSetColor( prim_color, ALL_SIDES          );
    }    
 
    touch_start(integer total_number)
    {
        llSay(0, "Green State");
        vector prim_color = < 0,0.75,0 >;
        llSetColor( prim_color, ALL_SIDES );                      //set colour to mid green
        state amber; //switch to the new state
    }
}
 
state amber
{
    touch_start(integer total_number)
    {
        llSay(0, "Amber State");
        vector prim_color = < 1,0.75,0 >;
        llSetColor( prim_color, ALL_SIDES          );
        state red;
    }
}
 
state red
{
    touch_start(integer total_number)
    {
        llSay(0, "Red State");
        vector prim_color = < 1,0,0 >;
        llSetColor( prim_color, ALL_SIDES          );
        state white;
    }
}
 
state white
{
    touch_start(integer total_number)
    {
        llSay(0, "White State");
        state default;
    }
}
 
// End of code;