comp.lang.idl-pvwave archive: archive

Home » Public Forums » archive » Write Text

Show: Today's Messages :: Show Polls :: Message Navigator
E-mail to friend

Re: Write Text [message #8383 is a reply to message #8378]

Fri, 28 February 1997 00:00

davidf
Messages: 2866
Registered: September 1996

Senior Member

Stefan Schor <spion@dose.test.de> writes:

> is there someone who can tell me, how I can write a Text inside a
> circle ? (align to the border - so the text is distorted)
> (like Audio-CDs)

I don't have *any* time for this today... :-)

But it will look *something* like this:

*******************************
FUNCTION CIRCLE, xcenter, ycenter, radius
points = (2 * !PI / 119.0) * FINDGEN(120)
x = xcenter + radius * COS(points )
y = ycenter + radius * SIN(points )
retValue = TRANSPOSE([[x],[y]])
RETURN, retValue
END

points = Circle(100, 100, 50)
FOR j=0, 119, 10 DO $
XYOutS, points(0,j), points(1,j), String(j/10), $
/Device, Alignment=1.0, Orientation=30*j/10
END
****************************************

Cheers!

David

-----------------------------------------------------------
David Fanning, Ph.D.
Fanning Software Consulting
2642 Bradbury Court, Fort Collins, CO 80521
Phone: 970-221-0438 Fax: 970-221-4762
E-Mail: davidf@dfanning.com
Coyote's Guide to IDL Programming: http://www.dfanning.com
-----------------------------------------------------------

Report message to a moderator

[Message index]

		Write Text By: Stefan Schor on Fri, 28 February 1997 00:00
		Re: Write Text By: Tim Patterson on Fri, 28 February 1997 00:00
		Re: Write Text By: davidf on Fri, 28 February 1997 00:00

Previous Topic:	Printing array on one line
Next Topic:	3.0 help system

-=] Back to Top [=-

[ Syndicate this forum (XML) ] [

] [

]

Current Time: Thu Oct 09 22:33:26 PDT 2025

Total time taken to generate the page: 0.00193 seconds