ival$ Example
10 CLEAR SCREEN
20 I=9999
30 PRINT TAB(5),"Convert ";I;"to:"
40 FOR X=1 TO 4
50 DATA 2,8,10,16
60 READ N
70 SELECT N
80 CASE 2
90 PRINT "Binary"
100 CASE 8
110 PRINT "Octal"
120 CASE 10
130 PRINT "Base ten."
140 CASE 16
150 PRINT "Hex."
160 END SELECT
170 PRINT TAB(5),IVAL$(I,N)
180 NEXT X
190 END
