vr2-4-19.wrl


[ VRML source code ]

#VRML V2.0 utf8
#vr2-4-19.wrl
#Column
DEF Column Transform {
  children [
    Shape {
      appearance DEF ColColor Appearance {
        material Material {
          diffuseColor 0.5 0.5 0
        }
      }
      geometry Cylinder {
        radius 6
        height 100
      }
    }
    Transform {
      translation 0 50 0
      scale 1 0.5 1
      children DEF Ring Shape {
        appearance USE ColColor
        geometry Sphere {
          radius 10
        }
      }
    }
    Transform {
      translation 0 35 0
      scale 1 0.5 1
      children USE Ring
    }
    Transform {
      translation 0 20 0
      scale 1 0.5 1
      children USE Ring
    }
    Transform {
      translation 0 5 0
      scale 1 0.5 1
      children USE Ring
    }
    Transform {
      translation 0 -10 0
      scale 1 0.5 1
      children USE Ring
    }
    Transform {
      translation 0 -25 0
      scale 1 0.5 1
      children USE Ring
    }
    Transform {
      translation 0 -40 0
      scale 1 0.5 1
      children USE Ring
    }
    Transform {
      translation 0 -55 0
      scale 1 0.5 1
      children USE Ring
    }
  ]
}
#
Transform {
  translation 0 0 -50
  children USE Column
}
Transform {
  translation 0 0 -100
    children USE Column
}
Transform {
  translation 0 0 -150
  children USE Column
}
Transform {
  translation 50 0 -150
  children USE Column
}
Transform {
  translation 100 0 -150
  children USE Column
}
Transform {
  translation 150 0 -150
  children USE Column
}
Transform {
  translation 150 0 -100
  children USE Column
}
Transform {
  translation 150 0 -50
  children USE Column
}
Transform {
  translation 150 0 0
  children USE Column
}
#Base
Group {
  children [
    Transform {
      translation 75 -70 -75
      children Shape {
        appearance DEF BaseColor Appearance {
          material Material {
            diffuseColor 0.8 0.8 0
          }
        }
        geometry Cylinder {
          radius 140
          height 15
        }
      }
    }
    Transform {
      translation 75 -85 -75
      children Shape {
        appearance USE BaseColor
        geometry Cylinder {
          radius 170
          height 15
        }
      }
    }
    Transform {
      translation 75 -100 -75
      children Shape {
        appearance USE BaseColor
        geometry Cylinder {
          radius 190
          height 15
        }
      }
    }
  ]
}
#Tree
Group {
  children [
    Transform {
      translation 75 -115 -75
      children Shape {
        appearance DEF Green Appearance {
          material Material {
            diffuseColor 0 1 0
          }
        }
   	geometry Box {
          size 800 4 800
        }
      }
    }
    Transform {
      translation 425 -50 275
      children DEF Tree Transform {
        children [
          Shape {
            appearance USE Green
            geometry  Cone {
              bottomRadius 30
              height       100
            }
          }
          Transform {
            translation 0 -60 0
            children Shape {
              appearance USE Green
              geometry  Cylinder {
                radius 5
                height 20
              }
            }
          }
        ] 
      }
    }
    Transform {
      translation 425 -35 -425
      children USE Tree
    }
    Transform {
      translation -275 -35 -425
      children USE Tree
    }
    Transform {
      translation -275 -35 275
      children USE Tree
    }
  ]
}
#Loof
Group {
  children [
    Transform {
      translation 75 60 -75
      children Shape {
        appearance USE BaseColor
        geometry Cylinder {
          radius 130
          height 10
        }
      }
    }
    Transform {
      translation 75 70 -75
      children Shape {
        appearance USE BaseColor
        geometry Cylinder {
          radius 100
          height 10
        }
      }
    }
    Transform {
      translation 75 80 -75
      children Shape {
        appearance USE BaseColor
        geometry Cylinder {
          radius 80
          height 10
        }
      }
    }
    Transform {
      translation 75 90 -75
      children Shape {
        appearance USE BaseColor
        geometry Cylinder {
          radius 52
          height 10
        }
      }
    }
    Transform {
      translation 75 100 -75
      children Shape {
        appearance USE BaseColor
        geometry Cylinder {
          radius 26
          height 10
        }
      }
    }
    Transform {
      translation 75 110 -75
      children Shape {
        geometry Cylinder {
          radius 10
          height 10
        }
      }
    }
    Transform {
      translation 75 130 -75
      children Shape {
        geometry Cone {
          bottomRadius 10
          height       30
        }
      }
    }
  ]
}
#Stage
Group {
  children [
    Transform {
      translation 75 -50 -75
      children Shape {
        geometry Box {
          size 50 30 30
        }
      }
    }
    Transform {
      translation 75 -20 -75
      children Shape {
        appearance Appearance {
          material Material {
            diffuseColor 1 1 0
          }
        }
        geometry Sphere {
          radius 20
        }
      }
    }
  ]
}