MCA()

The following script does:

• a MCA spectrum is measured using EXP_MCA01, 8192 channels
• the timer EXP_T01 is gating the MCA, sample time is 1s
• after the measurement a .fio file is created, tst_00001.fio
• if the script is repeatedly called, the next file would be tst_00002.fio
• the motor positios are included in the output file

The full syntax of MCA() is given in 6.5.2.

#!/bin/perl
use Spectra; 

$Spectra::SYM{ generic_mca_name} = "tst"; 

$ret = Spectra::mca( 
  adc => "exp_mca01",         
  channels => 8192, 
  comment => 'this is a comment',   
  include_motors => 1,
  noconfirm => 1,   
  nodisplay => 0,    
  refresh_cycle => 1,    
  log_scale_y => 1,      
  sample_time => 1,      
  store => 1,        
  timer => "exp_t01",    
  update_time => 1);