WebSVN – f9daq – Diff – /cvi/apps/sa02_daq/sa02lib.c

     case 3:
       return 1;
+  }
   return i;
 };
+#define ADC_VCC 3.3
+#define AMP_IB_min -1.15e-6
+#define ADC_IB_min 2355
+#define AMP_IB_max 0.2e-6
+#define ADC_IB_max 2665
+double sa02ampIb(int adc) {
+  if (adc <= ADC_IB_min) return AMP_IB_min;
+  if (adc > ADC_IB_max) return AMP_IB_max;
+  return AMP_IB_min + ((AMP_IB_max-AMP_IB_min)/(ADC_IB_max-ADC_IB_min)) * (adc - ADC_IB_min);
+}
+double sa02adc2V(int adc) {
+  adc &=0xFFF;
+  return ADC_VCC * (double)adc/4096;
+}
+double sa02adc2Vp(int adc) {
+  adc &=0xFFF;
+  return ADC_VCC * (double)adc/4096 + 1.0e+4 * sa02ampIb(adc);
+}
+double sa02adc2Vm(int adc) {
+  adc &=0xFFF;
+  return ADC_VCC * (2. * (double)adc/4096. - 1.) + 5.1e+4 * sa02ampIb(adc);
+}
+double sa02adc2V38(int adc) {
+  adc &=0xFFF;
+  return ADC_VCC * (2. * (double)adc/4096.) + 5.1e+4 * sa02ampIb(adc);
+}
+double sa02adc2Va(int adc) {
+  adc &=0xFFF;
+  return ADC_VCC * (double)adc/4096. - (ADC_VCC/2. + 0.06);
+}
 //-------------------------------------------------------------------------
 uint32_t  sa02Write(uint32_t sa02BoardNumber, uint32_t regh, uint32_t regl, uint32_t *response)
+}
 //-------------------------------------------------------------------------
 int Sa02DaqMode (uint32_t mode) {
   VME_A32D32_W(sa02Address+FEB_DAQMODE,mode);
   return 0;
 }
 int Sa02SetPtsOutput(uint32_t mask) {
   VME_A32D32_W(sa02Address+FEB_DEBUGMON,mask);
   return 0;
 }
 int Sa02SetNeve (uint32_t neve) {
   VME_A32D32_W(sa02Address+FEB_SETNEVE,neve);
   return 0;
 }
 uint32_t Sa02GetNeve (uint32_t*inputtriggers) {
   uint32_t neve=0;
   VME_A32D32_R(sa02Address+FEB_GETNEVE,&neve);
   *inputtriggers = (neve >> 16)  &0xFFFF;
   return neve;
+}
 int sa02Reset1( void ) {
   uint32_t rdy=1;
   VME_A32D32_W(sa02Address+FEB_DATA_RST,rdy);
   return 0;
+}
   return 0;
