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