Sample Program 2 - Ruska 7750I Gpib (Ieee-488) - Zero Sequence - Fluke RUSKA 7750i User Manual

RUSKA 7750i
Users Manual
Sample Program 2 — RUSKA 7750i GPIB (IEEE-488) — Zero Sequence
5-12
/*--------------------------------------------------------------------*/
/* request_7000 : write a query command and read the response
/*--------------------------------------------------------------------*/
void request_7000 (char *s)
{
ibwrt (device, s, strlen (s));
ibrd (device, buffer, sizeof (buffer));
}
/*--------------------------------------------------------------------*/
/*--------------------------------------------------------------------*/
/* Sample Program 2 - 7750 GPIB (IEEE-488)
/*
/* Zero Sequence
/*--------------------------------------------------------------------*/
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <conio.h>
#include "decl.h"
/*--------------------------------------------------------------------*/
int device;
char buffer[256];
double pressure;
int status;
int check_errors (void);
int zero (void);
void write_7000 (char *s);
void request_7000 (char *s);
/*--------------------------------------------------------------------*/
void main (void)
{
char *p;
/*---------------------------*/
/* Initialize GPIB Interface */
/*---------------------------*/
device = ibdev (0,
4,
NO_SAD,
T1s,
0,
REOS+LF);
if (ibsta & ERR)
{ cprintf ("GPIB Driver not installed.\n");
return;
}
/*-----------*/
/* Zero 7010 */
/*-----------*/
if (!zero ( ))
{ ibonl (device, 0);
return;
}
/*----------------------*/
/* Reset GPIB Interface */
/*----------------------*/
ibonl (device, 0);
}
/*--------------------------------------------------------------------*/
/* Zero : perform zero adjust of 7750
/*--------------------------------------------------------------------*/
int zero (void)
{
int cstat, pstat, tstat, rstat;
/* GPIB Device descriptor */
/* buffer for input/output strings */
/* Pressure read from unit */
/* Status register from unit */
/* First GPIB Board */
/* GPIB Address of 7750 */
/* No secondary addressing */
/* 1 Second Timeout */
/* No automatic EOI for transmit */
/* Terminate read on Line Feed */
*/
*/
*/
*/
*/