#@* displaybox
##<load file=web3d-navigate>

PROTO displaybox [
exposedField SFVec3f size 8 6 1
exposedField SFVec3f translation 0 0 -28
exposedField SFRotation rotation 0 0 1 0
exposedField SFVec3f scale 1 1 1
exposedField MFString url [ "@eye.gif" ]
exposedField MFString scene [ "@dlp.wrl" ]
exposedField SFInt32 show -1
exposedField SFInt32 shape 0
exposedField SFFloat alpha 0.4
exposedField SFNode node NULL
]{
Switch {
whichChoice IS show
choice [
Transform {
translation IS translation
rotation IS rotation
scale IS scale
children [
Switch {
whichChoice IS shape
choice [
Transform {
scale 2.5 2.5 2.5
children [
Shape {
geometry Box { size IS size }
appearance DEF APP Appearance {
   material Material {
	     transparency IS alpha 
	     }
   texture MovieTexture { url IS url }
   }
} ] }
## other things

Transform {
scale 3 3 3
children [
Shape {
geometry nsphere { }
appearance USE APP 
} ] } ## 1
Transform {
translation 0 0 0
##scale 0.3 0.5 1
children [
Shape {
geometry IS node
appearance USE APP 
} ]} ## 2
Transform {
children [
Transform {
translation 0 0 -1
children [
Shape { 
geometry Box { size IS size }
appearance USE APP
}
] }
Shape {
geometry IS node
##appearance USE APP 
} ]} ## 3
Transform {
children [
Transform {
scale 3 3 3
children [
Shape {
geometry nsphere { }
appearance USE APP 
} ] } 
Shape {
geometry IS node
##appearance USE APP 
} ]} ## 4
Layer3D {
depth -100
translation 0 0
size 1 1
viewpoint Viewpoint { position 0 0 10 }
navigationInfo NavigationInfo { headlight TRUE }
children [
Transform {
rotation IS rotation
translation IS translation
scale IS scale
children [
Inline { url IS scene }
]}
]
} ## 5

] } ## shape
] }
] } ## switch
}