Changeset 3081 for branches/mcstas-1.x

Show
Ignore:
Timestamp:
05/23/11 14:11:32 (12 months ago)
Author:
pkwi
Message:

Enabling gnuplot if installed on the system (plus including gnuplot in the Win32 install)

Location:
branches/mcstas-1.x
Files:
67 added
3 modified

Legend:

Unmodified
Added
Removed

  • branches/mcstas-1.x/install.bat

    r2123 r3081  
    8484@copy *.pl %MCSTAS_SITE%\bin 
    8585@copy support\pgplot_win32\*.* %MCSTAS_SITE%\bin 
     86@xcopy /e /y /q /i support\Win32\gnuplot\*.* %MCSTAS_SITE%\bin 
    8687@xcopy /e /y /q /i lib %MCSTAS_SITE%\lib 
    8788@echo Done 

  • branches/mcstas-1.x/lib/tools/perl/mcguilib.pl

    r2867 r3081  
    312312    my $formatchoice_val; 
    313313    if ($plotter =~ /McStas|PGPLOT/i)  { $formatchoice_val= 'PGPLOT'; } 
     314    if ($plotter =~ /Gnuplot/i)  { $formatchoice_val= 'Gnuplot'; }  
    314315    if ($plotter =~ /Matlab/i)  { $formatchoice_val= 'Matlab'; } 
    315316    if ($plotter =~ /Scilab/i) { $formatchoice_val= 'Scilab'; } 
    … …  
    317318    if ($plotter =~ /NeXus|HDF/) { $formatchoice_val='NeXus/HDF'; } 
    318319    if ($MCSTAS::mcstas_config{'NEXUS'} ne "") { 
    319       $opts = ['PGPLOT','Matlab','Scilab','HTML/VRML','NeXus/HDF']; 
     320      $opts = ['PGPLOT','Gnuplot','Matlab','Scilab','HTML/VRML','NeXus/HDF'];  
    320321    } else { 
    321       $opts = ['PGPLOT','Matlab','Scilab','HTML/VRML']; 
     322      $opts = ['PGPLOT','Gnuplot','Matlab','Scilab','HTML/VRML']; 
    322323    } 
    323324    my $formatchoice_orig=$formatchoice_val; 
    … …  
    424425      # update Plotter in case of change in this dialog (instead of Preferences) 
    425426      if ($formatchoice_val =~ /Matlab/i)    { $plotter= 'Matlab'; } 
    426       elsif ($formatchoice_val =~ /McStas|PGPLOT/i)  { $plotter= 'PGPLOT'; } 
     427      elsif ($formatchoice_val =~ /McStas|PGPLOT|Gnuplot/i)  { $plotter= 'PGPLOT'; } 
    427428      elsif ($formatchoice_val =~ /Scilab/i)    { $plotter= 'Scilab'; } 
    428429      elsif ($formatchoice_val =~ /HTML|VRML/i) { $plotter= 'HTML'; } 
    … …  
    543544    $b->attach($plotopt, -balloonmsg => "Select output format/plotter"); 
    544545    if ($plotter =~ /McStas|PGPLOT/i)  { $formatchoice_val= 'PGPLOT (original McStas)'; } 
     546    elsif ($plotter =~ /Gnuplot/i) { $formatchoice_val= 'Gnuplot'; } 
    545547    elsif ($plotter =~ /Matlab/i) { 
    546548      $formatchoice_val= 'Matlab' . ($plotter =~ /scriptfile/ ? 
    … …  
    654656 
    655657    if ($formatchoice_val =~ /Matlab/i)    { $plotter= 'Matlab'; } 
    656       elsif ($formatchoice_val =~ /McStas|PGPLOT/i)  { $plotter= 'PGPLOT'; } 
     658      elsif ($formatchoice_val =~ /McStas|PGPLOT|Gnuplot/i)  { $plotter= 'PGPLOT'; } 
    657659      elsif ($formatchoice_val =~ /Scilab/i)    { $plotter= 'Scilab'; } 
    658660      elsif ($formatchoice_val =~ /HTML|VRML/i) { $plotter= 'HTML'; } 

  • branches/mcstas-1.x/mcgui.pl

    r2861 r3081  
    997997        if ($newsi->{'Mode'} == 1) { 
    998998            push @command, "mcdisplay$suffix"; 
    999             if ($plotter =~ /PGPLOT|McStas/i) { 
     999            if ($plotter =~ /PGPLOT|McStas|Gnuplot/i) { 
    10001000              push @command, "--plotter=PGPLOT"; 
    10011001              # Selection of PGPLOT 3-pane view from config menu only. 
    … …  
    12791279        return unless $success; 
    12801280        my $ext; 
    1281         if ($plotter =~ /PGPLOT|McStas/i) { $ext="sim"; } 
     1281        if ($plotter =~ /PGPLOT|McStas|Gnuplot/i) { $ext="sim"; } 
    12821282        elsif ($plotter =~ /Matlab/i)     { $ext="m"; } 
    12831283        elsif ($plotter =~ /Scilab/i)     { $ext="sci"; } 
    … …  
    17581758    if ($MCSTAS::mcstas_config{'MATLAB'} ne "no")   { $text .= "Matlab "; } 
    17591759    if ($MCSTAS::mcstas_config{'PGPLOT'} ne "no")   { $text .= "PGPLOT/McStas "; } 
     1760    if ($MCSTAS::mcstas_config{'GNUPLOT'} ne "no")   { $text .= "Gnuplot "; }  
    17601761    if ($MCSTAS::mcstas_config{'BROWSER'} ne "no")  { $text .= "HTML "; } 
    17611762    if ($MCSTAS::mcstas_config{'VRMLVIEW'} ne "no") { $text .= "VRML "; }