Degree of Conversion

Gallery

Source Code

   5 REM CONVERSION PROGRAM
  10 RAND 
  20 PRINT "     A DEGREE OF CONVERSION"
  30 LET K=10*RND
  40 FOR S=1 TO 32
  50 PRINT CHR$ (K+128);
  60 NEXT S
  70 PRINT AT 5,0;"WHAT IS THE LOWEST TEMP,(F)YOU"
 120 PRINT "WANT TO CONVERT?"
 130 INPUT A
 140 PRINT ,"AND HIGHEST?"
 150 INPUT B
 160 IF B<A THEN LET E=A
 170 IF A<B THEN LET F=A
 180 IF B<A THEN LET F=B
 190 IF A<B THEN LET E=B
 200 PRINT "IN WHAT DEGREE STEPS?"
 210 INPUT Z
 220 CLS 
 230 PRINT TAB 8;"F","C";TAB 24;"K"
 250 LET H=10*RND
 260 FOR U=1 TO 21
 270 PRINT CHR$ (H+128);
 280 NEXT U
 290 PRINT 
 300 FOR D=F TO E+Z STEP Z
 310 LET C=5*(D-32)/9
 320 LET K=C+273
 330 PRINT TAB 8;D,C;TAB 24;K
 350 NEXT D
 357 SAVE "1005%0"
 360 RUN