vr2-5-08.wrl


[ VRML source code ]

#VRML V2.0 utf8
#vr2-5-08.wrl
Group {
  children [
    Shape {
      geometry IndexedFaceSet {
        coord Coordinate {
          point [ 0 0 0, 1 0 0, 0.5 1 0 ]
        }
        normal DEF OrigNorm Normal {
          vector [ 0 0 1, 0 0 1, 0 0 1 ]
        }
        coordIndex  [ 0, 1, 2 ]
        normalIndex [ 0, 1, 2 ]
        normalPerVertex TRUE
      }
    },
    DEF Timer TimeSensor {
      cycleInterval 5
      loop TRUE
    },
    DEF Norm NormalInterpolator {
      key [ 0.0, 0.25, 0.5, 0.75, 1.0 ]
      keyValue [
      0 0 1, 0 0 1, 0 0 1,
      1 0 1, 1 0 1, 1 0 1,
      0 1 0, 0 1 0, 0 1 0,
      0 1 1, 0 1 1, 0 1 1,
      0 0 1, 0 0 1, 0 0 1
      ]
    }
  ]
}
ROUTE Timer.fraction_changed TO Norm.set_fraction
ROUTE Norm.value_changed TO OrigNorm.set_vector