Added possiblility to scan angle and sigma angle of implanted muons.

This commit is contained in:
2011-08-11 11:47:09 +00:00
parent 32d3458389
commit ce8b714e02
3 changed files with 299 additions and 163 deletions

View File

@ -37,6 +37,8 @@ void TrimSPGUI::ToggleScanSingle()
$All{"ScanSeq"}=ScanSeq->isChecked();
$All{"ERadio"}=ERadio->isChecked();
$All{"SigERadio"}=SigERadio->isChecked();
$All{"AngleRadio"}=AngleRadio->isChecked();
$All{"SigAngleRadio"}=SigAngleRadio->isChecked();
$All{"NProjRadio"}=NProjRadio->isChecked();
$All{"dRadio"}=dRadio->isChecked();
$All{"ScandL"}=ScandL->text();
@ -48,6 +50,10 @@ void TrimSPGUI::ToggleScanSingle()
# E->setText("2000");
SigE->setDisabled(0);
# SigE->setText("450");
Angle->setDisabled(0);
# Angle->setText("0");
SigAngle->setDisabled(0);
# SigAngle->setText("15");
NProj->setDisabled(0);
# NProj->setText("10000");
for (my $i=1;$i<=7;$i++) {
@ -71,18 +77,32 @@ void TrimSPGUI::ToggleScanSingle()
if ($All{"ScanSeq"}==1) {
# But if we are in scan mode disable the appropriate box
# Start by enabling everything
E->setDisabled(0);
SigE->setDisabled(0);
Angle->setDisabled(0);
SigAngle->setDisabled(0);
NProj->setDisabled(0);
my $LayerName = "L".$All{"ScandL"}."d";
my $LayerAttrib = child($LayerName);
$LayerAttrib->setDisabled(0);
# then disable one
if ($All{"ERadio"}) {
E->setDisabled(1);
# E->setText("");
} elsif ($All{"SigERadio"}) {
SigE->setDisabled(1);
# SigE->setText("");
} elsif ($All{"AngleRadio"}) {
Angle->setDisabled(1);
# Angle->setText("");
} elsif ($All{"SigAngleRadio"}) {
SigAngle->setDisabled(1);
# SigAngle->setText("");
} elsif ($All{"NProjRadio"}) {
NProj->setDisabled(1);
# NProj->setText("");
} elsif($All{"dRadio"}) {
my $LayerName = "L".$All{"ScandL"}."d";
my $LayerAttrib = child($LayerName);
$LayerAttrib->setDisabled(1);
# $LayerAttrib->setText("");
}
@ -255,6 +275,8 @@ void TrimSPGUI::CollectValues()
# if ($All{"ScanSeq"}) {
$All{"ERadio"}=ERadio->isChecked();
$All{"SigERadio"}=SigERadio->isChecked();
$All{"AngleRadio"}=AngleRadio->isChecked();
$All{"SigAngleRadio"}=SigAngleRadio->isChecked();
$All{"NProjRadio"}=NProjRadio->isChecked();
$All{"dRadio"}=dRadio->isChecked();
$All{"ScandL"}=ScandL->text();
@ -490,6 +512,8 @@ void TrimSPGUI::StartSequenceOne()
# For a scan
$All{"ERadio"}=ERadio->isChecked();
$All{"SigERadio"}=SigERadio->isChecked();
$All{"AngleRadio"}=AngleRadio->isChecked();
$All{"SigAngleRadio"}=SigAngleRadio->isChecked();
$All{"NProjRadio"}=NProjRadio->isChecked();
$All{"dRadio"}=dRadio->isChecked();
$All{"ScandL"}=ScandL->text();
@ -523,6 +547,10 @@ void TrimSPGUI::StartSequenceOne()
$ScanName = "E";
} elsif ($All{"SigERadio"}) {
$ScanName = "SigE";
} elsif ($All{"AngleRadio"}) {
$ScanName = "Angle";
} elsif ($All{"SigAngleRadio"}) {
$ScanName = "SigAngle";
} elsif ($All{"NProjRadio"}) {
$ScanName = "NProj";
} elsif ($All{"dRadio"}) {
@ -692,6 +720,8 @@ void TrimSPGUI::OpenFile()
$Types{"ScanSeq"}= 2;
$Types{"ERadio"}= 2;
$Types{"SigERadio"}= 2;
$Types{"AngleRadio"}= 2;
$Types{"SigAngleRadio"}= 2;
$Types{"NProjRadio"}= 2;
$Types{"dRadio"}= 2;
$Types{"ScandL"}= 1;
@ -786,6 +816,8 @@ Path=$All{'Path'}
ScanSeq=$All{'ScanSeq'}
ERadio=$All{'ERadio'}
SigERadio=$All{'SigERadio'}
AngleRadio=$All{'AngleRadio'}
SigAngleRadio=$All{'SigAngleRadio'}
NProjRadio=$All{'NProjRadio'}
dRadio=$All{'dRadio'}
ListRadio=$All{'ListRadio'}
@ -852,6 +884,8 @@ Path=$All{'Path'}
ScanSeq=$All{'ScanSeq'}
ERadio=$All{'ERadio'}
SigERadio=$All{'SigERadio'}
AngleRadio=$All{'AngleRadio'}
SigAngleRadio=$All{'SigAngleRadio'}
NProjRadio=$All{'NProjRadio'}
dRadio=$All{'dRadio'}
ListRadio=$All{'ListRadio'}