Subversion Repositories f9daq

#include <userint.h>

#include "K2231A-ctrl.h"

#include <stdlib.h>

#include <stdio.h>

#include <windows.h>

#include <visa.h>

//#include <K2231A.h> 

static ViStatus istat;

static ViSession RedPHandle,RMHandle;

int K2231A_DeviceId=0;

int K2231A_Initialize()

{

return 0;

}

int K2231A_Test()

{

  char str[0xFF];

  printf("K2231A_ModelNameQ %s\n",str);

        return TRUE;

}

int K2231A_Close()

{

        return 0;

}

int K2231A_Open()

{

        K2231A_Initialize();

        return TRUE;

}

int K2231A_OpenHandle(char * dev, char * usb   ){

K2231A_DeviceId =  0;

return K2231A_DeviceId;

}

/****************TOKOVI (potek, kako se spreminjajo tokovi s casom)****************/

void K2231A_ReadCurrent(double * I , double * V, unsigned char * mode, unsigned char *onoff){

         int iRet;

         char ch=0;

         double Voltage;

     double Current;

         char cv_cc;

         //iRet = K2231A_TimeOut(K2231A_DeviceId, 1);

         //iRet = K2231A_Refresh(K2231A_DeviceId); 

         //iRet = K2231A_MainOutput(K2231A_DeviceId, Output);

     //iRet = K2231A_MainOutputQ(K2231A_DeviceId, &Output);

         for (ch=0;ch<3;ch++){

           //iRet = K2231A_MoniDataQ(K2231A_DeviceId, ch+1, &Voltage, &Current, &cv_cc);

           //if (debug) printf("[%d] %g V %g A CVCC %d\t",ch, Voltage, Current, cv_cc ); 

           I[ch]= Current;        //s tem definiras kaj sta I in V.

           V[ch]= Voltage;

         }

         //if (debug) printf("\n");

        return;

}

#ifdef MAIN 

#include <ansi_c.h>

#include <utility.h>

#define RSTREG(a,x) (a&=(~(x)))

#define SETREG(a,x) (a|=x)

int gLogToFile;

int vmon[3]={P1_VMON_1,P1_VMON_2,P1_VMON_3 };

int imon[3]={P1_IMON_1,P1_IMON_2,P1_IMON_3 };

int vset[3]={P1_U_1,P1_U_2,P1_U_3 };

int iset[3]={P1_I_1,P1_I_2,P1_I_3 };

int radiob[3]={P1_BOX_1,P1_BOX_2,P1_BOX_3 };

int cvcc[3]={P1_CVCC_1,P1_CVCC_2,P1_CVCC_3 };

int gMask=0xF;

int pnl;

FILE *gFp;

int main (int argc, char *argv[])

