Technical data

User’s and Service Guide 27
87050A Option K22 Example Programs
170 Nwa_addr=716 ! 8720D GPIB ADDRESS (IF USED)
180 Ts_addr=712 ! option K22 GPIB ADDRESS (IF USED)
190 !
200 !
210 CLEAR SCREEN
220 PRINT USING "3/,K,/";"***** DEMONSTRATION PROGRAM FOR Multiport K22
MANUAL CONTROL *****"
230 PRINT "Either direct GPIB control to the K22 may be selected (H), or"
240 PRINT "indirect control via the Parallel Port (P) of the 8720D."
250 REPEAT
260 Answ$="P"
270 OUTPUT 2;Answ$&CHR$(255)&"H";
280 BEEP 300,.1
290 INPUT "Select desired test-set control. GPIB or Parallel Port? (Enter H
or P)",Answ$
300 Answ$=UPC$(Answ$[1,1])
310 UNTIL Answ$="P" OR Answ$="H"
320 Controller$=Answ$
330 !
340 ABORT 7
350 CLEAR SCREEN
360 IF Controller$="P" THEN
370 Addr=Nwa_addr ! Assign address to the analyzer
380 PRINT "Test set is being controlled via Parallel Port; 8720D GPIB address
=";Addr
390 ELSE
400 Addr=Ts_addr
410 CLEAR Addr
420 PRINT "Test set is being controlled directly via GPIB. GPIB address
=";Addr
430 END IF
440 Isc=Addr DIV 100 ! Interface Select Code
450 !
460 PRINT USING "/,K,/";RPT$("-",77)
470 PRINT "For manual operation of this switch box, enter FOUR numbers
separated by a"
480 PRINT "comma (,). The four numbers represent the A I/P port, Test port, B
I/P port"