Listing of file='MONEX.BAS;01' on disk='vmedia/nsw_ug_1-sideB-sector.ccvf'
20 REM ********** CURRENCY CONVERSION PROGRAM ************ 30 REM *************** PROCESSING AREA ******************* 40 PRINT "ENTER EXCHANGE RATE,CURRENCY TYPE(I.E.,2.65,MARKS)" 50 INPUT R,T$ 60 PRINT "ENTER THE RANGE OF VALUES (IN $) TO PRINT (I.E.,5,10)" 70 PRINT 80 INPUT S,F 90 PRINT 100 PRINT 110 PRINT 120 PRINT "DOLLARS ";T$ 130 PRINT "------- ----------" 140 FOR I= STO F 150 PRINT I;TAB( 5);".......";I* R 160 NEXT I 170 REM ********** PROGRAM TERMINATION POINT ***************** 180 PRINT 190 PRINT 200 PRINT 210 GOTO 20