100 REM 110 REM 3480D/3484A SUBSYSTEM RTE-B VERIFICATION TEST 120 REM LISTING: A-09601-18017-2 130 REM ERS: A-09601-18017-1 140 REM SOURCE: 09601-18017 150 REM 160 REM M. SCHOENDORF 170 REM 180 PRINT 190 PRINT "3480D/3484A SUBSYSTEM VERIFICATION" 200 PRINT 210 PRINT "CONNECT DC VOLTAGE SUPPLY SET AT" 220 PRINT "2 VOLTS TO INPUT OF 3484A" 230 PRINT 240 PRINT "CHECK MEASUREMENT SETUP CALL" 250 PRINT 260 PRINT "ENTER TRIGGER SOURCE (0=DSI CARD, 1=EXTERNAL PACER)" 270 PRINT "AND DMA TRANSFER (0=NO, 1=YES)" 290 PRINT 300 INPUT T,D 310 REM FUNCTION SET TO DC, RANGE 10 VOLTS AND FILTER OUT 320 DVMSU(1,10,0,T,D) 330 PRINT 340 PRINT "CHECK MEASUREMENT CALL" 350 PRINT 360 PRINT "ENTER NUMBER OF READINGS DESIRED (1-10)" 370 PRINT 380 INPUT N 390 DVMMV(N,A[1]) 400 FOR X=1 TO N 410 PRINT "DC VOLTAGE =";A[X] 430 NEXT X 440 END