\start83P\
\comment=Program file dated 04/10/96, 18:39
\protected=FALSE
\name=TEMPCONV
ClrHome
Menu("FROM","FAHRENHEIT",1,"CELSIUS",2,"KELVIN",3)
Lbl 1
Prompt F
5(F-32)/9\->\C
C+273.15\->\K
Goto 4
Lbl 2
Prompt C
C+273.15\->\K
9C/5+32\->\F
Goto 4
Lbl 3
Prompt K
K-273.15\->\C
9C/5+32\->\F
Lbl 4
ClrHome
Disp F,C,K
Output(1,1,"F\o\")
Output(2,1,"C\o\")
Output(3,1,"K")
Stop
COPYRIGHT STEPHEN OSTERMILLER 1996

\stop83P\