Metropoli BBS
VIEWER: streetlight.vxr MODE: TEXT (ASCII)
#VRML V1.0 ascii

# This file defines a simple street light

#PARAMETERS {
	#	fields [SFVec3f centerLOD, SFFloat streetLightHeight, SFFloat streetLightArmLength ]
	#	centerLOD 0 0 0
	#	streetLightHeight 20'ft
	#	streetLightArmLength 2'ft
	#
	#	INCLUDE StreetLight.vxr
#}

DEF streetLight LOD {
	range [ 200'ft, 600'ft ] # MFFloat
	center =centerLOD 
	
	DEF highDetail Separator {
		Separator {
			Translation {
				translation 0 (base:height)/2 0
			}
			
			DEF base Cylinder {
				parts ALL
				radius 10'in
				height 10'in
			}
		}
	
		Separator {
			Translation {
				translation 0 base:height+(pole:height/2) 0
			}
		
			DEF pole Cylinder {
				parts ALL
				radius 3'in
				height streetLightHeight-base:height 
			}
		}
			
		Separator 	{	
			
			Transform 	{
				# Put the arm just below the top of the pole
				translation arm:height/2 base:height+pole:height-arm:radius 0
					
				# rotate the cylinder from it's vertial position to a horzonial position on the x-axis
				rotation =rotate(0,1,0,1,0,0)
			}
								
			DEF arm Cylinder {
				parts ALL
				radius 3'in
				height streetLightArmLength 
			}
		}
				
		Separator {	
			DEF lightLocation Translation {
				translation streetLightArmLength streetLightHeight-light:radius 0
			}
					
			Material {
				emissiveColor .9 .9 .9	
			}
						
			DEF light Sphere {
				radius 9'in
			}
					
		}
	}
		
	DEF medDetail Separator {
		Separator {						
			Translation {
				translation streetLightArmLength streetLightHeight-light:radius 0
			}

			Material {
				emissiveColor .9 .9 .9	
			}
						
			DEF light Sphere {
				radius 9'in
			}
		}
	}
}
[ RETURN TO DIRECTORY ]