Prodigit 3270 Series Operation Manual page 147

138 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"
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)
{
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 */
{
outstr=chan[0];
ibwrt(load,outstr,6);
ibwrt(load,"CLR",3);
}
/* NI GPIB CARD HEADER FILE */
/* Device variable name is load */
/* GPIB address is 5 */