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

Controlling the Test Set and Making Measurements
Calibrating the Test System
1180 SELECT UPC$(TRIM$(Main_port$))
1190 CASE "REFL","REFLECTION"
1200 SELECT UPC$(TRIM$(Switched_port$))
1210 CASE "1","PORT 1"
1220 Switch_code$="0"
1230 CASE "2","PORT 2"
1240 Switch_code$="1"
1250 CASE "3","PORT 3"
1260 Switch_code$="2"
1270 CASE "4","PORT 4"
1280 Switch_code$="3"
1290 CASE "5","PORT 5"
1300 Switch_code$="4"
1310 CASE "6","PORT 6"
1320 Switch_code$="5"
1330 CASE "7","PORT 7"
1340 Switch_code$="6"
1350 CASE "8","PORT 8"
1360 Switch_code$="7"
1370 CASE "0","TERMINATE","RESET"
1380 Switch_code$="13"
1390 CASE ELSE
1400 DISP "Unrecognized Switched_port$
parameter;"""&Switched_port$&""""
1410 WAIT 2
1420 END SELECT
1430 !
1440 CASE "TRANS","TRANSMISSION"
1450 SELECT UPC$(TRIM$(Switched_port$))
1460 CASE "1","PORT 1"
1470 Switch_code$="16"
1480 CASE "2","PORT 2"
1490 Switch_code$="17"
1500 CASE "3","PORT 3"
1510 Switch_code$="18"
1520 CASE "4","PORT 4"
1530 Switch_code$="19"
1540 CASE "5","PORT 5"
34 Chapter 2