// Last edited on DATE TIME by USER
// Processed by remove-cam-lights

background{ color rgb < 0.75, 0.80, 0.85 > }

#declare tx_plastico =
  texture{
    pigment{ color rgb < 0.10, 0.80, 1.00 > }
    finish{ diffuse 0.9 ambient 0.4 specular 0.5 roughness 0.505 }
  }

#declare tx_fosca =
  texture{
    pigment{ color rgb < 1.00, 0.80, 0.10 > }
    finish{ diffuse 0.8 ambient 0.4 }
  }

#declare tx_farol =
  texture{
    pigment{ color rgb < 0.00, 0.0, 0.0 > }
    finish{ diffuse 0.9 ambient 0.8 }
  }

#declare tx_espelho =
  texture{
    pigment{ color rgb < 1.00, 0.85, 0.30 > }
    finish{ diffuse 0.2 reflection 0.9*< 1.00, 0.85, 0.30 > ambient 0.1 }
  }

#declare tx_vidro =
  texture{
    pigment{ color rgb < 0.85, 0.95, 1.00 > filter 0.70 }
    finish{ diffuse 0.03 reflection 0.25 ambient 0.02 specular 0.25 roughness 0.005 }
  }

#declare roleta = seed(100000);

#declare bolaarea =
        difference{
                        cylinder{ <0,0,0>,<0,0,0.3>,6
                                texture{pigment{color rgb<1,1,1>} finish{diffuse 0.2 ambient 0.5}}
                        }
                        cylinder{ <0,0,-1>,<0,0,4>,5
                                texture{pigment{color rgb<1,1,1>} finish{diffuse 0.2 ambient 0.5}}
                        }
                        box{ <10,10,-4>,<0,-10,10>
                                texture{pigment{color rgb<1,1,1>} finish{diffuse 0.2 ambient 0.5}}
                        }

                }

#declare jogador1 =
        union{
                sphere{<0,0,2.5>,0.2 texture{pigment{color rgb<0.921,0.78,0.619>} finish{diffuse 0.5 ambient 0.5}}}
                box{<-0.2,-0.3,1.2>,<0.2,0.3,2.3> texture{tx_fosca}}
                box{<-0.2,-0.3,0.8>,<0.2,0.3,1.2> texture{tx_farol}}
                cylinder{<0,0.15,0.3>,<0,0.15,0.8>,0.15 texture{pigment{color rgb<0.921,0.78,0.619>} finish{diffuse 0.5 ambient 0.5}}}
                cylinder{<0,-0.15,0.3>,<0,-0.15,0.8>,0.17 texture{pigment{color rgb<0.921,0.78,0.619>} finish{diffuse 0.5 ambient 0.5}}}

        }

#declare jogador2 =
        union{
                sphere{<0,0,2.5>,0.2 texture{pigment{color rgb<0.921,0.78,0.619>} finish{diffuse 0.5 ambient 0.5}}}
                box{<-0.2,-0.3,1.2>,<0.2,0.3,2.3> texture{pigment{ color rgb < 0.10, 0.85, 0.30 > } finish{diffuse 0.5 ambient 0.5}}}
                box{<-0.2,-0.3,0.8>,<0.2,0.3,1.2> texture{tx_espelho}}
                cylinder{<0,0.15,0.3>,<0,0.15,0.8>,0.15 texture{pigment{color rgb<0.921,0.78,0.619>} finish{diffuse 0.5 ambient 0.5}}}
                cylinder{<0,-0.15,0.3>,<0,-0.15,0.8>,0.17 texture{pigment{color rgb<0.921,0.78,0.619>} finish{diffuse 0.5 ambient 0.5}}}

        }

