Trig

Zdone

Sun, 01 Mar 2015 05:47:21 +0000

Yes, zone is the hex program that removes the done at the end of a program. I am aware of all the ways to remove that and found this to be my favorite. Also, if you looked, you would see I said to please ignore sub-programs.

(no title)

Sat, 28 Feb 2015 16:53:56 +0000

Wait… what's ZDONE?

Is that the program that removes the done?

You could just do this:

Output(1,1,"") \\Empty string

Or perhaps this (if you want it to end on the graph screen)

Text(X,Y," ") \\X and Y put the space where it won't be noticed.

Re: Trig

Mon, 02 Feb 2015 06:33:09 +0000

Thanks for the suggestions

Re: Trig

Mon, 02 Feb 2015 01:44:36 +0000

Also, I don't see why you are storing stuff to variables when they can be calculated directly from the output command…

Re: Trig

Mon, 02 Feb 2015 01:41:00 +0000

Yes, you use "theta=" so much that it would be better to do "theta=->Str1 and then replace "theta=" with Str1 eveywhere.

Re: Trig

Mon, 02 Feb 2015 00:03:58 +0000

Ok, that save a few bytes. Any other optimizations?

Re: Trig

Sun, 01 Feb 2015 23:21:55 +0000

A/cos(B)->D ClrHome Output(1,1,"Opp=" Output(1,5,C) Output(2,1,"Hyp=" Output(2,5,D)

can become

A/cos(B ClrHome Output(1,1,"Opp= Output(1,5,C Output(2,1,"Hyp= Output(2,5,Ans

Re: Trig

Fri, 30 Jan 2015 02:24:51 +0000

you can drop the ending ) and "

Trig

Fri, 30 Jan 2015 02:12:18 +0000

Along with the kinematics one, can you please optimize this for size;Again, don't worry about sub programs.

Lbl R Degree ClrHome Menu("Have?","Opp/Hyp",1,"Adj/Hyp",2,"Opp/Adj",3,"Side+theta",S,"Exit?",4 Lbl 1 ClrHome Input "Opp:",O Input "Hyp:",H sin^-1(O/H)->A ClrHome Output(1,1,"theta=" Output(1,3,A) Pause ClrHome Goto X Lbl 2 ClrHome Input "Adj:",A Input "Hyp:",H cos^-1(A/H)->B ClrHome Output(1,1,"theta=" Output(1,3,B Pause ClrHome Goto X Lbl 3 ClrHome Input "Opp:",O Input "Adj:",A tan^-1(O/A)->B ClrHome Output(1,1,"theta=" Output(1,3,B) Pause ClrHome Goto R Lbl 5 ClrHome Asm(prgmZDONE Return Lbl S ClrHome Menu("Have?","Opp",O,"Adj",A,"Hyp",H,"Exit?",4 Lbl O ClrHome Input "theta:",A Input "Opp:",B B/sin(A)->C B/tan(A)->D ClrHome Output(1,1,"Hyp=" Output(1,5,C) Output(2,1,"Adj=" Output(2,5,D) Pause ClrHome Goto R Lbl A ClrHome Input "theta:",B Input "Adj:",A Atan(B)->C A/cos(B)->D ClrHome Output(1,1,"Opp=" Output(1,5,C) Output(2,1,"Hyp=" Output(2,5,D) Pause ClrHome Goto R Lbl H ClrHome Input "theta:",A Input "Hyp:",G Gsin(A)->B Gcos(A)->C ClrHome Output(1,1,"Opp=" Output(1,5,B) Output(2,1,"Adj=" Output(2,5,C) Pause Goto R Lbl 4 ClrHome Asm(prgmZDONE) Return