Agilent Technologies 4288A Programming Manual page 45

Preparation for Accurate Measurement (Executing Compensation)
1660 IF UPC$(Inp_char$)<>"Y" THEN Inp_start
1670 OFF ERROR
1680 SUBEND
Example 4-2 reads out data saved into a file by the program of Example 4-1 and recovers
the compensation state at the execution of Example 4-1.
The program of Example 4-2 is detailed below:
Line 70 Sets the GPIB address.
Line 90 Assings the filename from which the compensation state data is read
out (Cmp_data) to the File_name$ variable.
Line 120 Specifies the branch destination if an error occurs (for example, there
is no file whose name is File_name$) when reading out the data from
the file.
Lines 130 to 150 Reads out the cable length, frequency shift, OPEN compensation data,
SHORT compensation data, LOAD compensation data, LOAD
compensation standard definition value, and LOAD compensation
standard definition parameter from the File_name$ file and stores
them as the Cable, F_shift, Open, Shor, Load, Load_ref, and
Load_para$ variables, respectively.
Lines 180 to 230 Sets the cable length, frequency shift, and compensation standard
definition parameter to Cable, F_shift, and Load_para$, respectively,
and displays the setups.
Lines 250 to 390 For both 1 kHz and 1 MHz, sets the OPEN compensation data,
SHORT compensation data, LOAD compensation data, and LOAD
compensation standard definition value to Open, Short, Load, and
Load_ref, respectively, and displays the settings.
Lines 410 to 430 Turns ON the OPEN/SHORT/LOAD compensations individually.
Lines 460 to 500 The processing done if an error occurs while reading out the data from
the file.
Chapter 4
Executing OPEN/SHORT/LOAD Compensation
43