Roger, One caveat. This is a good exampe the caution one must exercise in using the Do.
Instead of: >> replace "sine" with "sin" in tTrigFunction >> replace "cosine" with "cos" in tTrigFunction >> replace "tangent" with "tan" in tTrigFunction Use: >> replace "cosine" with "cos" in tTrigFunction >> replace "sine" with "sin" in tTrigFunction >> replace "tangent" with "tan" in tTrigFunction If you replace "sine" with "sin" you also change "cosine" to "cosin" (There is a "sine" in "cosine") So reverse the order of these first two. Jim > ------------------------------ > > Message: 3 > Date: Mon, 10 Dec 2012 09:42:55 -0800 > From: Roger Guay <[email protected]> > To: How to use LiveCode <[email protected]> > Subject: Re: Capture the Trig Function from an Option Menu Button > Message-ID: <[email protected]> > Content-Type: text/plain; CHARSET=US-ASCII > > This script is amazingly fast! And so are you, having apparently produced it > in less than an hour!! My script appears to be slightly slower using a > switch/case structure. I'll test it out when I get a moment. > > Thanks very much, > Roger > > > On Dec 10, 2012, at 8:59 AM, Jim Hurley <[email protected]> wrote: > >> It turns out that Do is fast enough. Here is the Do script: >> (The script might read a litle better by using "x" in the repeat loop >> instead of "i".) >> >> on mouseUp >> put the label of btn "myOptionMenu" into tTrigFunction >> --It might be necessary to take care in using the following replacements >> replace "sine" with "sin" in tTrigFunction >> replace "cosine" with "cos" in tTrigFunction >> replace "tangent" with "tan" in tTrigFunction >> put round(the width of this card/2) into x0 >> put round(the height of this card/2) into y0 >> put 50 into Amp--Amplitude of the trig curve >> set the points of grc "myCurve" to empty >> wait 0 millisec -- Force a screen refresh on the Mac >> repeat with i = 1 to 360--maybe with a step of 2 or 4 >> put i*pi/180 into tAngle >> get "put the " & tTrigFunction & " of " & tAngle & " into y " >> do it >> put round(Amp*y) into y >> put i into x >> put x+ x0, y+y0 into tPoint >> put tPoint & cr after tPoints >> --Uncomment the following to see the curve evolve >> --set the points of grc "myCurve" to tPoints >> --wait 0 millisec >> end repeat >> set the points of grc "myCurve" to tPoints >> end mouseUp >> _______________________________________________ >> use-livecode mailing list >> [email protected] >> Please visit this url to subscribe, unsubscribe and manage your subscription >> preferences: >> http://lists.runrev.com/mailman/listinfo/use-livecode > > _______________________________________________ use-livecode mailing list [email protected] Please visit this url to subscribe, unsubscribe and manage your subscription preferences: http://lists.runrev.com/mailman/listinfo/use-livecode
