HP E1418A Service Manual page 72

/*** channel current output adjustment ***/
for (i=1;i<num_chan+1;i++)
{
result = 0;
while (result != 1)
result = 1;
while (result !=0 && result !=2)
}
/*** STORE THE NEW CALIBRATION CONSTANTS
err=viPrintf(dac, "CAL:STOR;*OPC?\n");
if(err < VI_SUCCESS) err_handler(dac, err);
err=(viScanf(dac,"%d",&result);
if(err < VI_SUCCESS) err_handler(dac, err);
sys_err(dac);
}
72 Adjustments
{
err=viPrintf(dac, "CAL%d:CONF:CURR? \n",i); /* Configure for calibration */
if(err < VI_SUCCESS) err_handler(dac, err);
err=viScanf(dac, "%d", &result);
if(err < VI_SUCCESS) err_handler(dac, err);
}
{
meas_volt=get_voltage ();
err=viPrintf(dac, "CAL%d:VAL:CURR? %f\n",i,meas_volt);
if(err < VI_SUCCESS) err_handler(dac, err);
err=viScanf(dac, "%d", &result);
if(err < VI_SUCCESS) err_handler(dac, err);
if (result == 5)
{
printf ("Calibration for channel %d aborted\n\n",i);
result = 0;
}
}
/* Enter integer returned
/*, returns a 1 when ready to calibrate */
/* Get the voltage measurement */
/* Enter integer returned
/* returns a 0 when calibration complete */
/* Calibration aborted */
***/
/* Store the new cal constants */
*/
*/
Chapter 5