proto flagpost
PROTO FlagPost [
exposedField SFVec3f translation 0 0 0
exposedField SFRotation rotation 0 1 0 0]
{
Transform { translation IS translation
rotation IS rotation
children [
Transform {
translation 0 1 0
children [
Shape {
appearance Appearance {material Material {diffuseColor 0.9 0.9 0.2
emissiveColor .9 .9 .2}}
geometry Cylinder {height 2 radius .1}
} ] }# end of pole
Transform {
translation 0.25 1.75 0
children [
Shape {
appearance Appearance {material Material {diffuseColor 1 0 0
emissiveColor 1 0 0}}
geometry Box {size .5 .5 .05}
} ] }# end of flag
]}} # end of proto flagpost