corner to middle

Blitz3D Forums/Blitz3D Programming/corner to middle

This is the easy, no-maths way. It's too late here to think numbers. :)

Graphics3D 800,600,16,1 
cam = CreateCamera() 
piv = CreatePivot() 
PositionEntity cam,0,3,0 
PointEntity cam,piv 
lig = CreateLight() 

s#=360.0/20.0
For r= 0 To 19 
	st= CreateCylinder(4) 
	ScaleEntity st,.16,.03,.16 
	PositionEntity st,Sin(r*s),0,Cos(r*s) 
	PointEntity st,piv
Next 

While Not KeyHit (1) 
UpdateWorld() 
RenderWorld() 
Flip() 
Wend 
End