Agilent Technologies 6625A User Manual
Page 96
Alignment Procedures
96
Alignment Program (continued)
530
! -1 is reverse polarity, this saves
540
! reversing leads as sink channel
550
! becomes the source for other channel
560 Chan=1
! Select channel to cal sink (-CC)
570 Other_chan=2
! Select current source channel
580 Get_data
! Call program with range data
590 Cal_sink(Irng_hi,1)
! Call program to cal high range sink
600 !
610 Chan=2
! Select channel to cal sink (-CC)
620 Other_chan=1
! Select current source channel
630 Get_data
! Call program with range data
640 Cal_sink(Irng_hi,-1)
! Call program to cal high range sink
650 !
660 IF No_of_outputs=4 THEN
! Cal outputs 3 & 4
670
Chan=3
! Select channel to cal sink (-CC)
680
Other_chan=4
! Select current source channel
690
Get_data
! Call program with range data
700
Cal_sink(Irng_lo,1)
! Call program to cal low range sink
710
!
720
Chan=4
! Select channel to cal sink (-CC)
730
Other_chan=3
! Select current source channel
740
Cal_sink(Irng_lo,-1)
! Call program to cal low range sink
750
!
760
Chan=3
! Select channel to cal sink (-CC)
770
Other_chan=4
! Select current source channel
780
Cal_sink(Irng_hi,1)
! Call program to cal high range sink
790
!
800
Chan=4
! Select channel to cal sink (-CC)
810
Other_chan=3
! Select current source channel
820
Cal_sink(Irng_hi,-1)
! Call program to cal high range sink
830 END IF
840
:
850 Check_error
! Call error checking program
860 Cal_mode_off
! Call program to turn cal mode off
870 !
880 END
890 !
900 !
910 !
920 SUB Clear_screen
! Subprogram to clear display
930
OUTPUT 2;CHR$(255)&CHR$(75);
! Clear screen
940 SUBEND
950 !
960 !
970 !
980 DEF FNDcv
! Function to r at voltage
990
COM /Vm/ @Vm
1000
OUTPUT @Vm;"DCV"
! Set DMM to read DC voltage
1010
TRIGGER @Vm
! Take a voltage reading
1020
ENTER @Vm;Volts
! Enter the voltage
1030
RETURN Volts
! Return voltage reading
1040 FNEND
! End of voltage function