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

Separator {
	# Options: ON OFF AUTO
	renderCulling AUTO
	
	OUTPUT_TO grid3D.wrl
	
	PerspectiveCamera {
		position 25 25 25
		orientation =PointAt(0,0,0)
		focalDistance 20
		heightAngle 45'deg
	}
	
	DEF BackgroundColor Info {
		string  ".1 .5 .7"
	}

	Material {
		diffuseColor =Color("white")
	}
	
	DEF gridDataXZ Coordinate3 {
		point [] # MFVec3f
	}
	
	DEF gridXZ IndexedLineSet {
		coordIndex [] # MFLong
	}
	
	LOOP {
		fields [ SFLong start, SFLong end, SFLong step, SFLong position ]
		start 0
		end 10+1
		step 1   
		
		APPEND gridDataXZ:point (0,0,position)
		APPEND gridDataXZ:point (10,0,position)
		APPEND gridDataXZ:point (position,0,0)
		APPEND gridDataXZ:point (position,0,10)

		APPEND gridXZ:coordIndex (position-start)*4
		APPEND gridXZ:coordIndex (position-start)*4+1
		APPEND gridXZ:coordIndex -1		
		APPEND gridXZ:coordIndex (position-start)*4+2
		APPEND gridXZ:coordIndex (position-start)*4+3
		APPEND gridXZ:coordIndex -1		
	}

	Material {
		diffuseColor =Color("white")
	}
	
	DEF gridDataXY Coordinate3 {
		point [] # MFVec3f
	}
	
	DEF gridXY IndexedLineSet {
		coordIndex [] # MFLong
	}
	
	LOOP {
		fields [ SFLong start, SFLong end, SFLong step, SFLong position ]
		start 0
		end 10+1
		step 1   
		
		APPEND gridDataXY:point (0,position,0)
		APPEND gridDataXY:point (10,position,0)
		APPEND gridDataXY:point (position,0,0)
		APPEND gridDataXY:point (position,10,0)

		APPEND gridXY:coordIndex (position-start)*4
		APPEND gridXY:coordIndex (position-start)*4+1
		APPEND gridXY:coordIndex -1		
		APPEND gridXY:coordIndex (position-start)*4+2
		APPEND gridXY:coordIndex (position-start)*4+3
		APPEND gridXY:coordIndex -1		
	}

	Material {
		diffuseColor =Color("white")
	}
	
	DEF gridDataYZ Coordinate3 {
		point [] # MFVec3f
	}
	
	DEF gridYZ IndexedLineSet {
		coordIndex [] # MFLong
	}
	
	LOOP {
		fields [ SFLong start, SFLong end, SFLong step, SFLong position ]
		start 0
		end 10+1
		step 1   
		
		APPEND gridDataYZ:point (0,position,0)
		APPEND gridDataYZ:point (0,position,10)
		APPEND gridDataYZ:point (0,0,position)
		APPEND gridDataYZ:point (0,10,position)

		APPEND gridYZ:coordIndex (position-start)*4
		APPEND gridYZ:coordIndex (position-start)*4+1
		APPEND gridYZ:coordIndex -1		
		APPEND gridYZ:coordIndex (position-start)*4+2
		APPEND gridYZ:coordIndex (position-start)*4+3
		APPEND gridYZ:coordIndex -1		
	}
}
[ RETURN TO DIRECTORY ]