NEW
100 REM VIN2VOLT.BAS, FOR THE
110 REM INDUSTROLOGIC, INC.
120 REM SBC-1. THIS PROGRAM
130 REM SHOWS HOW TO DISPLAY
140 REM THE ANALOG INPUT AS
150 REM A VOLTAGE USING ONLY
160 REM INTEGER VARIABLES
170 REM ---------------------
200 V=VIN1
210 REM VALUES 19 AND 61 COME
220 REM FROM DIVIDING THE +5
230 REM ACTUAL VALUE ON THIS
240 REM BOARD BY 255
250 REM 5/255=.01961 (1961)
260 A=V*19:B=V*61
270 C=B/100:D=A+C
280 E=D/1000:F=D-(E*1000)
290 PRINT E;".";F;
300 REM NEXT 2 LINES PROVIDE
310 REM 3 DECIMAL PLACES FOR
320 REM ALL VALUES IF DESIRED 
330 IF F<10 THEN PRINT "0";
340 IF F<100 THEN PRINT "0";
350 PRINT
360 GOTO 200
RUN