|
We're glad you came by, but you might find what you're looking for elsewhere. TI-Basic Developer is not the site it once was. While its information on commands and other calculator features remains almost second-to-none, its forum, archives, and even hosting service, Wikidot, have been decaying for years. The calculator community would love to see what you're working on, or help you in your next coding adventure, but TI-Basic Developer is no longer the place to do it. Instead, you should head over to Cemetech (primarily American) or TI-Planet (primarily international). Both are active, well-established forums with their own archives, chatrooms, reference material, and abundant coding tools and resources. We'll see you there, we hope. |
Converts temperature to Fahrenheit, Celsius, or Kelvin.
A - the starting temperature value
None
A, B, C
TI-83/84/+/SE
Weregoose
URL: United TI
:Input A:0
:Menu(" Convert From ","F",0,"C",1,"K",2
:Lbl 2:Ans+1
:Lbl 1:Ans+1
:Lbl 0:Ans→B
:For(C,0,2
:A-273.15(2B>C+2
:If Bnot(C
:1.8Ans+32
:If Cnot(B
:5/9(Ans-32
:Disp sub("FCK",C+1,1),Ans+273.15(B+2<2C
:EndWith the temperature value stored in A, we ask the user to select which temperature format they want to convert it to — Fahrenheit, Celsius, or Kelvin — and then initialize the B variable to the appropriate value that matches up with the format associated with it (K is 2, C is 1, and F is 0).
We then use a For( loop to display what the respective temperature value would be in the other temperature formats, based on the respective temperature conversion formulas:
| Fahrenheit | Celsius | Kelvin | |
|---|---|---|---|
| Fahrenheit | (9C/5)+32 | 9(K-273.15)/5+32 | |
| Celsius | 5(F-32)/9 | K-273.15 | |
| Kelvin | 5(F-32)/9+273.15 | C+273.15 |
One thing you will probably notice is that the formulas aren't exactly the same in the code. The reason is because the code is designed to be optimized, and rather than displaying each temperature conversion by itself, you can simply add the respective formulas as modifiers and display all of the temperature conversions together.
.