(c) Bengt and JEFA from Transmission Productions Special Thanks To : Krysse "->" is the STO>-button Prgm1:CFK :Disp "" :Disp "DEGREE CONVERTER" :Disp " BY" :Disp "" :Disp " BENGT AND JEFA" :Pause :Lbl A :Clrhome :Disp "1. C->F" :Disp "2. C->K" :Disp "3. F->C" :Disp "4. F->K" :Disp "5. K->C" :Disp "6. K->F" :Disp "7. EXIT" :Input A :ClrHome :If A=1 :Goto C :If A=2 :Goto D :If A=3 :Goto E :If A=4 :Goto F :If A=5 :Goto G :If A=6 :Goto H :If A=7 :End :Goto A :Lbl C :Disp "CELSIUS ?" :Input C :1.8C+32->F :Disp "F=" :Disp F :Pause :Goto A :Lbl D :Disp "CELSIUS ?" :Input C :C+273.15->K :Disp "K=" :Disp K :Pause :Goto A :Lbl E :Disp "FAHRENHEIT ?" :Input F :(F-32)/1.8->C :Disp "C=" :Disp C :Pause :Goto A :Lbl F :Disp "FAHRENHEIT ?" :Input F :((F-32)/1.8)+273.15->K :Disp "K=" :Disp K :Pause :Goto A :Lbl G :Disp "KELVIN ?" :Input K :K-273.15->C :Disp "C=" :Disp C :Pause :Goto A :Lbl H :Disp "KELVIN ?" :Input K :(K-273.15)*1.8+32->F :Disp "F=" :Disp F :Pause :Goto A End of file...