HP VXI 75000 C Series, User'S And Scpi Programming Manual

Page: 380 / 438

380 Generating User Defined Functions Appendix F
INST_QUERY(e1415, "*TST?\n", "%d", &test_result);
if (test_result) {
(void) fprintf(stderr, "E1415A failed self-test\n");
exit(1);
}
}
#endif
/* Setup SCP functions */
INST_SEND(e1415, "sens:func:volt (@116)\n"); /* Analog in volts */
INST_SEND(e1415, "sour:func:cond (@141)\n"); /* Digital output */
#if 0 /* Set to 1 to do calibration */
/* Perform Calibrate, if necessary */
{
int cal_result; /* Result of E1415 self-test */
cal_result = -1; /* Make sure it gets assigned */
INST_QUERY(e1415, "*CAL?\n", "%d", &cal_result);
if (cal_result) {
(void) fprintf(stderr, "E1415A failed calibration\n");
(void) fprintf(stderr, "Check FIFO for channel errors\n");
exit(1);
}
}
#endif
/* Configure Trigger Subsystem and Data Format */
INST_SEND(e1415, "trig:sour timer;:trig:timer .001\n");
INST_SEND(e1415, "samp:timer 10e-6\n"); /* default */
INST_SEND(e1415, "form real,32\n");
/* Download Globals */
/* INST_SEND(e1415, "alg:def ’globals’,’static float x;’\n"); */
/* Download Custom Function */
{
float64 maxInput; /* set to maximum expected input*/
float64 minInput; /* set to minimum expected input*/
float64 tableOffset; /* offset used in building table*/
uint16 coef_array[512]; /* 512 elements */
float64 tableRange; /* Range on which table was built*/
maxInput = 2;
minInput = -2;
Build_table( maxInput, minInput, my_function, &tableRange,
&tableOffset, coef_array );
/* Download the table range and the table array to the card */
/* Piecewise requires 128 sets of table values */
INST_SEND(e1415,"ALGorithm:FUNCtion:DEFine ’sin’,%f,%f,%1024b",
tableRange, tableOffset, coef_array);
}