NEW
100 REM VIN2PCT.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 PERCENTAGE USING ONLY
160 REM INTEGER VARIABLES
170 REM ---------------------
200 V=VIN1
210 REM VALUES 39 AND 22 COME
220 REM FROM DIVIDING 100 / 256
230 REM 100/256=.3906 (3906)
240 A=V*39:B=V*06
250 C=B/10:D=A+C
260 REM ADJUST TO ALLOW GOING
270 REM ALL THE WAY TO 100
280 IF D>9920 THEN D=10000
290 E=D/100
300 PRINT E
310 GOTO 200
RUN