Agilent Technologies 75000 Series Service Manual page 40

210 !---------- Perform test ----------
220 PRINT USING "11A,8X,11A";"Nominal (V)","Reading (V)"
230 PRINT
240 !
250 FOR I= 1 TO 5
260 Dac_v= (Nominal(I)/2.0)
270 GOSUB Measure
280 Result= PROUND(Rdg,-6)
290 PRINT USING "1X,SDD.4D,11X,SDD.5D";Nominal(I),Result
300 NEXT I
310 !
320 Quit: !
330 ASSIGN @Amp TO *
340 ASSIGN @Dmm TO *
350 STOP
360 !
370 Measure: !
380 !Measure output
390 OUTPUT @Amp;"VOLT:OFFS "&VAL$(Dac_v)
400 OUTPUT @Dmm;"TRIG SGL"
410 ENTER @Dmm;Rdg
420 RETURN
430 !
440 Data_nominal: !
450 DATA -20.0,-10.0,0.0,10.0,19.9992
460 END
Artisan Technology Group - Quality Instrumentation ... Guaranteed | (888) 88-SOURCE | www.artisantg.com
Verification Tests 2-21