integer t_tube_rack;
vector t_tube_rack_pos = <0.623383, 0.011963, -0.549072>;
rotation t_tube_rack_rot = <0.000000, 0.000000, 0.707107, -0.707107>;

integer t_tube1;
integer t_liq1;
vector t_tube1_pos = <0.610054, -0.052933, -0.509033>;
vector t_liq1_pos = <0.610352, -0.052841, -0.513184>;



integer t_tube2;
integer t_liq2;
vector t_tube2_pos = <0.633980, -0.052933, -0.509033>;
vector t_liq2_pos =  <0.634277, -0.052841, -0.513184>;


integer t_tube3;
integer t_liq3;
vector t_tube3_pos = <0.612244, -0.026230, -0.509033>;
vector t_liq3_pos = <0.612534, -0.026138, -0.511230>;


integer t_tube4;
integer t_liq4;
vector t_tube4_pos = <0.633980, -0.026230, -0.509033>;
vector t_liq4_pos = <0.633812, -0.026596, -0.513184>;


integer t_tube5;
integer t_liq5;
vector t_tube5_pos = <0.610054, -0.000214, -0.509033>;
vector t_liq5_pos =  <0.610352, -0.000122, -0.513184>;


integer t_tube6;
integer t_liq6;
vector t_tube6_pos = <0.633980, -0.000214, -0.509033>;
vector t_liq6_pos = <0.634277, -0.000122, -0.513184>;


integer t_tube7;
integer t_liq7;
vector t_tube7_pos = <0.610054, 0.024658, -0.509033>;
vector t_liq7_pos = <0.610581, 0.024704, -0.513184>;


integer t_tube8;
integer t_liq8;
vector t_tube8_pos = <0.633980, 0.024658, -0.509033>;
vector t_liq8_pos =  <0.634018, 0.024750, -0.513184>;


integer t_tube9;
integer t_liq9;
vector t_tube9_pos = <0.610054, 0.050690, -0.509033>;
vector t_liq9_pos = <0.609253, 0.050049, -0.513184>;

integer t_tube10;
integer t_liq10;
vector t_tube10_pos = <0.633980, 0.050690, -0.509033>;
vector t_liq10_pos = <0.633583, 0.049499, -0.513184>;


integer t_tube11;
integer t_liq11;
vector t_tube11_pos = <0.610054, 0.075165, -0.509033>;
vector t_liq11_pos = <0.610260, 0.075226, -0.513184>;


integer t_tube12;
integer t_liq12;
vector t_tube12_pos = <0.633980, 0.075165, -0.509033>;
vector t_liq12_pos = <0.633476, 0.075531, -0.513184>;


rotation t_tube_rot= <0.018525, -0.018494, 0.706895, -0.706834>;
rotation t_liq_rot = <-0.706800, -0.006215, 0.006138, -0.707359>;

vector SL_COLOR_NEUTRAL;
vector SL_COLOR_ORANGE;
vector SL_COLOR_BLUE;
vector SL_COLOR_GREEN;


setText(integer lnk,string txt)
{
     llSetLinkPrimitiveParams(lnk,[PRIM_TEXT,"",<0.0,1.0,0.0>,0.0]);
  //  llSetLinkPrimitiveParams(lnk,[PRIM_TEXT,txt,<0.0,1.0,0.0>,1.0]);

}






