Thanks for all the help, got what I wanted in the end..
Run the code and you'll see what I was after, only a framework at the mo, but I'll finish the rest tomorrow in work when I'm back at the office.
Graphics3D 800,600,32,1
SetBuffer BackBuffer()
Const NOF_SYMBOLS = 20;
pivot = CreatePivot()
For t# = 0 To 359 Step (360/NOF_SYMBOLS)
cone = CreateCube(pivot)
ScaleEntity(cone, 1,0.1,0.5)
PositionEntity cone,-3,Cos(t)*5,Sin(t)*5
RotateEntity cone,t,0,0
EntityColor(cone, 0,Rnd(50,255),0)
Next
For t# = 0 To 359 Step (360/NOF_SYMBOLS)
cone = CreateCube(pivot)
ScaleEntity(cone, 1.2,0.1,0.5)
PositionEntity cone,0,Cos(t)*5,Sin(t)*5
RotateEntity cone,t,0,0
EntityColor(cone, Rnd(50,255),0,0)
Next
For t# = 0 To 359 Step (360/NOF_SYMBOLS)
cone = CreateCube(pivot)
ScaleEntity(cone, 1,0.1,0.5)
PositionEntity cone,3,Cos(t)*5,Sin(t)*5
RotateEntity cone,t,0,0
EntityColor(cone, Rnd(0,50),Rnd(0,50),Rnd(50,255))
Next
camera = CreateCamera()
PositionEntity camera,0,0,-10
light = CreateLight()
RotateEntity light,45,45,0
angle# = (360/120)
While Not KeyHit(1)
Cls
RenderWorld
Flip
TurnEntity(pivot, -angle, 0, 0)
Wend
End
I have a 3Ds Max artist (lucky me) that will provide me with fruit symbols to replace the cubes.
This is the start of my 2nd project.
I've used Blitz to generate 2D gfx of 3D rendered scenes for an embedded system for a previous project, including Tokamak to simulate throwing dice.
The embedded system can only display BMP's (not rendered 3D) so I've written numerous applications in Blitz to capture the rendered output.
My first project (fruit machine) is currently selling well in Spain.
Maybe do a show case to show you all what I've been up to the last year.
Thanks again...
Still think one of the strengths of Blitz as a language is this forum.