![HP E4401B Programmer'S Manual Download Page 144](http://html.mh-extra.com/html/hp/e4401b/e4401b_programmers-manual_161548144.webp)
3-80
Chapter 3
Programming Examples
Measuring Harmonic Distortion (RS-232)
#include "visa.h"
#define hpESA_IDN_E4401B "Hewlett-Packard, E4401B"
#define hpESA_IDN_E4411B "Hewlett-Packard, E4411B"
ViSession defaultRM, viESA;
ViStatus errStatus;
ViChar cIdBuff[256]= {0};
char
cEnter = 0;
int
iResult = 0;
long lOpc =0L ;
/*Set the input port to the 50 MHz amplitude reference*/
void Route50MHzSignal()
{
viQueryf(viESA, "*IDN?\n", "%t", &cIdBuff);
iResult = (strncmp( cIdBuff, hpESA_IDN_E4401B,
strlen(hpESA_IDN_E4401B)) && strncmp( cIdBuff,
hpESA_IDN_E4411B, strlen(hpESA_IDN_E4411B)));
if( iResult == 0 )
{
/*Set the input port to the 50 MHz amplitude reference
for the models E4411B, E4401B*/
viPrintf(viESA,"CAL:SOUR:STAT ON \n");
}
else
{
/* For analyzers having frequency limits >= 3 GHz,
prompt the user to connect the amplitude reference output to
the input*/
printf ("Connect amplitude reference output to the
input \n");
printf ("......Press any key to continue \n");
scanf( "%c",&cEnter);
/*Externally route the 50MHz Signal*/
viPrintf(viESA,"CAL:SOUR:STAT ON \n");
}}
void TakeSweep()
{
/*Take a sweep and wait for the sweep completion*/
viPrintf(viESA,"INIT:IMM \n");
viQueryf(viESA, "*OPC?\n", "%d", &lOpc);
if (!lOpc)
{
printf("Program Abort! Error occurred: last command
was not completed! \n");
exit(0);
}
Summary of Contents for E4401B
Page 6: ...vi ...
Page 14: ...xiv Contents ...
Page 64: ...2 34 Chapter2 HP ESA Status Registers Using the Analyzer Status Registers ...
Page 65: ...3 1 3 Programming Examples ...
Page 151: ...4 1 4 Programming Command Cross References ...
Page 286: ...5 132 Chapter5 Language Reference UNIT Subsystem ...
Page 287: ...6 1 6 HP 8590 HP ESA Spectrum Analyzers Programming Conversion Guide ...
Page 292: ...1 HP 8590 HP ESA Spectrum Analyzers Conversion Guide ...
Page 368: ...7 1 7 Error Messages ...
Page 393: ...7 26 Chapter7 Error Messages 201 to 799 Device Specific Errors ...