{

        int DeviceId=0;

        unsigned char MainOutput, preset;

  double Voltage, Current, tinterval;

  char str[0xFF];

        if (InitCVIRTE (0, argv, 0) == 0)

                return -1;      /* out of memory */

  SetStdioPort (CVI_STDIO_WINDOW);

        SetStdioWindowOptions (1000, 0, 0);

  SetStdioWindowSize (150, 600);

  SetStdioWindowPosition (825, 20);

  istat = viOpenDefaultRM (&RMHandle);

  if (RMHandle) istat = viOpen (RMHandle, "TCPIP0::178.172.43.91::5000::SOCKET", VI_NULL, VI_NULL, &RedPHandle);

  if (RedPHandle){

  istat = viSetAttribute (RedPHandle, VI_ATTR_TCPIP_KEEPALIVE, VI_TRUE);

  istat = viSetAttribute (RedPHandle, VI_ATTR_TCPIP_NODELAY, VI_TRUE);

  istat = viSetAttribute (RedPHandle, VI_ATTR_TERMCHAR, '\n');

  istat = viSetAttribute (RedPHandle, VI_ATTR_TERMCHAR_EN, VI_TRUE);

  istat = viSetAttribute (RedPHandle, VI_ATTR_TMO_VALUE, 1000);

  }

        if ((pnl = LoadPanel (0, "K2231A-ctrl.uir", P1)) < 0) return -1;

  if (K2231A_Open()== 0) MessagePopup("Error","Cannot open USB device");  

  //DeviceId = K2231A_OpenHandle ("PW-A","USB:1:1");

  if (K2231A_Test() == 0 )MessagePopup("DLL error","Dll Error");

  if (DeviceId < 0) MessagePopup("Error","Not Connected");

  printf("TMI device ID %d\n",K2231A_DeviceId);

  //K2231A_MainOutputQ(K2231A_DeviceId, &MainOutput);

  SetCtrlVal(pnl, P1_ONOFF, MainOutput);

  GetCtrlVal(pnl, P1_TINTERVAL, &tinterval);

  SetCtrlAttribute (pnl, P1_TIMER, ATTR_INTERVAL, tinterval);

        //K2231A_PresetQ(K2231A_DeviceId, &preset); 

  SetCtrlVal(pnl, P1_PRESET, preset);

        SetTraceAttributeEx (pnl, P1_GRAPH_IMON, 1, ATTR_TRACE_LG_TEXT, "CH 30V");

        SetTraceAttributeEx (pnl, P1_GRAPH_IMON, 2, ATTR_TRACE_LG_TEXT, "CH 30V");

        SetTraceAttributeEx (pnl, P1_GRAPH_IMON, 3, ATTR_TRACE_LG_TEXT, "CH 5V");

        SetTraceAttributeEx (pnl, P1_GRAPH_VMON, 1, ATTR_TRACE_LG_TEXT, "CH 30V");

        SetTraceAttributeEx (pnl, P1_GRAPH_VMON, 2, ATTR_TRACE_LG_TEXT, "CH 30V");

        SetTraceAttributeEx (pnl, P1_GRAPH_VMON, 3, ATTR_TRACE_LG_TEXT, "CH 5V");

 for (unsigned char  ch=0;ch<4;ch++){

    int ison;

    //K2231A_VoltageQ(K2231A_DeviceId, ch+1, preset, &Voltage);

    //K2231A_CurrentQ(K2231A_DeviceId, ch+1, preset, &Current);

    SetCtrlVal(pnl, vset[ch], Voltage);

    SetCtrlVal(pnl, iset[ch], Current);

    GetCtrlVal(pnl, radiob[ch], &ison);

    if (ison) SETREG(gMask,(1<<ch)); else RSTREG(gMask,(1<<ch));

  }

  DisplayPanel (pnl);

        RunUserInterface ();

        DiscardPanel (pnl);

   K2231A_Close();

   if (gFp)  fclose(gFp);

        return 0;

}

int CVICALLBACK SwitchOnOffCB (int panel, int control, int event,

                               void *callbackData, int eventData1, int eventData2)

{

  unsigned char state;

  switch (event)

  {

    case EVENT_COMMIT:

      GetCtrlVal(panel, control, &state);

      //K2231A_MainOutput(K2231A_DeviceId, state); 

      break;

  }

  return 0;

}

int CVICALLBACK SetCB (int panel, int control, int event,

                       void *callbackData, int eventData1, int eventData2)

{

  switch (event)

  {

    case EVENT_COMMIT:{

                        unsigned char preset;

      //K2231A_PresetQ(K2231A_DeviceId, &preset); 

      SetCtrlVal(pnl, P1_PRESET, preset);  

      for (unsigned char ch = 0; ch<3;ch++){

        //printf("ch %d %x\n", ch, gMask);

        if (gMask & (1<<ch)){

          double Voltage;

          double Current;

          GetCtrlVal(panel, vset[ch], &Voltage);

          GetCtrlVal(panel, iset[ch], &Current);

          //printf("->ch %d VSet %g Iset %g\n", ch, Voltage, Current);

          //K2231A_Voltage(K2231A_DeviceId, ch+1, preset, Voltage);

          //K2231A_VoltageQ(K2231A_DeviceId, ch+1, preset, &Voltage);

          //K2231A_Current(K2231A_DeviceId, ch+1, preset, Current);

          //K2231A_CurrentQ(K2231A_DeviceId, ch+1, preset, &Current);

          //printf("<-ch %d VSet %g Iset %g\n", ch, Voltage, Current);  

        }

      }  

                }

      break;

  }

  return 0;

}

int CVICALLBACK ReadCB (int panel, int control, int event,

                        void *callbackData, int eventData1, int eventData2)

{

   int iRet;

         char ch=0;

         double Voltage;

   double Current;

         char cv_cc;

  switch (event)

  {

    case EVENT_COMMIT:

      for (ch = 0; ch<3;ch++){

        if (gMask & (1<<ch)){

          //iRet = K2231A_TimeOut(K2231A_DeviceId, 1);

                //iRet = K2231A_Refresh(K2231A_DeviceId);

          //iRet = K2231A_MoniDataQ(K2231A_DeviceId, ch+1, &Voltage, &Current, &cv_cc);

          //printf("ch %d VSet %g Iset %g\n", ch, Voltage, Current); 

          SetCtrlVal(panel, vmon[ch], Voltage);

          SetCtrlVal(panel, imon[ch], Current);

          SetCtrlVal(panel, cvcc[ch], cv_cc);

        }

      }  

      break;

  }

  return 0;

}

