pdf - Institut für Experimentelle Kernphysik

Anhang C
Quellcodes
Dieser Anhang enthält die zentralen Teile der Analyseprogramme.
C.1 Analyseroutine im Online-Monitor
#include "c:\programme\labview\cintools\extcode.h"
UseDefaultCINInit
UseDefaultCINDispose
UseDefaultCINAbort
UseDefaultCINLoad
UseDefaultCINUnload
UseDefaultCINSave
typedef struct {
int32 dimSize;
float32 arg1[1];
} TD1;
typedef TD1 **TD1Hdl;
typedef struct {
int32 dimSize;
int32 arg1[1];
} TD2;
typedef TD2 **TD2Hdl;
typedef struct {
float32 minS2N;
float32 minCluS2N;
int32 polarity;
int32 MNOISIC;
int32 NOCICG;
int32 NOCIFCG;
} TD3;
typedef struct {
int32 size;
float32 Ampl;
float32 CluN;
float32 MeanN;
int32 HSP;
} TD4;
CIN MgErr CINRun(TD2Hdl HitFlag, TD1Hdl CathodeGroupCorrected, TD2Hdl Ignore, TD1Hdl Noise, TD3 *Config, TD4 *Cluster,
LVBoolean *Accepted);
CIN MgErr CINRun(TD2Hdl HitFlag, TD1Hdl CathodeGroupCorrected, TD2Hdl Ignore, TD1Hdl Noise, TD3 *Config, TD4 *Cluster,
LVBoolean *Accepted) {
int32 Strips=(**CathodeGroupCorrected).dimSize;
int32 Channel,BeginCathodeGroup,EndCathodeGroup,NumberOfHits,NumberOfNotHitStrips,MaxChannel,direction,BeginChannel,
EndChannel,NumberOfIgnoredStripsInCluster=0,NumberOfStripsInCluster=1;
float32 CathodeGroupMean,MaxVal=-9999.,Tmp;
// init cluster
(*Cluster).size =0 ;
(*Cluster).Ampl =0.0;
(*Cluster).CluN =0.0;
(*Cluster).MeanN=0.0;
(*Cluster).HSP =0 ;
87