Transform {
  translation IS translation
  scale IS scale
  children [
  Shape  {
          geometry Sphere { radius 2 }
          appearance Appearance {
                  material DEF MATERIAL Material { #<l++>
                          diffuseColor 1 0 0
                          }
                  }
          } #<l++>
  
  DEF TOUCH TouchSensor { }
  DEF TIME TimeSensor { enabled FALSE loop TRUE } #<l++>