Re: a polygon version of polyline.. [message #41111] |
Fri, 01 October 2004 08:56  |
george
Messages: 22 Registered: August 1996
|
Junior Member |
|
|
Wow, Rick,
What can I say. I just downloaded your object - it is brilliant -
exactly what I'm after. Many thanks - that is all actually way beyond
the call of duty....
I will implement it into my magnetic field progam and then give you an
update. If I do some decent tidying and optimizing then I can
resubmit my code (though it must be said, tidying and optimizing are
not my Forte).
Anyhow, fun I will have - thanks again...
George.
>
>
> Have fun.
>
>
> -Rick
|
|
|
|
|
|
|
|
Re: a polygon version of polyline.. [message #41333 is a reply to message #41290] |
Thu, 07 October 2004 20:50  |
rdsheu
Messages: 3 Registered: September 2004
|
Junior Member |
|
|
Dear all,
I propose an alternative way(a little dirty..) for your information.
-_-||
Rendy
------------------------------------------------------------ ------
Pro tPipeline
; a test procedure for 3D pipeline (a dirty way)
NN = 20 ; color number
R = 0.50
thick0 = 5
t = findgen(361)*!DTOR*4.
x = R*cos(t)
y = R*sin(t)
z = -1 + findgen(361)/360.*2.
oLine1 = objarr(NN)
For i=0, NN-1 do $
oLine1[i] = obj_new('IDLgrPolyline', x, y, z, thick=1.+9./NN*i,
color=[255-I*10,20,20])
oLine2 = objarr(NN)
For i=0, NN-1 do $
oLine2[i] = obj_new('IDLgrPolyline', [0, 0], [0,0], [-1.5,1.5],
thick=1.+9./NN*i, color=[20,255-I*10,255-I*10])
oModel = obj_new('IDLgrModel')
oModel -> Add, oLine1
oModel -> Add, oLine2
xobjview, oModel
End
|
|
|