image of READY prompt

Wang2200.org

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