Mini-formulas
Im not the best at optimization so here are a few segments of code for you guys.
First:
MV=M'V'
Menu("?","M,V,M'",M1,"M,V,V'",M2
Lbl M1
Prompt M,V
M->A
Prompt M
Disp AV/M
Pause
Return
Lbl M2
Prompt M,V
V->A
Prompt V
Disp MA/V
Pause
Return
Conversion table: Would like input to look like:
Temperature F,C,K:(Degrees Fahrenheit if known),(Celsius if known),(Kelvin if known)
Current Code:
Prompt F,C,K
If not(F and not(K //determine what data we have in these blocks
Then
//code for converting Celsius to Fahrenheit, i dont have time to type it out
//code for converting Celsius to Kelvin
//Display all answers
End
If not(C and not(K
Then
//Code for both conversions
//display answers
End
If not(F and not(C
Then
//Code for conversions
//display answers
End
Ohms Law. Want input to look like:
Input as V,I,R: (V if known, I if known, R if known)
Current code:
Lbl PJ
Prompt V,I,R
If not(V and I and R //these if statements determine which numbers to use
IR->A
If not(I and R and V
V/R->A
If not(R and I and V
V/I->A
If V and I and R //determine if it is a true/false answer
Then: (V=IR)->A
1->T //just a flag
End
If not(A and not(T //determine if there is enough data
Then: Disp "Not Enough Data!"
Else: Output(5,1,"Answer:"
Output(5,8,A
End
If not(A and not(T //prevent a memory leak in the above loop
Goto PJ
If T //check the flag
Then: If A: Output(5,8,"True" //read if it is true or false
If not(A: Output(5,8,"False
End
Pause
Return
Area of a sector:
Want input to be
Input (theta),Radius:(theta, radius)
Code:
Input "(Theta):",A
Input "Radius:",R
Disp(A/360)(πR²) //get the answer
Thanks for any help! I think using strings would be the easiest for these, but I am not sure. Im looking more for size than speed, but both are great. Thanks again guys. I love you here at TI|BD! Will add more comments soon!
-live the life because the life is good -vivir la vida, porque la vida es buena
-Vie la vie que la vie est bonne -quod est bonum vitae in vita
-lebe das Leben, weil das Leben ist gut -vivere la vita, perché la vita è buona
