function turn4(lr)
{ 
 if (turn_index[i] == 0) 
    { 
     if (lr == 'l' && ind_flip[i] == 0) 
     {
       func21(); turn_index[i]=3;
     }
     if (lr == 'l' && ind_flip[i] == 1) 
     {
       func26(); turn_index[i]=3;
     }
     if (lr == 'r' && ind_flip[i] == 0)
     {
       func23(); turn_index[i]=1;
     }
     if (lr == 'r' && ind_flip[i] == 1)
     {
       func28(); turn_index[i]=1;
     }
     if (lr == 'flip')
        {
          if (ind_flip[i] == 0)  
             {
               a[i]=a[i]-34; a3[i]=a[i]; func25(); ind_flip[i]=1; 
             }
             else
             {
               a[i]=a[i]-34; a3[i]=a[i]; func24(); ind_flip[i]=0; 
             }
        }
    }    
    else
 if (turn_index[i] == 3)
    { 
     if (lr == 'l' && ind_flip[i] == 0) 
     {
       func22(); turn_index[i]=2;
     }
     if (lr == 'l' && ind_flip[i] == 1) 
     {
       func27(); turn_index[i]=2;
     }
     if (lr == 'r' && ind_flip[i] == 0)
     {
       func24(); turn_index[i]=0;
     }      
     if (lr == 'r' && ind_flip[i] == 1)
     {
       func25(); turn_index[i]=0;
     }
     if (lr == 'flip')
        {           
          if (ind_flip[i] == 0)  
             {
               a[i]=a[i]+34; a3[i]=a[i]; func28(); ind_flip[i]=1; turn_index[i]=1;
             }
             else
             {
               a[i]=a[i]+34; a3[i]=a[i]; func23(); ind_flip[i]=0; turn_index[i]=1; 
             }
        }
    }
    else
 if (turn_index[i] == 2)
    { 
     if (lr == 'l' && ind_flip[i] == 0) 
     {
       func23(); turn_index[i]=1;
     }
     if (lr == 'l' && ind_flip[i] == 1) 
     {
       func28(); turn_index[i]=1;
     }
     if (lr == 'r' && ind_flip[i] == 0)
     {
       func21(); turn_index[i]=3;
     }      
     if (lr == 'r' && ind_flip[i] == 1)
     {
       func26(); turn_index[i]=3;
     }
     if (lr == 'flip')
        {           
          if (ind_flip[i] == 0)  
             {
               a[i]=a[i]-34; a3[i]=a[i]; func27(); ind_flip[i]=1; 
             }
             else
             {
               a[i]=a[i]-34; a3[i]=a[i]; func22(); ind_flip[i]=0;  
             }
        }
    }
    else
 if (turn_index[i] == 1)
    { 
     if (lr == 'l' && ind_flip[i] == 0) 
     {
       func24(); turn_index[i]=0;
     }
     if (lr == 'l' && ind_flip[i] == 1) 
     {
       func25(); turn_index[i]=0;
     }
     if (lr == 'r' && ind_flip[i] == 0)
     {
       func22(); turn_index[i]=2;
     }      
     if (lr == 'r' && ind_flip[i] == 1)
     {
       func27(); turn_index[i]=2;
     }
     if (lr == 'flip')
        {           
          if (ind_flip[i] == 0)  
             {
               a[i]=a[i]+34; a3[i]=a[i]; func26(); ind_flip[i]=1; turn_index[i]=3;
             }
             else
             { 
               a[i]=a[i]+34; a3[i]=a[i]; func21(); ind_flip[i]=0; turn_index[i]=3; 
             }
        }
    }
}


function turn4a()
{  
document.getElementById("fig4").style.left=a[i]+'px';
document.getElementById("fig4a").style.top=t1a[i]+'px';
document.getElementById("fig4a").style.left=l1a[i]+'px';
document.getElementById("fig4b").style.top=t1b[i]+'px';
document.getElementById("fig4b").style.left=l1b[i]+'px';
document.getElementById("fig4c").style.top=t1c[i]+'px';
document.getElementById("fig4c").style.left=l1c[i]+'px';
document.getElementById("fig4d").style.top=t1d[i]+'px';
document.getElementById("fig4d").style.left=l1d[i]+'px';
document.getElementById("fig4e").style.top=t1e[i]+'px';
document.getElementById("fig4e").style.left=l1e[i]+'px';
}

function func21()
{ 
  a[i]=a[i]-34; a3[i]=a[i];
  t1a[i]=68; l1a[i]=0;
  t1b[i]=68; l1b[i]=34;
  t1c[i]=68; l1c[i]=68;    
  t1d[i]=34; l1d[i]=68;
  t1e[i]=34; l1e[i]=102; 
  turn4a(); ad1[i]=34; 
}

function func22()
{
  a[i]=a[i]+34; a3[i]=a[i];  
  t1a[i]=102; l1a[i]=34;
  t1b[i]=68;  l1b[i]=34;
  t1c[i]=34;  l1c[i]=34;    
  t1d[i]=34;  l1d[i]=0;
  t1e[i]=0;   l1e[i]=0; 
  turn4a();  
}

function func23()
{
  a[i]=a[i]-34; a3[i]=a[i];
  t1a[i]=34; l1a[i]=102;
  t1b[i]=34; l1b[i]=68;
  t1c[i]=34; l1c[i]=34;    
  t1d[i]=68; l1d[i]=34;
  t1e[i]=68; l1e[i]=0; 
  turn4a(); ad1[i]=34; 
}
function func24()
{
  a[i]=a[i]+34; a3[i]=a[i];
  t1a[i]=0;   l1a[i]=0;
  t1b[i]=34;  l1b[i]=0;
  t1c[i]=68;  l1c[i]=0;    
  t1d[i]=68;  l1d[i]=34;
  t1e[i]=102; l1e[i]=34; 
  turn4a();  
}

function func25()
{ 
  a[i]=a[i]+34; a3[i]=a[i];
  t1a[i]=0;   l1a[i]=34;
  t1b[i]=34;  l1b[i]=34;
  t1c[i]=68;  l1c[i]=34;    
  t1d[i]=68;  l1d[i]=0;
  t1e[i]=102; l1e[i]=0; 
  turn4a();  
}

function func26()
{
  a[i]=a[i]-34; a3[i]=a[i];
  t1a[i]=34; l1a[i]=0;
  t1b[i]=34; l1b[i]=34;
  t1c[i]=34; l1c[i]=68;    
  t1d[i]=68; l1d[i]=68;
  t1e[i]=68; l1e[i]=102; 
  turn4a(); ad1[i]=34; 
}

function func27()
{
  a[i]=a[i]+34; a3[i]=a[i];
  t1a[i]=102; l1a[i]=0;
  t1b[i]=68;  l1b[i]=0;
  t1c[i]=34;  l1c[i]=0;    
  t1d[i]=34;  l1d[i]=34;
  t1e[i]=0;   l1e[i]=34; 
  turn4a();  
}

function func28()
{
  a[i]=a[i]-34; a3[i]=a[i];
  t1a[i]=68; l1a[i]=102;
  t1b[i]=68; l1b[i]=68;
  t1c[i]=68; l1c[i]=34;    
  t1d[i]=34; l1d[i]=34;
  t1e[i]=34; l1e[i]=0; 
  turn4a(); ad1[i]=34; 
}