oops, didn't put the -- on a couple of comments, but should be decipherable. DOH
On Thu, Jul 10, 2014 at 11:54 PM, Mike Bonner <bonnm...@gmail.com> wrote: > This is similar to walts, but doesn't handle angles. It sets the points > of a preexisting line grc. Just hated not to post it after figuring it > out, but stick with walts. > > Heres the quicky code anyway.. > > local sxOffset,syOffset,sSegments,sxradius,syRadius > constant totalRadians=6.283185 > on mouseUp > put 360 into sSegments -- segments desired > put 50 into sxRadius x radius > put 30 into syRadius y radius > put item 1 of the loc of this card into sxOffset -- just chooses the > center of the card as the center of the oval > put item 2 of the loc of this card into syOffset > put totalRadians / sSegments into tFactor -- the factor in radians > based on the number of segments desired > repeat with i = 1 to sSegments + 1 > put sxOffset + sxradius * cos(i*tFactor) & comma & syoffset + > syRadius * sin(i*tfactor) & cr after tpointslist > end repeat > delete the last char of tPointslist > set the points of grc "testgrc" to tPointslist > end mouseUp > > > On Thu, Jul 10, 2014 at 11:49 PM, Scott Morrow < > sc...@elementarysoftware.com> wrote: > >> Nice! >> >> — >> Scott Morrow >> >> On Jul 10, 2014, at 10:27 PM, Walt Brown <walter.h.br...@gmail.com> >> wrote: >> >> > Sorry, I wasn't aware that attachments didn't follow thru. See if this >> > works: >> > >> > https://www.dropbox.com/s/xxdfiuvzlblweoe/wbOvalOrbiter.zip >> > >> > >> > On Fri, Jul 11, 2014 at 1:15 AM, Richmond <richmondmathew...@gmail.com> >> > wrote: >> > >> >> On 11/07/14 04:08, Walt Brown wrote: >> >> >> >>> Here's a quickie stack I wrote after reading Richmond's email, which >> >>> creates a set of points in an oval and then sends a planet around. The >> >>> oval >> >>> can be set to width (k), height (h), and angle (theta). Written in >> 5.5.5. >> >>> Embedded in it is a stack script which contains the angled ellipse >> >>> calculation x = h + (a*cos(t) * cos(theta)) - (b*sin(t) * >> sin(theta)), y = >> >>> k + (a*cos(t) * sin(theta)) + (b*sin(t) * cos(theta)). Play. >> >>> >> >> >> >> Jolly nice; especially if we had the link to download the stack :/ >> >> >> >> Richmond. >> >> >> >> >> >> >> >> _______________________________________________ >> >> use-livecode mailing list >> >> use-livecode@lists.runrev.com >> >> Please visit this url to subscribe, unsubscribe and manage your >> >> subscription preferences: >> >> http://lists.runrev.com/mailman/listinfo/use-livecode >> >> >> > _______________________________________________ >> > use-livecode mailing list >> > use-livecode@lists.runrev.com >> > Please visit this url to subscribe, unsubscribe and manage your >> subscription preferences: >> > http://lists.runrev.com/mailman/listinfo/use-livecode >> >> >> _______________________________________________ >> use-livecode mailing list >> use-livecode@lists.runrev.com >> Please visit this url to subscribe, unsubscribe and manage your >> subscription preferences: >> http://lists.runrev.com/mailman/listinfo/use-livecode >> > > _______________________________________________ use-livecode mailing list use-livecode@lists.runrev.com Please visit this url to subscribe, unsubscribe and manage your subscription preferences: http://lists.runrev.com/mailman/listinfo/use-livecode
