WebSVN – f9daq – Diff – //cvi/apps/TempCtrl/TempCtrl.c

         switch (event) {
                 case EVENT_COMMIT:
                         GetCtrlVal(pa,PA_CHANNEL, &ch);
                         iRet = TMI_TimeOut(TMI_DeviceId, 1);
                         iRet = TMI_Refresh(TMI_DeviceId);
                         iRet = TMI_MoniDataQ(TMI_DeviceId, ch+1, &Voltage, &Current, &cv_cc);
                         SetCtrlVal(panel, PA_VMON, Voltage);
                         SetCtrlVal(panel, PA_IMON, Current);
                         SetCtrlVal(panel, PA_CVCC, cv_cc);
                         break;
         }
         return 0;
 }
 int CVICALLBACK SelectChannelCB (int panel, int control, int event,
                                                                                                                                  void *callbackData, int eventData1, int eventData2) {
         unsigned char state, preset;
         unsigned char ch;
         switch (event) {
                 case EVENT_COMMIT:
                         GetCtrlVal(pa,PA_CHANNEL, &ch);
                         GetCtrlVal(pa,PA_PRESET, &preset);
                         TMI_VoltageQ(TMI_DeviceId, ch+1, preset, &Voltage);
                         TMI_CurrentQ(TMI_DeviceId, ch+1, preset, &Current);
                         SetCtrlVal(pa, PA_VSET, Voltage);
                         SetCtrlVal(pa, PA_ISET, Current);
                         break;
         }
         return 0;
 }
+int SetCooling(char onoff){
+        int nb=0;
+  nb = ComWrt (COM_PORT, &onoff, 1);
+        return nb;
+}
 #define tcpChk(f) if ((g_TCPError=(f)) < 0) {ReportTCPError(); return -1; }
 /*---------------------------------------------------------------------------*/
 /* Module-globals                                                            */
                         } else {
                                 receiveBuf[dataSize] = '\0';
                                 printf("Received %s\n", receiveBuf);
                                 int cmd=0;
                                 float arg;
-                                sscanf("%d%f",&cmd,&arg);
+                                sscanf(receiveBuf,"%d%f",&cmd,&arg);
                                 switch (cmd){
                                         case 1:
-                                                SetCtrlVal(ps.PA_TSET,arg);
+                                                SetCtrlVal(pa,PA_TSET,arg);
                                                 break;
                                         default:
                                                 break;
+                                }
                 /* We are successfully connected -- gather info */
                 if (GetTCPHostAddr (tempBuf, 256) >= 0) printf("%s\n" ,tempBuf);
                 if (GetTCPHostName (tempBuf, 256) >= 0) printf("%s\n" ,tempBuf);
+        }
         SelectChannelCB (pa, PA_CHANNEL, EVENT_COMMIT, NULL, 0,0);
         ReadVoltageCurrentCB (pa, PA_CHANNEL, EVENT_COMMIT, NULL, 0,0);
         if (registered)
                 UnregisterTCPServer (portNum);
         DiscardPanel (pa);
         TMI_Close();
         if (gFp)  fclose(gFp);
         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 SwitchCoolingOnOffCB (int panel, int control, int event,
+                                                                                                                         void *callbackData, int eventData1, int eventData2) {
+        int onoff=0;
+        switch (event) {
+                case EVENT_COMMIT:
+                        GetCtrlVal(pa,control,&onoff);
+                        SetCooling(onoff);
                         break;
+        }
         return 0;
+}
 int CVICALLBACK SwitchOnOffCB (int panel, int control, int event,
                                                                                                                          void *callbackData, int eventData1, int eventData2) {
         unsigned char state;
         switch (event) {
                 double temp= atof(read_data);
                 double f[10];
                 int debug1;
                 GetCtrlVal(pa,PA_DEBUG_1, &debug1);
 //printf("%f#%s#", temp, read_data);
+                // temp1 , temp2 , temp3 , temp4 , temp humidity sens, rel.humidity
+                if (bytes_read >0) {
+                        SetCtrlVal(pa,PA_ARDUINO, read_data);
+                }
                 sscanf(read_data,"%lf %lf %lf %lf %lf %lf",&f[0],&f[1],&f[2],&f[3],&f[4],&f[5]);
                 double humidity = f[5];
+                double htemp = f[4];
 //              printf("%lf %lf %lf %lf %lf %lf",f[0],f[1],f[2],f[3],f[4],f[5]);
                 int RS232Error = ReturnRS232Err ();
                 if (ReturnRS232Err ()) {
                         sprintf(read_data,"#%s\n", GetRS232ErrorString(RS232Error));
                         MessagePopup("RS232Err",read_data);
                         TMI_Preset(TMI_DeviceId,preset);
                         GetCtrlVal(pa,PA_POLAR,&polar);
                         double tdiff = temp - tset;
                         double retpid  = UpdatePID(&pid, tdiff, temp);
-                        const double troom = 20;
+                        const double troom = htemp;
                         double Pheat= 0.2 * (temp - troom);
                         double Ptec = retpid  - Pheat*2;
                         vset = (polar*Ptec>0) ? sqrt(fabs(Ptec)) : 0;
                         if (debug1) printf("%d PID tmon=%f tset=%f tdiff=%f vmon=%f imom=%f pid=%f Pheat=%f =>vset %f", ch, temp, tset, tdiff, vmon, imon,retpid ,Pheat, vset);
                         GetCtrlVal(pa,PA_VMAX,&vmax);
                         PlotStripChart (pa, PA_GRAPH, &temp, 1, 0, 0, VAL_DOUBLE);
                         double pgraph[3]= {vmon,imon, 100*(temp-told)};
                         PlotStripChart (pa, PA_GRAPH_VMON, pgraph, 3, 0, 0, VAL_DOUBLE);
                         PlotStripChart (pa, PA_GRAPH_3, &humidity, 1, 0, 0, VAL_DOUBLE);
                         SetCtrlVal(pa,PA_TMON,temp);
+                        SetCtrlVal(pa,PA_HTMON,htemp);
                         SetCtrlVal(pa,PA_HUMIDITY,humidity);
                         char transmitBuf[512]= {0};
                         sprintf(transmitBuf, "%u %f %f %f %f\n", time(NULL), humidity, temp, tdiff, temp-told);
                         if (g_hconversation)

Subversion Repositories f9daq

(root)//cvi/apps/TempCtrl/TempCtrl.c – Rev 306 → 311