MATHHELP
» >
»
» View previous topic :: View next topic  
As of right now MATHHELP is a semi functional auto mated formula chart. The Program was 100% done on my calc originally a weeks ago but I forgot to charge my Calc and it lost all its RAM. I decide to remake on Source Coder 3.
MATHHELP can find area, circumference, perimeter, surface area, and volume, as of now. I want to add more things such as slope and algebra related things, as well as a few physics equations.
I haven't worked all the bugs out seeing that I created it in an hour or so yesterday, Feel free to take apart the code and Edit it to you fittings. If you would help me with these bugs it would help a lot.
  • crashing after solving rectangular area
  • switching to surface area when finding area of a circle
  • any other small bugs
Sure, that sounds like it could be somewhat annoying. Do you happen to have the source code?
yes, thought i put a link in....

Code:
ClrHome
Output(4,6,"Formula Chart
Output(5,12,"By
Output(6,6,"Daniel Kelton
Pause
ClrHome
Lbl PP
Output(1,2,"Solve?
Output(4,2,"1.Perimeter
Output(5,2,"2.Circumfrence
Output(6,2,"3.Area
Output(7,2,"4.Surface Area
Output(8,2,"5.Volume
Lbl PA
getKey->K
If Ans:Goto PB
Goto PA
Lbl PB
If K=92:"Perm"->Str1
If K=93:"Cirm"->Str1
If K=94:"Area"->Str1
If K=82:"Surf"->Str1
If K=83:"Volu"->Str1
If K=92:Then
ClrHome
Prompt L,W
2L+2W->A
Disp "Perimeter is",A
Pause
End
If K=93:Then
ClrHome
Prompt R
3(pi)R->A
Disp "Circumfrence is",A
Pause
End
If K=94:Then
ClrHome
Lbl PO
Output(1,2,"Shape?
Output(4,2,"1.Rectangle
Output(5,2,"2.Triangle
Output(6,2,"3.Trapazoid
Output(7,2,"4.Circle
Lbl PC
getKey->K
If Ans:Goto PD
Goto PC
Lbl PD
If K=92:"Rect"->Str2
If K=93:"Tri"->Str2
If K=94:"Trap"->Str2
If K=82:"Cir"->Str2
If K=92:Then
ClrHome
Prompt L,W
LW->A
Disp "Area is",A
End
If K=93:Then
Prompt B,H
.5*B*H->A
Disp "Area is",A
End
If K=94:Then
ClrHome
Prompt A,B,H
.5(A+B)H->A
Disp "Area is",A
End
If K=82:Then
ClrHome
Prompt R
2piR^^2->A
Disp "Area is",A
End




If K=82:Then
ClrHome
Lbl PQ
Output(1,2,"Shape?
Output(4,2,"1.CubeT
Output(5,2,"2.PrismL
Output(6,2,"3.PrismT
Output(7,2,"4.PyraL
Output(8,2,"5.PyraT
Output(4,15,"6.CylinL
Output(5,15,"7.CylinT
Output(6,15,"8.ConeL
Output(7,15,"9.ConeT
Output(8,15,"0.Sphere
Lbl PE
getKey->K
If Ans:Goto PF
Goto PE
Lbl PF
If K=92:"Cube"->Str3
If K=93:"Prl"->Str3
If K=94:"PrT"->Str3
If K=82:"Pyl"->Str3
If K=83:"PyT"->Str3
If K=84:"Cyl"->Str3
If K=72:"CyT"->Str3
If K=73:"CoL"->Str3
If K=74:"CoT"->Str3
If K=102:"Shp"->Str3
If K=92:Then
ClrHome
Prompt S
S^6->A
Disp " Total Surface Area",A
End
If K=93:Then
ClrHome
Prompt P,H
PH->A
Disp "Lateral Surfare Area",A
End
If K=94:Then
ClrHome
Prompt P,H,B
.5(P)H+2B->A
Disp "Total Surface Area",A
End
If K=82
Prompt P,L
.5(L)P->A
Disp "Lateral Surface Area",A
End
If K=83:Then
Prompt P,L,B
.5(L)P+B->A
Disp "Total Surface Area",A
End
If K=84:Then
Prompt R,H
2(pi)RH->A
Disp "Lateral Surface Area",A
End
If K=72:Then
ClrHome
Prompt R,H
3(pi)RH+2(pi)R^2->A
Disp "Total Surface Area",A
End
If K=73:Then
ClrHome
Prompt R,L
(pi)RL->A
Disp "Lateral Surface Area",A
End
If K=74:Then
ClrHome
Prompt R,L
(pi)RL+(pi)R^2->A
Disp "Total Surface Area",A
End
If K=102:Then
ClrHome
Prompt R
4(pi)R^2->A
Disp "Total Surface Area",A
End
End
If K=83:Then
ClrHome
Lbl PS
Output(1,2,"Shape?
Output(4,2,"1.Prism or Cylin
Output(5,2,"2.Pyra or Cone
Output(6,2,"3.Shphere
Lbl PG
getKey->K
If Ans:Goto PH
Goto PG
Lbl PH
If K=92:"Rect"->Str4
If K=93:"Tri"->Str4
If K=94:"Trap"->Str4
If K=92:Then
ClrHome
Prompt B,H
BH->A
Disp "Volume is",A
End
If K=83:Then
ClrHome
Prompt B,H
(1/3)BH->A
Disp "Volume is",A
End
If K=84:Then
ClrHome
Prompt R
(4/3)(pi)R^3->A
Disp "Volume is",A
End
End


yell me about any additional bugs
In the future, please include code as short sections where you believe the bug may lie, inside code tags. People generally find downloading your programs in order to feed them into SourceCoder 3 and thence examine the code for bugs to be too much effort. Wink First of all, it looks like you need some experience with While and Repeat loops (do you have Programming the TI-83 Plus/TI-84 Plus to refer to chapter 4? You can (and should) convert code like this:

Code:
Lbl PA
getKey->K
If Ans:Goto PB
Goto PA
to
Code:
Repeat K
getKey->K
End
This will repeat the code between the Repeat and the End until K, in other words, until K holds a nonzero value because the user pressed a key.

Your bug with switching from area to surface area is because you have a getKey loop inside the conditional block for area, so you're overwriting the K variable. Perhaps instead compare against the string containing "Area"?
Thanks for the advice, first time I've decide to conjoin with people I can't physically see. Only been programming TI-Basic for a few weeks now. Thanks again for the helpful advice!
Haha, It Took Me A Few Months Before I Learned About getKey... Yeah...
"Prepare to be pummeled cheerfully, jauntily, and utterly one-sidedly!" -Nonon Jakuzure
  
Register to Join the Conversation
Have your own thoughts to add to this or any other topic? Want to ask a question, offer a suggestion, share your own programs and projects, upload a file to the file archives, get help with calculator and computer programming, or simply chat with like-minded coders and tech and calculator enthusiasts via the site-wide AJAX SAX widget? Registration for a free Cemetech account only takes a minute.

» Go to Registration page
MATHHELP
»
» View previous topic :: View next topic  
Page 1 of 1
» All times are UTC - 5 Hours
 
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum

 

Advertisement