#declare campo =
        union{
                box{ <-50,-20,0>,<50,20,0.2>
                        texture{pigment{color rgb<0.196,0.804,0.196>} finish{diffuse 0.2 ambient 0.5}}
                }

                difference{
                        cylinder{ <0,0,0>,<0,0,0.3>,9
                                texture{pigment{color rgb<1,1,1>} finish{diffuse 0.2 ambient 0.5}}
                        }
                        cylinder{ <0,0,-1>,<0,0,4>,8
                                texture{pigment{color rgb<1,1,1>} finish{diffuse 0.2 ambient 0.5}}
                        }
                }
                box{ <-0.5,-20,0>,<0.5,20,0.3>
                        texture{pigment{color rgb<1,1,1>} finish{diffuse 0.2 ambient 0.5}}
                }
                box{ <-50,-20,0>,<50,-19,0.3>
                        texture{pigment{color rgb<1,1,1>} finish{diffuse 0.2 ambient 0.5}}
                }
                box{ <-50,20,0>,<50,19,0.3>
                        texture{pigment{color rgb<1,1,1>} finish{diffuse 0.2 ambient 0.5}}
                }
                box{ <-50,-20,0>,<-49,20,0.3>
                        texture{pigment{color rgb<1,1,1>} finish{diffuse 0.2 ambient 0.5}}
                }
                box{ <50,-20,0>,<49,20,0.3>
                        texture{pigment{color rgb<1,1,1>} finish{diffuse 0.2 ambient 0.5}}
                }

                box{ <50,-10,0>,<35,-9,0.3>
                        texture{pigment{color rgb<1,1,1>} finish{diffuse 0.2 ambient 0.5}}
                }
                box{ <35,-10,0>,<36,10,0.3>
                        texture{pigment{color rgb<1,1,1>} finish{diffuse 0.2 ambient 0.5}}
                }
                box{ <50,10,0>,<35,9,0.3>
                        texture{pigment{color rgb<1,1,1>} finish{diffuse 0.2 ambient 0.5}}
                }

                box{ <50,-6,0>,<43,-5,0.3>
                        texture{pigment{color rgb<1,1,1>} finish{diffuse 0.2 ambient 0.5}}
                }
                box{ <43,-6,0>,<44,6,0.3>
                        texture{pigment{color rgb<1,1,1>} finish{diffuse 0.2 ambient 0.5}}
                }
                box{ <50,6,0>,<43,5,0.3>
                        texture{pigment{color rgb<1,1,1>} finish{diffuse 0.2 ambient 0.5}}
                }
                object{bolaarea translate<35,0,0>}

                object{bolaarea translate<35,0,0> scale<-1,1,1>}
                box{ <-50,-10,0>,<-35,-9,0.3>
                        texture{pigment{color rgb<1,1,1>} finish{diffuse 0.2 ambient 0.5}}
                }
                box{ <-35,-10,0>,<-36,10,0.3>
                        texture{pigment{color rgb<1,1,1>} finish{diffuse 0.2 ambient 0.5}}
                }
                box{ <-50,10,0>,<-35,9,0.3>
                        texture{pigment{color rgb<1,1,1>} finish{diffuse 0.2 ambient 0.5}}
                }

                box{ <-50,-6,0>,<-43,-5,0.3>
                        texture{pigment{color rgb<1,1,1>} finish{diffuse 0.2 ambient 0.5}}
                }
                box{ <-43,-6,0>,<-44,6,0.3>
                        texture{pigment{color rgb<1,1,1>} finish{diffuse 0.2 ambient 0.5}}
                }
                box{ <-50,6,0>,<-43,5,0.3>
                        texture{pigment{color rgb<1,1,1>} finish{diffuse 0.2 ambient 0.5}}
                }

                cylinder{<49.5,-2.5,0>,<49.5,-2.5,3>,0.2
                        texture{pigment{color rgb<1,1,1>} finish{diffuse 0.2 ambient 0.5}}
                }
                cylinder{<49.5,2.5,0>,<49.5,2.5,3>,0.2
                        texture{pigment{color rgb<1,1,1>} finish{diffuse 0.2 ambient 0.5}}
                }
                cylinder{<49.5,-2.5,3>,<49.5,2.5,3>,0.2
                        texture{pigment{color rgb<1,1,1>} finish{diffuse 0.2 ambient 0.5}}
                }

                cylinder{<-49.5,-2.5,0>,<-49.5,-2.5,3>,0.2
                        texture{pigment{color rgb<1,1,1>} finish{diffuse 0.2 ambient 0.5}}
                }
                cylinder{<-49.5,2.5,0>,<-49.5,2.5,3>,0.2
                        texture{pigment{color rgb<1,1,1>} finish{diffuse 0.2 ambient 0.5}}
                }
                cylinder{<-49.5,-2.5,3>,<-49.5,2.5,3>,0.2
                        texture{pigment{color rgb<1,1,1>} finish{diffuse 0.2 ambient 0.5}}
                }

        }

