Listing of file='29' on disk='vmedia/glbr_22.wvd.zip'
# Sector 385, program filename = '29' 0005 PRINT "INPUT KNOWN POINTS (X1,Y1,X2,Y2,CARRIAGE RETURN)" 0010 INPUT X1,Y1,X2,Y2 0015 PRINT 0020 PRINT "INPUT X-COORD. OF PT. TO BE INTERPOLATED. TO END " 0025 PRINT "PR0GRAM INPUT 99999." 0030 INPUT X 0035 IF X=99999 THEN 99 0040 PRINT "Y=";Y1+(Y2-Y1)/(X2-X1)*(X-X1) 0045 PRINT 0050 PRINT "X"; 0055 GOTO 30 0099 END