int CVICALLBACK SetIntervalCB (int panel, int control, int event,

                               void *callbackData, int eventData1, int eventData2) {

  double tinterval;

  switch (event) {

    case EVENT_COMMIT:

      GetCtrlVal(panel, control, &tinterval);

      SetCtrlAttribute (panel, P1_TIMER, ATTR_INTERVAL, tinterval);

      break;

  }

  return 0;

}

int CVICALLBACK TimerOnOffCB (int panel, int control, int event,

                              void *callbackData, int eventData1, int eventData2)

{

  int state;

  switch (event)

  {

    case EVENT_COMMIT:

      GetCtrlVal(panel, control, &state);

      if (state){

         ResumeTimerCallbacks();

      } else {

         SuspendTimerCallbacks ();

         printf ("Disabling timer....\n");

      }

      break;

  }

  return 0;

}

int CVICALLBACK ExitCB (int panel, int control, int event,

                        void *callbackData, int eventData1, int eventData2)

{

  switch (event)

  {

    case EVENT_COMMIT:

      QuitUserInterface(0);

      break;

  }

  return 0;

}

int CVICALLBACK SetMaskCB (int panel, int control, int event,

                           void *callbackData, int eventData1, int eventData2)

{ int ison;

  switch (event)

  {

                int i=0;       

    case EVENT_COMMIT:

      GetCtrlVal(panel, control, &ison);

      for (i=0;i<3;i++) if (control == radiob[i]) break;

      if (ison) SETREG(gMask,(1<<i)); else RSTREG(gMask,(1<<i));

      break;

  }

  return 0;

}

int CVICALLBACK LogToFileCB (int panel, int control, int event,

                             void *callbackData, int eventData1, int eventData2)

{

  switch (event)

  {

    case EVENT_COMMIT:

      GetCtrlVal(panel, control, &gLogToFile);

      break;

  }

  return 0;

}

int CVICALLBACK TimerCB (int panel, int control, int event,

                         void *callbackData, int eventData1, int eventData2)

{

  switch (event)

  {

      unsigned char   ch;

      double current[3];

      double voltage[3];

      char cv_cc;

    case EVENT_TIMER_TICK:

      for (ch = 0; ch<3;ch++){

        if (gMask & (1<<ch)){

          //K2231A_TimeOut(K2231A_DeviceId, 1);

                //K2231A_Refresh(K2231A_DeviceId);

          //K2231A_MoniDataQ(K2231A_DeviceId, ch+1, &voltage[ch], &current[ch], &cv_cc);

          SetCtrlVal(panel, vmon[ch], voltage[ch]);

          SetCtrlVal(panel, imon[ch], current[ch]);

          SetCtrlVal(panel, cvcc[ch], cv_cc);

          if (gLogToFile){

              if (!gFp)  {

                gFp= fopen("pw18-1.8aq.log","w");

                fprintf(gFp,"#time\tch\tU\tI\tCV_CC\n");

              }  

              fprintf(gFp,"%ul\t%d\t%g\t%g\t%d\n",  time(NULL), ch+1, voltage[ch], current[ch], cv_cc);

          }

        }

      }

      PlotStripChart (panel, P1_GRAPH_IMON, current, 3, 0, 0, VAL_DOUBLE);

                        PlotStripChart (panel, P1_GRAPH_VMON, voltage, 3, 0, 0, VAL_DOUBLE);

      break;

  }

  return 0;

}

int CVICALLBACK SetPresetCB (int panel, int control, int event,

                                                                                                                 void *callbackData, int eventData1, int eventData2) {

        switch (event) {

                case EVENT_COMMIT:{

                        unsigned char preset;

                        double Voltage, Current;

                        GetCtrlVal(panel, control, &preset);

                        //K2231A_Preset(K2231A_DeviceId, preset);

                        for (unsigned char  ch=0;ch<3;ch++){

        int ison;

        //K2231A_VoltageQ(K2231A_DeviceId, ch+1, preset, &Voltage);

        //K2231A_CurrentQ(K2231A_DeviceId, ch+1, preset, &Current);

        SetCtrlVal(pnl, vset[ch], Voltage);

        SetCtrlVal(pnl, iset[ch], Current);

        GetCtrlVal(pnl, radiob[ch], &ison);

        if (ison) SETREG(gMask,(1<<ch)); else RSTREG(gMask,(1<<ch));

      }

                        break;

                }

        }

        return 0;

}

#endif MAIN