100 REM 110 REM 12555B DIGITAL-TO-ANALOG CONVERTER 120 REM LISTING: A-09601-18019-2 130 REM ERS: A-09601-18019-1 140 REM SOURCE: 09601-18019 150 REM 160 REM M. SCHOENDORF 9/12/74 170 REM 180 PRINT 190 PRINT "12555B DIGITAL-TO-ANALOG CONVERTER VERIFICATION" 200 PRINT 210 PRINT "CHECK DUAL 8 BIT D TO A CONVERTER" 220 PRINT 230 PRINT "CONNECT DC VOLTMETER TO PIN 2 (HIGH) AND PIN" 240 PRINT "7 (LOW) ON THE 12555B CARD (CHANNEL 1)." 250 PRINT "SET VOLTAGE RANGE ON THE DC VOLTMETER TO 10 VOLTS" 260 PRINT 270 PRINT "TYPE GO TO CONTINUE" 280 PAUSE 290 PRINT "VERIFY THAT VOLTAGE ON CHANNEL 1 OF D TO A CARD" 300 PRINT "INCREASES APPROXIMATELY .04 VOLTS EVERY 1 SECOND." 310 DIM X[32],Y[32] 320 GOSUB 1000 330 PRINT 340 PRINT "CONNECT DC VOLTMETER TO PIN 23 (HIGH) AND PIN" 350 PRINT "7 (LOW) ON THE 12555B CARD (CHANNEL 2)." 360 PRINT 370 PRINT "TYPE GO TO CONTINUE" 380 PAUSE 390 GOSUB 1000 400 GOTO 1070 1000 FOR I=1 TO 32 1010 LET X[I]=I 1020 LET Y[I]=I 1030 GRAPH(1,X[I],Y[I]) 1040 WAIT 1000 1050 NEXT I 1060 RETURN 1070 END