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

Separator {
	# Options: ON OFF AUTO
	renderCulling AUTO
	
	OUTPUT_TO grid.wrl
	
	PerspectiveCamera { 
		position 5 5 20
		orientation =PointAt(5,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		
	}
}
[ RETURN TO DIRECTORY ]