+}
 int Sa02SelectTriggerWithMaskAndLength (uint32_t trg, uint32_t mask, uint32_t len) {
   VME_A32D32_W(sa02Address+FEB_SELTRG, trg | (mask << 4) | (len << 16) );
   return 0;
 }
 int Sa02SoftwareTrigger (void ) {
   uint32_t rdy =1;
   VME_MWRST();
   VME_MW(VME_A32, VME_D32,sa02Address+FEB_SWTRG,rdy);
   VME_MWEXEC();
   return 0;
+}
 int Sa02TestPulseEnable (uint32_t board, uint32_t enable ) {
   uint32_t response[2]= {0,0};
   return sa02Cmd(board,FEB_TP, enable, 0, 0 ,1,response);
   data=0x10;
   val=sa02Cmd(board, cmd, data, chip, channel ,1,response);
   Delay(0.01);
   cmd=FEB_ADC_READ;
   val=sa02Cmd(board, cmd, data, chip, channel ,1,response);
-  doubleval = ((val & 0xFFF) + 0.5)/0x1000 * 3.3;
+  doubleval = sa02adc2Vp(val);
   sa02Printf("VDD   = %6.3f V\n",doubleval);
   sdata[i++]=doubleval;
   cmd=FEB_MUX;
   data=0x11;
   val=sa02Cmd(board, cmd, data, chip, channel ,1,response);
   Delay(0.01);
   cmd=FEB_ADC_READ;
   val=sa02Cmd(board, cmd, data, chip, channel ,1,response);
-  doubleval = ((val & 0xFFF) + 0.5)/0x1000 * 3.3;
+  doubleval = sa02adc2Vp(val);
   sa02Printf("V+2   = %6.3f V\n",doubleval);
   sdata[i++]=doubleval;
   cmd=FEB_MUX;
   data=0x12;
   val=sa02Cmd(board, cmd, data, chip, channel ,1,response);
   Delay(0.01);
   cmd=FEB_ADC_READ;
   val=sa02Cmd(board, cmd, data, chip, channel ,1,response);
-  doubleval = (2*((val & 0xFFF) + 0.5)/0x1000 - 1.) * 3.3;
+  doubleval = sa02adc2Vm(val);
   sa02Printf("V-2   = %6.3f V\n",doubleval);
   sdata[i++]=doubleval;
   cmd=FEB_MUX;
   data=0x13;
   val=sa02Cmd(board, cmd, data, chip, channel ,1,response);
   Delay(0.01);
   cmd=FEB_ADC_READ;
   val=sa02Cmd(board, cmd, data, chip, channel ,1,response);
-  doubleval = (2*((val & 0xFFF) + 0.5)/0x1000 - 1.) * 3.3;
+  doubleval = sa02adc2Vm(val);
   sa02Printf("VSS   = %6.3f V\n",doubleval);
   sdata[i++]=doubleval;
   cmd=FEB_MUX;
   data=0x20;
   val=sa02Cmd(board, cmd, data, chip, channel ,1,response);
   Delay(0.01);
   cmd=FEB_ADC_READ;
   val=sa02Cmd(board, cmd, data, chip, channel ,1,response);
   if (sa02BoardType>2)
-    doubleval = (2*((val & 0xFFF) + 0.5)/0x1000 - 1.) * 3.3;
+    doubleval = sa02adc2Vm(val);
   else
-    doubleval = ((val & 0xFFF) + 0.5)/0x1000 * 3.3;
+    doubleval = sa02adc2V(val);
   sa02Printf("VTH1  = %6.3f V\n",doubleval);
   sdata[i++]=doubleval;
   cmd=FEB_MUX;
   data=0x30;
   val=sa02Cmd(board, cmd, data, chip, channel ,1,response);
   Delay(0.01);
   cmd=FEB_ADC_READ;
   val=sa02Cmd(board, cmd, data, chip, channel ,1,response);
   if (sa02BoardType>2)
-    doubleval = (2*((val & 0xFFF) + 0.5)/0x1000 - 1.) * 3.3;
+    doubleval = sa02adc2Vm(val);
   else
-    doubleval = ((val & 0xFFF) + 0.5)/0x1000 * 3.3;
+    doubleval = sa02adc2V(val);
   sa02Printf("VTH2  = %6.3f V\n",doubleval);
   sdata[i++]=doubleval;
   cmd=FEB_MUX;
   data=0x40;
   val=sa02Cmd(board, cmd, data, chip, channel ,1,response);
   Delay(0.01);
   cmd=FEB_ADC_READ;
   val=sa02Cmd(board, cmd, data, chip, channel ,1,response);
-  doubleval = ((val & 0xFFF) + 0.5)/0x1000 * 3.3;
+  doubleval = sa02adc2Vp(val);
   sa02Printf("VCC12 = %6.3f V\n",doubleval);
   sdata[i++]=doubleval;
   cmd=FEB_MUX;
   data=0x50;
   val=sa02Cmd(board, cmd, data, chip, channel ,1,response);
   Delay(0.01);
   cmd=FEB_ADC_READ;
   val=sa02Cmd(board, cmd, data, chip, channel ,1,response);
-  doubleval = ((val & 0xFFF) + 0.5)/0x1000 * 3.3;
+  doubleval = sa02adc2Vp(val);
   sa02Printf("VCC15 = %6.3f V\n",doubleval);
   sdata[i++]=doubleval;
   cmd=FEB_MUX;
   data=0x60;
   val=sa02Cmd(board, cmd, data, chip, channel ,1,response);
   Delay(0.01);
   cmd=FEB_ADC_READ;
   val=sa02Cmd(board, cmd, data, chip, channel ,1,response);
-  doubleval = ((val & 0xFFF) + 0.5)/0x1000 * 3.3;
+  doubleval = sa02adc2Vp(val);
   sa02Printf("VCC25 = %6.3f V\n",doubleval);
   sdata[i++]=doubleval;
   cmd=FEB_MUX;
   data=0x70;
   val=sa02Cmd(board, cmd, data, chip, channel ,1,response);
   Delay(0.01);
   cmd=FEB_ADC_READ;
   val=sa02Cmd(board, cmd, data, chip, channel ,1,response);
-  doubleval = 2 * ((val & 0xFFF) + 0.5)/0x1000 * 3.3;
+  doubleval = sa02adc2V38(val);
   sa02Printf("V+3.8 = %6.3f V\n",doubleval);
   sdata[i++]=doubleval;
   cmd=FEB_MUX;
   data=0x00;

Subversion Repositories f9daq

(root)/cvi/apps/sa02_daq/sa02lib.c – Rev 326 → 357