Model SR715 Model SR720 LCR Meters

REMOTE PROGRAMMINGEXAMPLE PROGRAM 3Using Microsoft C with the Capital Equipment Corp. (CEC) GPIB card on the IBM PC.To successfully interface the SR715/720 to a PC via the GPIB interface, the instrument, interface card, andinterface drivers must all be configured properly. To configure the SR715/720, the GPIB address must be setusing the switches SW2 on the rear panel.Make sure that you follow all the instructions for installing the GPIB card. The CEC GPIB card needs to belocated in memory where it will not conflict with any other devices in the PC.Once the hardware is configured, use "TRTEST". This terminal emulation program (supplied by CEC) allowsyou to send commands to the SR715/720 directly from your computer's keyboard. If you cannot talk to theSR715/720 via "TRTEST", then your programs will not run./*********************************************************************************************//*This program will sort resistors into eight bins of tolerances between 0.1% and 0.8%, and provide a table ofresults.This program is written in Microsoft C version 5.1. The header file for the GPIB interface (ms-c488.h) issupplied by CEC.To compile this program, use the command: CL/AL/c prog.c. Then link the resulting object file with GPIB.obj(supplied by CEC). Ansi.sys must be installed in config.sys for proper screen format. */#include #include #include #include #include #define lcr 17 /* GPIB address for LCR meter as set by SW2 on the rear panel *//* function prototypes */void InitGpib (void);void TxGpib (int, char*);void GetGpib (int);void Clear (void);void GetSpace (void);void Erase (int, int);void Printxy (int, int, int, char *);void Gotoxy (int, int);/* global variables */char recv[40];int status, length;int bin[10]; /* eight tolerance bins plus QDR and general fail bins *//* Parameters for 10Kohm resistors sorted into 0.1% increments *//* bin # 1, 2, 3, 4, 5, 6, 7, 8, QDR */double nom[9] = {1.0e4, 1.0e4, 1.0e4, 1.0e4, 1.0e4, 1.0e4, 1.0e4, 1.0e4, 0.00015},ulim[8] = { 0.1, 0.2, 0.3, 0.4, 0.5, 0.6, 0.7, 0.8 },llim[8] = {-0.1, -0.2, -0.3, -0.4, -0.5, -0.6, -0.7, -0.8 };4-17