Table of Contents
Advertisement
Appendix A
iprintf (dm, "TRIG SGL\n");
iscanf (dm, "%lf", &result);
iscanf (dm, "%t", cr);
reference = 20 * log10 (result) + 13.0103;
iprintf (id, "ABORT\n");
iprintf (id, "FREQ 1E5\n");
iprintf (id, "INIT:IMM\n");
iprintf (id, "*OPC?\n");
iscanf (id, "%t", cr);
iprintf (dm, "TRIG SGL\n");
iscanf (dm, "%lf", &result);
iscanf (dm, "%t", cr);
xoverdmm = result;
printf ("\n\n1. Connect Power Meter to AFG Output");
printf ("\nPress ENTER when ready");
getchar ();
iprintf (pm, "IP\n");
iprintf (pm, "AU M4 WT\n");
iprintf (pm, "0.1 MHZ\n");
iprintf (pm, "T3\n");
iscanf (pm, "%lf", &result);
xoverpm = sqrt (abs (result) * 50);
correction = xoverdmm / xoverpm;
/*--------------------Perform Test-----------------------------------------*/
printf ("\n\nTest
Specification");
printf ("\nFrequency
printf ("\n(Hz)
for (i = 1;i <= 15;i ++)
{
iprintf (id, "ABORT\n");
iprintf (id, "FREQ %uE6\n", i);
iprintf (id, "INIT:IMM\n");
iprintf (pm, "%uMHZ\n", i);
iprintf (pm, "T3\n");
iscanf (pm, "%lf", &watts[i-1]);
volts[i-1] = sqrt (abs (watts[i-1]) * 50);
corrvolts[i-1] = volts[i-1] * correction;
dbm[i-1] = 20 * log10 (corrvolts[i-1]) + 13.0103; /* Calculate dbm */
error[i-1] = dbm[i-1] - reference;
Reading
Reading
Corrected
Reading");
(watts)
(Volts)
(volts)
Verification Tests - C Programs 95
/* Get measurement from DMM */
/* Calculate reference level */
/* Set AFG to crossover frequency */
/* DMM reading at 100 kHz */
/* Set up power meter */
/* Crossover frequency */
/* Convert from watts to volts */
/* Calculate correction factor */
Reading
Error
(dBm)
(dB)
(dB)\n");
/* Convert from watts to volts */
/* Calculate corrected volts */
/* Calculate error in dBm */
Advertisement
Table of Contents
