LMU/musrsim
LMU/musrsim
5
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Added possiblility to scan energy with sigma angle.

Browse Source
This commit is contained in:
salman 2011-08-11 14:43:55 +00:00
parent ce8b714e02
commit 2204f800f1
2 changed files with 27 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
trimsp/TrimSPGUI/TrimSPGUI.pl
View File

@ -1,6 +1,6 @@
# Form implementation generated from reading ui file 'TrimSPGUI.ui'
#
# Created: Thu Aug 11 13:41:48 2011
# Created: Thu Aug 11 16:30:24 2011
# by: The PerlQt User Interface Compiler (puic)
#
# WARNING! All changes made in this file will be lost!
@ -2020,7 +2020,14 @@ sub ToggleScanSingle
ScanListdz->setHidden(0);
dzListLabel->setDisabled(0);
ScanListdz->setDisabled(0);
} else {
dzListLabel->setText("Corresponding depth increment (optional)");
} elsif ($All{"SigAngleRadio"} & $All{"ListRadio"}) {
dzListLabel->setHidden(0);
ScanListdz->setHidden(0);
dzListLabel->setDisabled(0);
ScanListdz->setDisabled(0);
dzListLabel->setText("Corresponding energy");
} else {
dzListLabel->setHidden(1);
ScanListdz->setHidden(1);
dzListLabel->setDisabled(1);
@ -2521,7 +2528,11 @@ sub StartSequenceOne
foreach (@SValues) {
$ScanAttrib->setText($_);
if ( $All{"SdzFlag"} == 1) {
dz->setText($SdzValues[$iScan]);
if ($All{"ERadio"}==1) {
dz->setText($SdzValues[$iScan]);
} elsif ($All{"SigAngleRadio"}==1) {
E->setText($SdzValues[$iScan]);
}
}
my $eingabe1=CreateInpFile();
if ($eingabe1 eq "ERROR") {return 0;}

15
trimsp/TrimSPGUI/TrimSPGUI.ui.h
View File

@ -68,7 +68,14 @@ void TrimSPGUI::ToggleScanSingle()
ScanListdz->setHidden(0);
dzListLabel->setDisabled(0);
ScanListdz->setDisabled(0);
} else {
dzListLabel->setText("Corresponding depth increment (optional)");
} elsif ($All{"SigAngleRadio"} & $All{"ListRadio"}) {
dzListLabel->setHidden(0);
ScanListdz->setHidden(0);
dzListLabel->setDisabled(0);
ScanListdz->setDisabled(0);
dzListLabel->setText("Corresponding energy");
} else {
dzListLabel->setHidden(1);
ScanListdz->setHidden(1);
dzListLabel->setDisabled(1);
@ -562,7 +569,11 @@ void TrimSPGUI::StartSequenceOne()
foreach (@SValues) {
$ScanAttrib->setText($_);
if ( $All{"SdzFlag"} == 1) {
dz->setText($SdzValues[$iScan]);
if ($All{"ERadio"}==1) {
dz->setText($SdzValues[$iScan]);
} elsif ($All{"SigAngleRadio"}==1) {
E->setText($SdzValues[$iScan]);
}
}
my $eingabe1=CreateInpFile();
if ($eingabe1 eq "ERROR") {return 0;}