Arrays, types, confusion...

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.

Stevie G

You can't retreive the color of the entity or it's alpha ( you can get the scale using tform ) so you need to store this yourself.

You could use and array of types and some custom functions to set and store the entity properties ..

Type CubeT
  field entity
  field r, g, b
  field alpha#
  field sx#, sy#, sz#
end type
dim Cubes.CubeT( 9 , 9 )

for y = 0 to 9
  for x = 0 to 9
    c.CubeT = new CubeT
    c\Entity = createcube()
    CUBEcolor( c , 255,128,64 )
    CUBEalpha( c , .75 )
    CUBEscale( c, 1, 2, 3 )
    positionentity c\Entity , x * 5 , y* 5, 0
    Cubes( x, y ) = c
  next
next

;=====================================
;=====================================
;=====================================

function CUBEcolor( c.cubeT, r, g, b )

  entitycolor c\Entity, r, g, b
  c\r = r
  c\g = g
  c\b = b

end function

;=====================================
;=====================================
;=====================================

function CUBEalpha( c.cubeT , alpha# )

  entityalpha c\Entity, alpha
  c\Alpha = Alpha

end function

;=====================================
;=====================================
;=====================================

function CUBEscale( c.cubeT , Sx#, Sy#, Sz# )

  scaleentity c\Entity, Sx, Sy , Sz
  c\Sx = Sx
  c\Sy = Sy
  c\Sz = Sz

end function

;=====================================
;=====================================
;=====================================