Agilent Technologies 6050A Video Games User Manual


 
Calibration 89
Program Listing for "B" Modules (continued)
530 OUTPUT @Ld;"*TRG"
540 IF Flag THEN WAIT 30
550 INPUT "Enter current through shunt for high point in amps",Trpt_curr
560 OUTPUT @Ld;"CAL:TLEV";Trpt_curr
570 OUTPUT @Ld;"TRAN OFF"
580 PRINT "Test unit to verify that transient values are in spec"
590 PRINT "Press CONT when ready to calibrate next range or mode"
600 PAUSE
610 SUBEND
620 !
630 SUB Cal_volt(@Ld,Chan,Volt_hipt,Volt_lopt)
640 PRINT "VOLTAGE CALIBRATION"
650 PRINT "Set power supply according to calibration information table"
660 PRINT "Press CONT when ready"
670 PAUSE
680 OUTPUT @Ld;"CHAN";Chan
690 OUTPUT @Ld;"MODE:VOLT"
700 OUTPUT @Ld;"VOLT";.05*Volt_hipt
710 WAIT 3
720 INPUT "Enter voltage across input terminals for low point in volts",Lopt_volts
730 OUTPUT @Ld;"CAL:LEV:LOW";Lopt_volts
740 OUTPUT @Ld;"CAL:MEAS:LOW";Lopt_volts
750 OUTPUT @Ld;"VOLT";.85*Volt_hipt
760 WAIT 3
770 INPUT "Enter voltage across input terminals for high point in volts", Hipt_volts
780 OUTPUT @Ld;"CAL:LEV:HIGH";Hipt_volts
790 OUTPUT @Ld;"CAL:MEAS:HIGH";Hipt_volts
800 OUTPUT @Ld;"VOLT";Volt_lopt
810 WAIT 3
820 INPUT "Enter voltage across input terminals for low point in volts",Lopt_volts
830 OUTPUT @Ld;"CAL:LEV:LOW";Lopt_volts
840 OUTPUT @Ld;"CAL:MEAS:LOW";Lopt_volts
850 OUTPUT @Ld;"VOLT";Volt_hipt
860 WAIT 3
870 INPUT "Enter voltage across input terminals for high point in volts", Hipt_volts
880 OUTPUT @Ld;"CAL:LEV:HIGH";Hipt_volts
890 OUTPUT @Ld;"CAL:MEAS:HIGH";Hipt_volts
900 PRINT "Test unit to verify that program and readback values are in spec"
910 PRINT "Press CONT when ready to calibrate transient level"
920 PAUSE
930 OUTPUT @Ld;"VOLT";Volt_lopt
940 OUTPUT @Ld;"TRAN:STAT ON;MODE TOGG;:TRIG:SOUR BUS"
950 OUTPUT @Ld;"VOLT:TLEV";Volt_hipt
960 OUTPUT @Ld;"*TRG"
970 INPUT "Enter voltage across input terminals for transient point in volts" ,Trpt_volts
980 OUTPUT @Ld;"CAL:TLEV";Trpt_volts
990 OUTPUT @Ld;"TRAN OFF"
1000 PRINT "test unit to verify that transient values are in spec"
1010 PRINT "Press CONT when ready to calibrate next mode"
1020 PAUSE
1030 SUBEND