Subversion Repositories f9daq

Rev

Rev 32 | Rev 34 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 32 Rev 33
Line 23... Line 23...
23
#include <userint.h>
23
#include <userint.h>
24
#include <ansi_c.h>
24
#include <ansi_c.h>
25
#include <utility.h>
25
#include <utility.h>
26
#include <analysis.h>
26
#include <analysis.h>
27
 
27
 
28
#include "c:\HOME\dino\sipmScan\include\sipmThreshold_ui.h"
28
#include "c:\HOME\dino\sipmScan\include\sipmBias_ui.h"
29
 
29
 
30
#ifdef USE_DAQ
30
#ifdef USE_DAQ
31
#  define USE_CAMAC
31
#  define USE_CAMAC
32
#  include "camac.h"
32
#  include "camac.h"
33
#  define NDAC 1
33
#  define NDAC 1
Line 146... Line 146...
146
 
146
 
147
  typedef struct {
147
  typedef struct {
148
    unsigned long id,len;
148
    unsigned long id,len;
149
    unsigned long fver,time;
149
    unsigned long fver,time;
150
    unsigned long nev,nch,ped,xy;
150
    unsigned long nev,nch,ped,xy;
151
    unsigned long thLow, thUp, thStep;
-
 
152
    long nx,x0,dx,ny,y0,dy;
151
    long nx,x0,dx,ny,y0,dy;
153
    } RUNREC;
152
    } RUNREC;
154
        RUNREC runrec;
153
        RUNREC runrec;
155
       
154
       
156
  typedef struct {
155
  typedef struct {
Line 174... Line 173...
174
        EVTREC evtrec;
173
        EVTREC evtrec;
175
       
174
       
176
  typedef struct {
175
  typedef struct {
177
        unsigned long id;
176
        unsigned long id;
178
        unsigned long len;
177
        unsigned long len;
-
 
178
        unsigned long thLow, thUp, thStep;
179
        unsigned long threshold;
179
        unsigned long threshold;
180
        } THRREC;
180
        } THRREC;
181
  THRREC thrrec;
181
  THRREC thrrec;
182
       
182
       
183
        double thresholdLow;
183
        double thresholdLow;
Line 535... Line 535...
535
#ifdef USE_MIKRO_Z
535
#ifdef USE_MIKRO_Z
536
  MIKRO_Init (MIKRO_Z,0);
536
  MIKRO_Init (MIKRO_Z,0);
537
#endif
537
#endif
538
#endif
538
#endif
539
 
539
 
540
  if ((p1h = LoadPanel (0, "include/sipmThreshold_ui.uir", P1)) < 0) return -1;
540
  if ((p1h = LoadPanel (0, "include/sipmBias_ui.uir", P1)) < 0) return -1;
541
  DisplayPanel (p1h);
541
  DisplayPanel (p1h);
542
  SetCtrlAttribute (p1h, P1_PLCH, ATTR_MAX_VALUE, NCH-1);
542
  SetCtrlAttribute (p1h, P1_PLCH, ATTR_MAX_VALUE, NCH-1);
543
 
543
 
544
  GetCtrlVal(p1h, P1_ADCHLSAVE, &runrec.xy);
544
  GetCtrlVal(p1h, P1_ADCHLSAVE, &runrec.xy);
545
  SetCtrlVal(p1h, P1_ADCHL, runrec.xy-2);
545
  SetCtrlVal(p1h, P1_ADCHL, runrec.xy-2);