62 PRODIGIT
Appendix A GPIB programming Example
C Example Program
/* Link this program with appropriate *cib*.obj. */
/* This application program is written in TURBO C 2.0 for the IBM PC-AT compatible. The
National Instruments Cooperation (NIC) Model PC-2A board provides the interface between
the PC-AT and a PRODIGIT MPAL ELECTRONIC LOAD. The appropriate *cib*.obj file is
required in each program to properly link the NIC board to C LANGUAGE. and include the
<decl.h.> HEADER FILE to C LANGUAGE. */
#include <stdio.h>
#include <dos.h>
#include <math.h>
#include "decl.h" /* NI GPIB CARD HEADER FILE */
main()
{
char ouster[20],rdbuf[15],spec[10];
int i,ch,load;
/* Assign unique identifier to the device "dev5" and store in variable load. check for error. ibfind
error = negative value returned. */
if((load = ibfind("dev5")) < 0)/* Device variable name is load */
{ /* GPIB address is 5 */
printf("\r*** INTERFACE ERROR ! ***\a\n");
printf("\r\nError routine to notify that ibfind failed.\n");
printf("\r\nCheck software configuration.\n");
exit(1);
}
/* Clear the device */
if((ibclr(load)) & ERR);
{
printf("INTERFACE ERROR ! \a");
exit(1);
}
clrscr();
/* Clear load error register */
ibwrt(load,"CLR",3);
ibwrt( load,"NAME?",5); /* Get the 3310F series module load specification */
delay(100);
strset(rdbuf,'\0'); /* Clear rdbuf string buffer */
strset(spec,'\0'); /* Clear spec string buffer */
ibrd(load,spec,20);
if (spec[3] == '9')
printf("\n 3302F series specification error !");
/* Set the channel 1, preset off, current sink 1.0 amps and load on commands to the load. */
To Next Page
Loading...