Scott,
The tmpanel loaded and is very nicely designed, but the contents come up with a lot of html tags and the only live url is for the first demo. looks like some great stuff in here hiding among the tags.
Yours, Chris On Feb 22, 2004, at 12:28 PM, Scott Rossi wrote:
Chris,
This issue has been on the list before. The following script may be helpful. It will rotate an arbitrary set of graphic points through an arbitrary angle. A number of people contributed to it.
I have used a button name "Pivot", with a grab me handler, to use as the point of rotation.
On mouseUP --Rotate a polygon "myPoly" about a button "Pivot" by 45 degrees rotatePoly "myPoly",the loc of button "Pivot", 45 end mouseUP
On rotatePoly theGraphic, thePivot, theAngle put the points of graphic theGraphic into tPoints
put item 1 of thePivot into xPivot put item 2 of thePivot into yPivot
put empty into newPointList
--Set points relative to pivot repeat for each line tLine in tPoints
put (item 1 of tLine)- xPivot & "," & (item 2 of tLine)- yPivot & return after tRelPoints
end repeat
put sin(theAngle* pi/180) into S put cos(theAngle * pi/180) into C
--Rotate coordinate axes
repeat for each line tLine in tRelPoints
put round(C*(item 1 of tLine)+ S*(item 2 of tLine) + xPivot)& comma after rotPtlist
put round(-S*(item 1 of tLine) + C*(item 2 of tLine)+ yPivot)after rotPtlist
put return after rotPtList
end repeat
set the points of graphic theGraphic to rotPtlist
end rotatePoly
Jim _______________________________________________ use-revolution mailing list [EMAIL PROTECTED] http://lists.runrev.com/mailman/listinfo/use-revolution
