/* $Id: labjack.c,v 1.1 2003/07/12 23:49:30 wafer Exp $ */

#include "inst.h"
#include "ljackv112.h"

static long _id = 0;
static long _stat = 0;  /* status returned by last labjack driver call */
static double _ao0 = 0; /* analog 0 output voltage */
static double _ao1 = 0; /* analog 1 output voltage */

int lj_anal_out (int chan, double v)
{
     if (chan > 1) {
	  _stat = 0;
	  return -1;
     }
     _stat = EAnalogOut(&_id, 0, chan ? _ao0 : v,
			chan ? v : _ao1);
     if (_stat)
	  return -1;
     if (chan)
	  _ao1 = v;
     else 
	  _ao0 = v;
     return 0;
}

int lj_digital_out (int chan, int s)
{
     if (chan > 19) {
	  _stat = 0;
	  return -1;
     }
     _stat = EDigitalOut(&_id, 0, chan > 3 ? chan - 3 : chan, chan > 3, s);
     if (_stat)
	  return -1;
     return 0;
}

int lj_digital_in (int chan)
{
     return -1;
     /* implement me! */
}

int lj_stat ()
{
     return _stat;
}