#include "colors.inc"
#include "textures.inc"

camera {
    location <1, 10, -20>
    look_at 0
    angle 15
}

background { color rgb <1,1,1> }

light_source {
  <0, 25, -50>
  color rgb <1,1,1>
  spotlight
  radius 15
  falloff 20
  tightness 10
  point_at <0, 0, 0>
}

#declare base =
  superellipsoid {
    < 0.10, 0.10 >
    texture { Orange_Glass }
    scale < 2.00, 0.50, 2.00>
  }

#declare clipes =
  superellipsoid {
    < .5, .5 >
    texture { Orange_Glass }
    scale < 0.60, 0.60, 0.60>
    translate < -1.20, 0.00, 1.20 >
  }

#declare lapis =
  cylinder {
    < 0.70, 0, 1.20 >,
    < 0.70, 2, 1.20 >,
    0.10
    open
    texture { Dark_Green_Glass }
  }

#declare papel =
  box {
    < -1.80, 0.50, -1.80 >
    < 1.80, 0.90,  0.00 >
    pigment { White }
  }

#declare espiral =
    torus { .3, .04
      rotate -90*x
      rotate 80*y
      pigment { Yellow }
    }

#declare ponta_lapis =
  cone {
    < 0.70, 2.00, 1.20 >, 0.10
    < 0.70, 2.20, 1.20 >, 0.00
    open
    pigment { Yellow }
  }

union {
  object { lapis }
  object { lapis
    translate < 0.75, 0.00, 0.00 >  }
  object { lapis
    translate < - 0.75, 0.00, 0.00 > }
  object { ponta_lapis }
  object { ponta_lapis
    translate < 0.75, 0.00, 0.00 >  }
  object { ponta_lapis
    translate < - 0.75, 0.00, 0.00 > }
}
union {
  object { papel }
  object { espiral translate < -1.60, 0.80, 0.00 > }
  object { espiral translate < -1.40, 0.80, 0.00 > }
  object { espiral translate < -1.20, 0.80, 0.00 > }
  object { espiral translate < -1.00, 0.80, 0.00 > }
  object { espiral translate < -0.80, 0.80, 0.00 > }
  object { espiral translate < -0.60, 0.80, 0.00 > }
  object { espiral translate < -0.40, 0.80, 0.00 > }
  object { espiral translate < -0.20, 0.80, 0.00 > }
  object { espiral translate < 0.00, 0.80, 0.00 > }
  object { espiral translate < 1.60, 0.80, 0.00 > }
  object { espiral translate < 1.40, 0.80, 0.00 > }
  object { espiral translate < 1.20, 0.80, 0.00 > }
  object { espiral translate < 1.00, 0.80, 0.00 > }
  object { espiral translate < 0.80, 0.80, 0.00 > }
  object { espiral translate < 0.60, 0.80, 0.00 > }
  object { espiral translate < 0.40, 0.80, 0.00 > }
  object { espiral translate < 0.20, 0.80, 0.00 > }
  difference {
    object { base }
    object { clipes }
  }
}