void KVSiB::SetCalibrators()
{
//Adds linear calibration for E channel
KVLinCal* cal = new KVLinCal(this);
cal->SetChannelParameter("E");
cal->WithPedestalCorrection(kFALSE);
if (!AddCalibrator(cal)) delete cal;
fLinCal = (KVLinCal*)GetCalibrator("Linear calibration E");
KVCalibrator* c = new KVPulseHeightDefect(this);
if (!AddCalibrator(c)) delete c;
fPHD = (KVPulseHeightDefect*) GetCalibrator("Pulse Height Defect");
}
void KVChIo::SetCalibrators()
{
//Set up calibrators for this detector. Call once name has been set.
KVCalibrator*c=new KVChannelVolt("GG", this);
if(!AddCalibrator(c)) delete c;
c=new KVChannelVolt("PG", this);
if(!AddCalibrator(c)) delete c;
c=new KVVoltEnergy(this);
if(!AddCalibrator(c)) delete c;
fVoltE = (KVVoltEnergy *) GetCalibrator("Volt-Energy");
fChVoltPG = (KVChannelVolt *) GetCalibrator("Channel-Volt PG");
fChVoltGG = (KVChannelVolt *) GetCalibrator("Channel-Volt GG");
}
void KVHarpeeSi::SetCalibrators()
{
// Pulse Height Defect calibrator as well as the calibrators of
// KVVAMOSDetector.
KVVAMOSDetector::SetCalibrators();
// Set PHD calibrator only if the detector has an acq. parameter
// with type 'E'
TObject* par = GetACQParamList()->FindObjectByType("E");
if (!par) return;
TString type("channel->MeV ");
type.Append(par->GetName());
fCanalE = (KVFunctionCal*)GetCalibrator(type.Data());
if (!fCanalE) Error("SetCalibrators", "channel->MeV calibrator not found");
KVRecombination* c = new KVRecombination(this);
type = c->GetType();
type.Append(" ");
type.Append(par->GetName());
c->SetType(type.Data());
if (!AddCalibrator(c)) delete c;
fPHD = (KVRecombination*)GetCalibrator(type.Data());
}
void KVBIC::SetCalibrators()
{
//Adds linear calibration for PG channel
KVLinCal* cal = new KVLinCal(this);
cal->SetChannelParameter("PG");
cal->WithPedestalCorrection(kFALSE);
if (!AddCalibrator(cal)) delete cal;
}
//------------------------------
void KVCsI_e475s::SetCalibrator(KVDBParameterSet* kvdbps)
//------------------------------
{
KVFunctionCal* cali = new KVFunctionCal(kvdbps);
if (!AddCalibrator(cali)) {
Warning("SetCalibrator(KVDBParameterSet*)",
"Addition of Calibrator %s %s failed !", kvdbps->GetName(), kvdbps->GetTitle());
delete cali;
} else {
if (TString(cali->GetType()).Contains("(LT)")) fcalibLT = cali;
else fcalibLT = 0;
}
}
