Agilent Technologies 87075C Option H08 User's And Service Manual page 37

1550
1560
1570
1580
1590
1600
1610
1620
1630
1640
1650
parameter;"""&Switched_port$&""""
1660
1670
1680
1690
1700
1710
1720
1730
1740
1750
1760
1770
1780
port
1790
1800
1810 SUBEND
Chapter 2
Switch_code$="20"
CASE "6","PORT 6"
Switch_code$="21"
CASE "7","PORT 7"
Switch_code$="22"
CASE "8","PORT 8"
Switch_code$="23"
CASE "0","TERMINATE","RESET"
Switch_code$="28"
CASE ELSE
DISP "Unrecognized Switched_port$
WAIT 2
END SELECT
CASE ELSE
DISP "Unrecognized Main_port$ parameter;"""&Main_port$&""""
WAIT 2
END SELECT
!
IF Controller$="H" THEN
OUTPUT Addr;CHR$(VAL(Switch_code$));
ELSE
Output_cmd$=VAL$(VAL(Switch_code$))
OUTPUT Addr;"PARALGPIO;"
OUTPUT Addr;"PARAOUT"&Output_cmd$&";" ! Sent via Centronics
END IF
WAIT .1
Controlling the Test Set and Making Measurements
Calibrating the Test System
! Sent via GPIB
35