HP 8590 E & L Series Spectrum Analyzers and HP 8591C Cable TV ...

Program Example for the HP-IB Interface
10 !FILE: "IBPROG8"
20 !define 202 character string:
30 DIM Learn_string$[202]
40 !create 401-point array to store trace:
50 INTEGER Trace,a(l:401)
60 Analyzer=718
70 !set output format for two byte integers:
80 OUTPUT Analyzer;"TDF B;"
90 !ask spectrum analyzer for trace data:
100 OUTPUT Analyzer;"TRA?;"
110 !send trace to the computer:
120 ENTER Analyzer USING "t,W";Trace,a(*)
130 !get learnstring from spectrum analyzer:
140 OUTPUT Analyzer;"OL;"
150 ENTER Analyzer USING "#,202A";Learn_string$
160 !create file to store trace:
170 CREATE BDAT "STATE",4
180 !assign path to the file:
190 ASSIGN @File TO "STATE"
200 !send trace to the file:
210 OUTPUT QFile;Learn,string$,Trace_a(*)
220 !return output format to default mode:
230 OUTPUT Analyzer;"TDF P;"
240 !close file:
250 ASSIGN @File TO *
260 END
3-g Programming Topics