Prodigit 3270 Series Operation Manual page 148

ibwrt( load,"NAME?",5);
strset(rdbuf,'\0');
strset(spec,'\0');
ibrd(load,spec,20);
if (spec[3] == '9')
printf("\n 3270 series specification error !");
/* Set the channel 1, preset off, current sink 1.0 amps and load on commands to the load. */
ibwrt( load,"chan 1;pres off;curr:low 0.0;curr:high 1.0;load on ",43);
ibwrt( load,"meas:curr ?",10);
/* Get the load actially sink current from the load */
ibrd( load,rdbuf,20);
/* go to local. */
ibloc(load);
}
/* Get the 3270 series load specification */
/* Clear rdbuf string buffer */
/* Clear spec string buffer */
3270 Series Operation Manual 139