Moving one of 200 cubes?

The forum is locked. These are the original blitzbasic.com forums, kept so they can still be read. No new topics, replies or edits can be made here. To join in, head over to the Blitz3D+ forums.

stayne

I think brackets should be used here (arrays)? Something like (not at Blitz atm, this will probably fail miserably and is more than likely inefficient)...

Graphics3D 800,600,32,2
SetBuffer BackBuffer()

Type Cube
  Field Cube_Mesh[200]
End Type

Create_Cube()

;Main Loop
While Not KeyHit(1)
  TurnEntity a\Cube_Mesh[3],0,2,0
  TurnEntity a\Cube_Mesh[27],0,4,0
  TurnEntity a\Cube_Mesh[150],0,0,2
  RenderWorld()
  Flip
Wend
End
;End Main Loop

Function Create_Cube()
  MasterCube = CreateCube()
  CubeCopy = CopyEntity MasterCube
  pos = 1
    For i = 0 to 199
      a.Cube = New Cube
      a\Cube_Mesh[i]=CubeCopy
      PositionEntity a\Cube_Mesh[i],10,0,pos*5
      pos = pos + 1
    Next
  HideEntity MasterCube
End Function