default
{
    state_entry()
    {
       integer i;

       integer tot = llGetNumberOfPrims() + 1;





       for(i = 0 ; i < tot; ++ i)
       {

            string lName = llToLower(llGetLinkName(i));



              if(lName == "test_tube rack")
            {
            t_tube_rack = i;



            }

            else if(lName == "test_tube_1")
            {
            t_tube1 = i;


            }

           else if(lName == "test_liq_1")
            {
            t_liq1 = i;


            }

             else if(lName == "test_tube_2")
            {
            t_tube2 = i;


            }

           else if(lName == "test_liq_2")
            {
            t_liq2 = i;


            }

             else if(lName == "test_tube_3")
            {
            t_tube3 = i;


            }

           else if(lName == "test_liq_3")
            {
            t_liq3 = i;


            }


             else if(lName == "test_tube_4")
            {
            t_tube4 = i;


            }

           else if(lName == "test_liq_4")
            {
            t_liq4 = i;



            }

             else if(lName == "test_tube_5")
            {
            t_tube5 = i;



            }

             else if(lName == "test_liq_5")
            {
            t_liq5 = i;



            }

             else if(lName == "test_tube_6")
            {
            t_tube6 = i;



            }

           else if(lName == "test_liq_6")
            {
            t_liq6 = i;



            }

             else if(lName == "test_tube_7")
            {
            t_tube7 = i;


            }

           else if(lName == "test_liq_7")
            {
            t_liq7 = i;



            }

             else if(lName == "test_tube_8")
            {
            t_tube8 = i;



            }

           else if(lName == "test_liq_8")
            {
            t_liq8 = i;



            }

             else if(lName == "test_tube_9")
            {
            t_tube1 = i;



            }

           else if(lName == "test_liq_9")
            {
            t_liq9 = i;



            }


             else if(lName == "test_tube_10")
            {
            t_tube10 = i;



            }

           else if(lName == "test_liq_10")
            {
            t_liq10 = i;



            }

             else if(lName == "test_tube_11")
            {
            t_tube11 = i;



            }

           else if(lName == "test_liq_11")
            {
            t_liq11 = i;



            }

             else if(lName == "test_tube_12")
            {
            t_tube12 = i;



            }

           else if(lName == "test_liq_12")
            {
            t_liq12 = i;



            }

        }



           llSetLinkPrimitiveParams(t_tube_rack,[PRIM_POS_LOCAL, t_tube_rack_pos ,PRIM_ROT_LOCAL, t_tube_rack_rot , PRIM_LINK_TARGET, t_tube1, PRIM_POS_LOCAL, t_tube1_pos ,PRIM_ROT_LOCAL, t_tube_rot , PRIM_LINK_TARGET, t_liq1, PRIM_POS_LOCAL, t_liq1_pos ,PRIM_ROT_LOCAL, t_liq_rot, PRIM_LINK_TARGET, t_tube2, PRIM_POS_LOCAL, t_tube2_pos ,PRIM_ROT_LOCAL, t_tube_rot , PRIM_LINK_TARGET, t_liq2, PRIM_POS_LOCAL, t_liq2_pos ,PRIM_ROT_LOCAL, t_liq_rot, PRIM_LINK_TARGET, t_tube3, PRIM_POS_LOCAL, t_tube3_pos ,PRIM_ROT_LOCAL, t_tube_rot , PRIM_LINK_TARGET, t_liq3, PRIM_POS_LOCAL, t_liq3_pos ,PRIM_ROT_LOCAL, t_liq_rot, PRIM_LINK_TARGET, t_tube4, PRIM_POS_LOCAL, t_tube4_pos ,PRIM_ROT_LOCAL, t_tube_rot , PRIM_LINK_TARGET, t_liq4, PRIM_POS_LOCAL, t_liq4_pos ,PRIM_ROT_LOCAL, t_liq_rot, PRIM_LINK_TARGET, t_tube5, PRIM_POS_LOCAL, t_tube5_pos ,PRIM_ROT_LOCAL, t_tube_rot , PRIM_LINK_TARGET, t_liq5, PRIM_POS_LOCAL, t_liq5_pos ,PRIM_ROT_LOCAL, t_liq_rot, PRIM_LINK_TARGET, t_tube6, PRIM_POS_LOCAL, t_tube6_pos ,PRIM_ROT_LOCAL, t_tube_rot , PRIM_LINK_TARGET, t_liq6, PRIM_POS_LOCAL, t_liq6_pos ,PRIM_ROT_LOCAL, t_liq_rot,PRIM_LINK_TARGET,t_tube7, PRIM_POS_LOCAL, t_tube7_pos ,PRIM_ROT_LOCAL, t_tube_rot , PRIM_LINK_TARGET, t_liq7, PRIM_POS_LOCAL, t_liq7_pos ,PRIM_ROT_LOCAL, t_liq_rot, PRIM_LINK_TARGET, t_tube8, PRIM_POS_LOCAL, t_tube8_pos ,PRIM_ROT_LOCAL, t_tube_rot , PRIM_LINK_TARGET, t_liq8, PRIM_POS_LOCAL, t_liq8_pos ,PRIM_ROT_LOCAL, t_liq_rot, PRIM_LINK_TARGET, t_tube9, PRIM_POS_LOCAL, t_tube9_pos ,PRIM_ROT_LOCAL, t_tube_rot , PRIM_LINK_TARGET, t_liq9, PRIM_POS_LOCAL, t_liq9_pos ,PRIM_ROT_LOCAL, t_liq_rot, PRIM_LINK_TARGET, t_tube10, PRIM_POS_LOCAL, t_tube10_pos ,PRIM_ROT_LOCAL, t_tube_rot , PRIM_LINK_TARGET, t_liq10, PRIM_POS_LOCAL, t_liq10_pos ,PRIM_ROT_LOCAL, t_liq_rot, PRIM_LINK_TARGET, t_tube11, PRIM_POS_LOCAL, t_tube11_pos ,PRIM_ROT_LOCAL, t_tube_rot , PRIM_LINK_TARGET, t_liq11, PRIM_POS_LOCAL, t_liq11_pos ,PRIM_ROT_LOCAL, t_liq_rot, PRIM_LINK_TARGET, t_tube12, PRIM_POS_LOCAL, t_tube12_pos ,PRIM_ROT_LOCAL, t_tube_rot , PRIM_LINK_TARGET, t_liq12, PRIM_POS_LOCAL, t_liq12_pos ,PRIM_ROT_LOCAL, t_liq_rot]);



    }


    changed(integer change)
    {

     if(change & CHANGED_LINK)
     {


       llResetScript();

     }


    }


}