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