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

File name
Date and author's
name
Program Description
Define variable
Define trace
DefineFUNCDEF
DefineFUNCDEF
DeAneFUNCDEF
DefineFUNCDEF
DeEneFUNCEDEF
Define Main
FUNCDEF
10 !File name: EXAMPLE
20 !Date: 9/l/88 Author: Jane Doe
30 !Description of the program: This program checks for
40 !signals above -50 dEim in the following frequency
50 !spans: 10 to 12 MHz, 12 to 14 MHz,
60 !I4 to 16 MHz, and 16 to 110 MHz. If a
70 !signal is found, it autozooms to
80 !I MHz span, records the signal
90 !level, and displays the highest frequency
100 !signal found in trace B.
110 OUTPUT 7lB;"VARDEF P-DWER,O;"; ! Defines a variable named
120 ! "P-OWER" and initialize it to zero.
130 OUTPUT 7lB;"TRDEF S-AVE.401;"; ! Defines a trace.
140 ! Subordinate FDNCDEFs:
150 OUTPUT 7lB;~FGNCDEF S-PANONE.0"; !Defines a function.
160 OUTPUT 7lB;"FA 1OMHZ;FB 12MHZ;"; !Set the start and stop
170 ! frequencies.
180 OUTPUT 71B*~~0*1~; , , Ends the function.
190 OUTPUT 718;"FIJNCDEF S-PANTWD,O;"
200 OUTPUT 719;"FA 12MHZ;FB 14MHZ;";
210 OUTPUT 7ia-w-~~-
220 DIJTPDT 7lB;"F;NCDEF S-PANTHREE.0";
230 DUTPUT 7lB;"FA 14MHZ;FB IGMHZ;";
240 OUTPUT 718*"0*".
250 OUTPUT 7 18 I"&CDEF S-PANFDUR,cD";
260 OUTPUT 718;"FA 16MHZ;FB IIOHHZ;";
270 OUTF'UT 718*"0~"*
280 OUTPUT 718 I VT&DEF c3zcK ,0” ;
290 OUTPUT 7lS;"TS;MKPK HI;"; ! Places a marker on
295 ! highest signal.
300 OUTPUT 718;"IF MKA,GT,-50 THEN 'I; ! If the signal is higher
310 OUTPUT 7lS;"MKTRACK ON;"; ! than -5OdBm, zoom to 1 MHz
320 OUTPUT 71B;1SP IMHZ;"; ! span, center it and bring it
330 DUTPUT 7lB;"MKTRACK 0FF;TS;"; ! to the reference level.
340 OUTPUT 718;"'MKPK HI;MKCF;TS;"; ! Store it in a 4Ol-point
350 OUTPUT 718;"RKRL;TS;"; ! trace previously defined as
360 DIJTPUT 718;"MOV P-OWER,MKA;"; ! having the label, "S-AVE".
370 OUTPUT 718;"MOV S-AVE,TRA;"; ! Save the control settings
380 OUTPUT 7lS;"SAVES I;"; ! in register 1.
390 OUTPUT 7lB;"ENDIF-I'* ! End the IF statement.
400 OUTPUT 7ia-“o.fl-,
I End the definition of C-HECK."
410 ! Main FDNCDEF
420 OUTPUT 718;"FUNCDEF E-XAMPLE,O"; ! Begins the main program.
430 OUTPUT 7lS;"IP;SNGLS;MOV S-AVE,O;"; ! Places the analyzer in
440 ! single-sweep mode and set all values in "S-AVE" to zero.
450 OUTPUT 718;" REPEAT ";
460 OUTPUT 718;" S-PANONE;C-HECK;";
470 OUTPUT 718;t' S-PANTWD;C-HECK;"; ! Checks each span or a
480 OUTPUT 7ia;” S-PANTHREE;C-HECK;"; ! signal greater than -50 dBm.
490 OUTPUT 718;" S-PANFOUR;C-HECK;"; ! Repeat sequence until a
500 OUTPUT 718;"UNTIL S-AVE[O],NE,O;"; ! non-zero value is found in
510 OUTPUT 718;"MDV TRB,S-AVE;"; ! S-AVE. It then displays the located
520 OUTPUT 718;"RCLS 1;BLANK TRA;VIEW TRB;"; ! signal in trace B,
530 OUTPUT 7ia.l~0.lfl- ! and recalls the analyzer settings
540 ! that exiited 6hen the signal
550 ! was found. E-XAMPLE is assigned
560 OUTPUT 7lS;"KEYDEF 2,E_XAMPLE,%EXAMPLE%;"; ! to softkey 2 so the
570 END ! program may be executed from the front panel.
4-8 Creating and Using Downloadable Programs