#include <stdio.h>
#include "nivxi.h"

void VMEinit ()
{
  
  INT16 ret;  
  
  printf (" This is a preliminary vme module !!\n");
  
  ret = InitVXIlibrary(); 
  
  printf (" init VXI lib %d\n", ret);
  
}


void VMEclose ()
{
  
  INT16 ret;  
  
  ret = CloseVXIlibrary(); 
  
  printf (" init VXI lib %d\n", ret);
  
}


/* =============================================== */


unsigned long VMEin (int access, unsigned long address, int width)
{

  unsigned long data = 0;
  
  VXIin ( (uint16) access, address, (uint16) width, &data);
  
  return data;

}


int VMEout (int access, unsigned long address, int width, unsigned long value)
{

  int16 ret;
  
  
  ret = VXIout ( (uint16) access, address, (uint16) width, value);
  
  return (int) ret;

}


//static unsigned long data[1000];

void VMEin_ptr(int access, unsigned long address, int width, int length, unsigned long *tvout)
{

  int i;
  for (i=0; i<length; i++) {
    VXIin ( (uint16) access, address, (uint16) width, tvout);
    tvout++;
    /* if(1800<i && i<2000) printf("%4d\t0x%x\n", i, *tvout);*/
  }
}