325
Chapter 5, Advanced Operations
Passing Control
The following program would run in the External Controller:
10 COM /Hpib_names/ INTEGER Internal_hpib,Inst_address,Cntrl_state
20 COM /Cntrl_names/ Ext_cntrl_addrs,Int_cntrl_addrs
30 COM /Io_names/ INTEGER Printer_addrs,Pwr_suply_addrs
40 COM /Io_values/ REAL Meas_power,Prog_state$[80],Prog_name$[50]
50 COM /Reg_vals/ INTEGER Status_byte,Stdevnt_reg_val
60 !
70 Internal_hpib=7
80 Ext_cntrl_addrs=14
90 Int_cntrl_addrs=21
100 Printer_addrs=1
110 Pwr_suply_addrs=26
120 Inst_address=(Internal_hpib*100)+Ext_cntrl_addrs
130 Prog_name$="PASCTLEX:INTERNAL,4"
140 !
150 PRINTER IS CRT
160 !
170 ! Set the Controller up to respond to an SRQ from Test Set
180 ! The interrupt is generated by the Request Control bit in the Test Set
190 ON INTR Internal_hpib CALL Pass_control
200 ENABLE INTR Internal_hpib;2
210 !
220 ! Bring Test Set to known state.
230 OUTPUT Inst_address;"*RST"
240 !
250 ! Set the Test Set to cause SRQ interrupt on Request Control
260 OUTPUT Inst_address;"*CLS"
270 OUTPUT Inst_address;"*ESE 2"
280 OUTPUT Inst_address;"*SRE 32"
290 !
300 ! Load the desired program into the Test Set from Memory Card
305 OUTPUT Inst_address;"DISP TIB” ! Display the IBASIC screen
310 OUTPUT Inst_address;"PROG:EXEC 'DISP """&"Loading program."&"""'"
320 OUTPUT Inst_address;"PROG:EXEC 'GET """&Prog_name$&"""'"
330 OUTPUT Inst_address;"PROG:EXEC 'DISP """&""&"""'"
340 !
350 ! Run the program in the Test Set
360 OUTPUT Inst_address;"PROG:EXEC 'RUN'"
370 !
380 REPEAT
390 STATUS Internal_hpib,3;Cntrl_state
400 DISP "WAITING TO PASS CONTROL TO THE Test Set."
410 UNTIL NOT BIT(Cntrl_state,6)
420 !
430 REPEAT
Содержание 8921A
Страница 14: ...14 ...
Страница 17: ...Contents 17 3 HP IB Command Guidelines Sequential and Overlapped Commands 72 Guidelines for Operation 73 ...
Страница 24: ...Contents 24 9 Error Messages ...
Страница 25: ...Contents 25 Index 593 ...
Страница 26: ...Contents 26 ...
Страница 27: ...27 1 Using HP IB ...
Страница 58: ...58 Chapter 1 Using HP IB Remote Local Modes ...
Страница 59: ...59 2 Methods For Reading Measurement Results ...
Страница 71: ...71 3 HP IB Command Guidelines ...
Страница 94: ...94 Chapter 3 HP IB Command Guidelines Guidelines for Operation ...
Страница 95: ...95 4 HP IB Commands ...
Страница 100: ...100 Adjacent Channel Power ACP ...
Страница 150: ...150 Display DISPlay space TDMA test TESTs TFReq THLP TIBasic TMAKe TPARm TPRint TSEQn TSPec Returns current screen TX ...
Страница 173: ...173 System System SYSTem ERRor Returns integer value quoted string ...
Страница 236: ...236 Triggering Measurements ...
Страница 237: ...237 5 Advanced Operations ...
Страница 350: ...350 Chapter 6 Memory Cards Mass Storage Using Memory Cards Figure 20 Inserting a Memory Card ...
Страница 360: ...360 Chapter 6 Memory Cards Mass Storage Using External Disk Drives ...
Страница 361: ...361 7 IBASIC Controller ...
Страница 442: ...442 Chapter 7 IBASIC Controller The TESTS Subsystem ...
Страница 559: ...559 Chapter 8 Programming The Call Processing Subsystem Example Programs 11280 SUBEND 11290 ...
Страница 562: ...562 Chapter 8 Programming The Call Processing Subsystem Example Programs ...
Страница 563: ...563 9 Error Messages ...
Страница 592: ...592 ...