Oups !
I sent the wrong script... please correct:
command drawellipse x,y,alpha,laloc
repeat with i = 0 to 91
put round (x*sin(4*i*pi/180)), round(y*cos(4*i*pi/180)) into line
i of thepoints
end repeat
set the points of graphic "Ellipse" to thepoints
revrotatepoly the name of graphic "ellipse",alpha
set the loc of graphic "Ellipse" to laloc
end drawellipse
... and x and y are half width and half height.
I was a bit rash... sorry
Jacques
******************************************
Prof. Jacques Hausser
Department of Ecology and Evolution
Biophore / Sorge
University of Lausanne
CH 1015 Lausanne
please use my private address:
6 route de Burtigny
CH-1269 Bassins
tel/fax: ++ 41 22 366 19 40
mobile: ++ 41 79 757 05 24
E-Mail: jacques.haus...@unil.ch
*******************************************
_______________________________________________
use-revolution mailing list
use-revolution@lists.runrev.com
Please visit this url to subscribe, unsubscribe and manage your subscription
preferences:
http://lists.runrev.com/mailman/listinfo/use-revolution