Malice #1 why not try a test with something like the following...Pivot=CreatePivot()Dim Cubes(10)For f=1 to 10Cubes(f)=CreateCube(Pivot)NextFreeEntity Pivot