Agilent Technologies E3632A manual Clear Screen Print TABXY10,7,BEGIN DAC Error Correction

Chapter 3 Calibration Procedures

Calibration Program

continued

370 !

380! Perform the DAC error correction, voltage calibration and OVP calibration.

390! Alert the operator to hook up the connection before calibrating.

400!

410! Alert operator to connect lead

420PRINT TABXY(10,10),"*********************************************************"

430PRINT TABXY(10,11)," Prepare for E3632A DAC DNL error correction and"

440PRINT TABXY(10,12)," Voltage/OVP calibration. Connect the output to the DMM."

450PRINT TABXY(10,13)," Observe Polarity!"

460PRINT TABXY(10,14),"*********************************************************"

470PRINT TABXY(10,16),"Press 'C' to Continue, 'I' to go to CURRENT calibration or"

480PRINT TABXY(10,17),"'X' to eXit, then press 'Enter'"

490	Ch$="C"	3
500	INPUT Ch$

510IF Ch$="X" OR Ch$="x" THEN GOTO 2250

520IF Ch$="I" OR Ch$="i" THEN

530CLEAR SCREEN

540GOTO 1460

550END IF

560CLEAR SCREEN

570PRINT TABXY(10,7),"BEGIN DAC ERROR CORRECTION"

580WAIT 4

590CLEAR SCREEN

600	OUTPUT @Pwrsupply;"OUTP ON"		! Turn on		Power Supply output
610	OUTPUT	@Pwrsupply;"CAL:DAC:ERROR"	!	Perform	DAC DNL error correction
620	WAIT 29		! Allow DAC error correction to finish
630	OUTPUT	@Pwrsupply;"OUTPUT OFF"	!	Turn off Power Supply output

640OUTPUT @Pwrsupply;"SYST:ERR?"

650ENTER @Pwrsupply;Error$

660!

670! Check to see if there is an error. If there is an error,

680! display the error and exit the program.

690!

700CLEAR SCREEN

710IF Error$="+0,""No error""" THEN

720PRINT "DAC DNL Error Correction completed for Power Supply "

730ELSE

740PRINT "ERROR:";Error$;"DAC DNL Error not corrected "

750BEEP

760GOTO 2250

770END IF

780PRINT TABXY(10,5),"DAC DNL ERROR CORRECTION COMPLETE"

790PRINT TABXY(10,7),"BEGIN VOLTAGE CALIBRATION"

800WAIT 4

810OUTPUT @Pwrsupply;"OUTPUT ON"

820CLEAR SCREEN

830	OUTPUT @Pwrsupply;"CAL:VOLT:LEV MIN"		! set output to minimum cal value
840	WAIT 2		! allow		output to settle
850	OUTPUT @Dmm;"MEAS:VOLT:DC?"		!	measure output with Dmm and
860	ENTER	@Dmm;Dmm_rdg	!	store	in variable Dmm_rdg
870	PRINT	Dmm_rdg

73