Hello all,

was wondering if anyone has any suggestions on how I could merge 2
point lists so that the resulting pointlist would be a "weave" of
both.  What I have is a sphere, its surface points, and vectors from
the center of the sphere out to the sphere's surface points, and
beyond.  I cull every other surface point, and cull every other offset
surface point.  I want to make a spiky surface.  I understand how to
make a surface from points, but I need to merge my two point lists.
Here is what I need to do with the data:

Point List A:

A(0),A(1), A(2), A(3)...A(n)

Point List B:

B(0),B(1), B(2), B(3)...B(n)

Merged Point List:

A(0), B(0), A(1), B(1), A(2), B(2)...A(n), B(n)

What would I do to script it...

something like

(pseudo)
Dim arrA, arrB, arrRes
Dim i, cnt

arrA = Surface A Points
arrB = Surface B Points

ReDim arrRes(UBOUND(arrA)+UBOUND(arrB))

cnt = 0

For i = 0 to UBOUND(arrA)

     arrRes(cnt) = arrA(i)

     cnt = cnt+1

     arrRes(cnt) = arrB(i)

     cnt = cnt+1

Next


Any ideas?

Reply via email to