/* Shader description goes here */
surface
constant_test(float Kfb = 1;)
{
color    surfcolor =  color(0.6,0.717,0.721);
  
  
if(t >= 0.1 && t <= .9 && s >= 0.1 && s <= .9 ) // beige square
    surfcolor = color(0.698,0.721,0.6);
  
if(t >= 0.3 && t <= .7 && s >= 0.3 && s <= .7 )  // blue second square
    surfcolor = color(0.6,0.717,0.721);
  
//horizontal lines
if(t >= 0.1 && t <= .12 )
    surfcolor = color(0.513,0.415,0.235);
  
if(t >= 0.3 && t <= .32 )
    surfcolor = color(0.513,0.415,0.235);
    
if(t >= 0.5 && t <= .52 )
    surfcolor = color(0.513,0.415,0.235);
    
if(t >= 0.7 && t <= .72 )
    surfcolor = color(0.513,0.415,0.235);
    
if(t >= 0.9 && t <= .92 )
    surfcolor = color(0.513,0.415,0.235);
    
//vertical lines
if(s >= 0.1 && s <= .12 )
    surfcolor = color(0.513,0.415,0.235);
  
if(s >= 0.3 && s <= .32 )
    surfcolor = color(0.513,0.415,0.235);
    
if(s >= 0.5 && s <= .52 )
    surfcolor = color(0.513,0.415,0.235);
    
if(s >= 0.7 && s <= .72 )
    surfcolor = color(0.513,0.415,0.235);
    
if(s >= 0.9 && s <= .92 )
    surfcolor = color(0.513,0.415,0.235);
  
//little square    
if(t >= 0.07 && t <= .13 && s >= 0.07 && s <= .13 ) 
    surfcolor = color(0.290,0.419,0.549);
  
if(t >= 0.27 && t <= .33 &&  s >= 0.07 && s <= .13 ) 
    surfcolor = color(0.290,0.419,0.549);
  
if(t >= 0.47 && t <= .53 &&  s >= 0.07 && s <= .13 ) 
    surfcolor = color(0.290,0.419,0.549);
  
if(t >= 0.67 && t <= .73 &&  s >= 0.07 && s <= .13) 
    surfcolor = color(0.290,0.419,0.549);
  
if(t >= 0.87 && t <= .93 &&  s >= 0.07 && s <= .13 ) 
    surfcolor = color(0.290,0.419,0.549);
  
  
//second squares
if(t >= 0.07 && t <= .13 && s >= 0.27 && s <= .33 ) 
    surfcolor = color(0.290,0.419,0.549);
  
if(t >= 0.07 && t <= .13 && s >= 0.27 && s <= .33 ) 
    surfcolor = color(0.290,0.419,0.549);
  
if(t >= 0.27 && t <= .33 &&  s >= 0.27 && s <= .33 ) 
    surfcolor = color(0.290,0.419,0.549);
  
if(t >= 0.47 && t <= .53 &&  s >= 0.27 && s <= .33 ) 
    surfcolor = color(0.290,0.419,0.549);
  
if(t >= 0.67 && t <= .73 &&  s >= 0.27 && s <= .33) 
    surfcolor = color(0.290,0.419,0.549);
  
if(t >= 0.87 && t <= .93 &&  s >= 0.27 && s <= .33 ) 
    surfcolor = color(0.290,0.419,0.549);
  
//third squares
if(t >= 0.07 && t <= .13 && s >= 0.47 && s <= .53 ) 
    surfcolor = color(0.290,0.419,0.549);
  
if(t >= 0.07 && t <= .13 && s >= 0.47 && s <= .53 ) 
    surfcolor = color(0.290,0.419,0.549);
  
if(t >= 0.27 && t <= .33 &&  s >= 0.47 && s <= .53 ) 
    surfcolor = color(0.290,0.419,0.549);
  
if(t >= 0.47 && t <= .53 &&  s >= 0.47 && s <= .53 ) 
    surfcolor = color(0.290,0.419,0.549);
  
if(t >= 0.67 && t <= .73 &&  s >= 0.47 && s <= .53) 
    surfcolor = color(0.290,0.419,0.549);
  
if(t >= 0.87 && t <= .93 &&  s >= 0.47 && s <= .53 ) 
    surfcolor = color(0.290,0.419,0.549);
  
//fourth squares
if(t >= 0.07 && t <= .13 && s >= 0.67 && s <= .73 ) 
    surfcolor = color(0.290,0.419,0.549);
  
if(t >= 0.07 && t <= .13 && s >= 0.67 && s <= .73 ) 
    surfcolor = color(0.290,0.419,0.549);
  
if(t >= 0.27 && t <= .33 &&  s >= 0.67 && s <= .73 ) 
    surfcolor = color(0.290,0.419,0.549);
  
if(t >= 0.47 && t <= .53 &&  s >= 0.67 && s <= .73 ) 
    surfcolor = color(0.290,0.419,0.549);
  
if(t >= 0.67 && t <= .73 &&  s >= 0.67 && s <= .73) 
    surfcolor = color(0.290,0.419,0.549);
  
if(t >= 0.87 && t <= .93 &&  s >= 0.67 && s <= .73 ) 
    surfcolor = color(0.290,0.419,0.549);
  
//fifth squares
if(t >= 0.07 && t <= .13 && s >= 0.87 && s <= .93 ) 
    surfcolor = color(0.290,0.419,0.549);
  
if(t >= 0.07 && t <= .13 && s >= 0.87 && s <= .93 ) 
    surfcolor = color(0.290,0.419,0.549);
  
if(t >= 0.27 && t <= .33 &&  s >= 0.87 && s <= .93 ) 
    surfcolor = color(0.290,0.419,0.549);
  
if(t >= 0.47 && t <= .53 &&  s >= 0.87 && s <= .93 ) 
    surfcolor = color(0.290,0.419,0.549);
  
if(t >= 0.67 && t <= .73 &&  s >= 0.87 && s <= .93) 
    surfcolor = color(0.290,0.419,0.549);
  
if(t >= 0.87 && t <= .93 &&  s >= 0.87 && s <= .93 ) 
    surfcolor = color(0.290,0.419,0.549);
  
  
/* STEP 1 - set the apparent surface opacity */
Oi = Os;
  
/* STEP 2 - calculate the apparent surface color */
Ci = Oi * Cs * surfcolor * Kfb;
}