comp.lang.idl-pvwave archive
Messages from Usenet group comp.lang.idl-pvwave, compiled by Paulo Penteado

Home » Public Forums » archive » Re: a polygon version of polyline..
Show: Today's Messages :: Show Polls :: Message Navigator
E-mail to friend 
Return to the default flat view Create a new topic Submit Reply
Re: a polygon version of polyline.. [message #41333 is a reply to message #41290] Thu, 07 October 2004 20:50 Go to previous message
rdsheu is currently offline  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
[Message index]
 
Read Message
Read Message
Read Message
Read Message
Read Message
Read Message
Read Message
Previous Topic: Re: Disable Virtual Machine
Next Topic: uniform expansion

-=] Back to Top [=-
[ Syndicate this forum (XML) ] [ RSS ] [ PDF ]

Current Time: Fri Oct 10 12:50:33 PDT 2025

Total time taken to generate the page: 0.95802 seconds