//以下為TL1的程式部分
/*========================================*
 *    Home page Tl1                       *
 *========================================*/
#include color.bc
studio  {
        from  0 -100 -5
        at 0 25 -1
        up 0 0 1
        angle 50
        res 640 480
        antialias adaptive
        threshold 2
        aspect 1.33333
        background {
                    greys.map
                   }
        ambient .1 .1 .1
        no_shadows
        }
light {
       type point
       falloff 0
       position -50 -200 150
       color white
      }

light   {
        type spot
        position -5 -15 15
        at 0 -5 6
        min_angle 0
        max_angle 10
        color 25 25 25
        falloff 1
        }

//========== Background Plane ============

surf    {
         diff
             { image wood.img
               position -60 80 50
               across  1 0 0
               normal 0 -1 0
               scale 120
              }
        }
ring    {
        center 0 10 0
        normal 0 -1 0
        radius 2000
        }

//=========== 4 Balls ====================
surf {
        transparent 1 .7 .7
        specular .5 .1 .1
        ior 1.2
        shine 100 white
      }

sphere { center 0 -7 0 radius 6 }

surf {
        diff steel_blue
        spec .5 .5 .5
        shine 30
}

cone { apex 0 -7 0 apex_radius 4 base 0 -7 -14 base_radius 0  }
cone { apex 0 -7 0 apex_radius 4 base -14 -7 0 base_radius 0  }
cone { apex 0 -7 0 apex_radius 4 base 14 -7 0 base_radius 0  }
cone { apex 0 -7 0 apex_radius 4 base 0 -7 14 base_radius 0  }

surf {
        diff steel_blue
        spec 1 1 0
        shine 30
}
cone { apex 0 -7 0 apex_radius 4 base 10 -7 10 base_radius 0  }
cone { apex 0 -7 0 apex_radius 4 base 10 -7 -10 base_radius 0  }
cone { apex 0 -7 0 apex_radius 4 base -10 -7 -10 base_radius 0  }
cone { apex 0 -7 0 apex_radius 4 base -10 -7 10 base_radius 0  }

//====== Transforms ( *.BO ) ===================
// Bump Brass Metal
surface {
        bump {
                turbulence {
                        scale .5 .5 .5
                        amp .5
                        terms 2
                }
        }
        amb 0.035 0.0325 0.025
        diffuse 0.5 0.45 0.35
        spec 0.24 0.24 0.24
        shine 3
}
transform { scale 1.2 }
transform { rotate 0 0 0 }
transform { translate -32 0 20 }
#include tnobj.bo
transform_pop
transform_pop
transform_pop

// Red bump surface
surface {
           bump {
                 turbulence {
                       scale .25 .25 .25
                       amp .5
                       terms 3
                       }
                 }
        amb 0.035 0.0325 0.025
        diffuse 0.85 0.45 0.5
        spec 0.75 0.2 0.2
        shine 3
        }
transform { scale 1.25 }
transform { rotate 0 0 0}
transform { translate -25 -10 -10 }
#include them.bo
transform_pop
transform_pop
transform_pop

//  Bump blue surface
surface {
            bump {
                  turbulence {
                        scale .25 .25 .25
                        amp .5
                        terms 5
                        }
                  }
            amb 0.035 0.0325 0.025
            diffuse 0.5 0.45 0.85
            spec 0.2 0.2 0.75
            shine 3
          }
transform { scale .75 .86 .86 }
transform { rotate 0 0 0}
transform { translate -47 -5 -36 }
#include dir.bo
transform_pop
transform_pop
transform_pop
//==============================================