#macro cadeira(cx,cy,cz,r,g,b)
        union{
                box{<cx-0.5,cy-0.5,cz>,<cx+0.5,cy+0.5,cz+0.2> texture{tx_plastico}}
                box{<cx-0.5,cy-0.4,cz+0.2>,<cx+0.5,cy-0.5,cz+0.6> texture{tx_plastico}}

                #if(rand(roleta) < 0.3)
                        object{torcedor(cx,cy,cz,0.89,0,0)}
                #else
                  #if(rand(roleta) < 0.66)
                        object{torcedor(cx,cy,cz,0,0,0.85)}
                  #end
                #end

        }

#end

#macro escada(cx,cy,cz,tam,degraus)
        union{
                #declare loop = degraus-1;

                #while(loop != -1)
                        box{<cx - tam,cy-0.5*loop,cz>,<cx+tam,cy-0.5-0.5*loop,cz+0.5+0.5*loop> texture{tx_fosca}}

                        #declare loop = loop - 1;
                #end

        }
#end

#macro secao(cx,cy,cz,fileiras,cadeiras)
        union{
                #declare loop = fileiras-1;

                #while(loop != -1)
                        box{<cx - (cadeiras/2)*1.1,cy-1.2*loop,cz>,<cx+(cadeiras/2)*1.1,cy-1.2-1.2*loop,cz+1+1*loop> texture{tx_fosca}}
                        #declare loop2 = cadeiras-1;
                                #while(loop2 != -1)
                                        cadeira(cx-(cadeiras/2)*1.1+0.5+1.1*loop2,cy-1.2*loop-0.7,cz+1+1*loop,0,0,0)

                                        #declare loop2 = loop2 - 1;
                                #end
                        #declare loop = loop - 1;
                #end

        }
#end

#macro torcedor(cx,cy,cz,re,gr,bl)
        union{
        cone{<cx,cy,cz+0.2> 0.4,<cx,cy,cz+0.6>0 texture{pigment{color rgb<re,gr,bl>} finish{diffuse 0.9 ambient 0.7}}}
        sphere{<cx,cy,cz+0.76>0.16 texture{pigment{color rgb<0.921,0.78,0.619>}}}
        }
#end

#include "eixos.inc"

union{
  object{ eixos(3.00) }
  object{campo}
  object{secao(-40.1,-21,0,5,18)}
  object{escada(-28,-21,0,2.2,10)}
  object{secao(-18.1,-21,0,5,14)}
  object{escada(-8,-22,0,2.4,22)}
  object{secao(21.9,-21,0,10,50)}
        object{jogador2 translate<41,14,0>}
        object{jogador2 translate<32,-3,0>}
        object{jogador2 translate<-21,-7,0>}
        object{jogador2 translate<-44,1,0>}
        object{jogador2 translate<5,4,0>}
        object{jogador2 translate<6,13,0>}
        object{jogador2 translate<4,10,0>}
        object{jogador2 translate<6,7,0>}
        object{jogador2 translate<1,5,0>}
        object{jogador2 translate<10,4,0>}
        object{jogador2 translate<-6,7,0>}
        object{jogador1 translate<43,16,0>}
        object{jogador1 translate<31,-1,0>}
        object{jogador1 translate<-40,2,0>}
        object{jogador1 translate<-14,8,0>}
        object{jogador1 translate<5,7,0>}
        object{jogador1 translate<4,13,0>}
        object{jogador1 translate<6,10,0>}
        object{jogador1 translate<7,12,0>}
        object{jogador1 translate<0,0,0>}
        object{jogador1 translate<47,-2,0>}
        object{jogador1 translate<-2,3,0>}

        union{
          object{secao(-40.1,-21,0,5,18)}
          object{escada(-28,-21,0,2.2,10)}
          object{secao(-18.1,-21,0,5,14)}
          object{escada(-8,-22,0,2.4,22)}
          object{secao(21.9,-21,0,10,50)}
          scale<1,-1,1>
        }

}

#include "camlight.inc"
#declare centro_cena = < 0.00, 0.00, 0.00 >;
#declare raio_cena = 50.0;
#declare dir_camera = < 80.01, 20.01,20.00 >;
#declare dist_camera = 100.0;
#declare intens_luz = 1.00;
camlight(centro_cena, raio_cena, dir_camera, dist_camera , z, intens_luz)