#=======================================================================
# quadout.sl - Quadrupole exit electrode and detector.
#
# HISTORY:
# 2003-11 - ported to SL (D.J.Manura, Scientific Instrument Services, Inc.)
#           Based on QUADOUT.PRG example in SIMION 7.0 (David A. Dahl).
# $Revision: 1.2 $ $Date: 2004/07/17 20:54:46 $
#=======================================================================
 
import "quadvars.sl"

#===== variables

static next_pe_update_out = 0.0    # next PE surface update time

#===== subroutines
 
# Generates trap rf.
sub fast_adjust
    adj_elect03 = _quad_exit_voltage
    adj_elect04 = _detector_voltage
 
    # Note: these can be adjusted during the simulation, so they
    # must be recalculated.
    rfvolts = scaled_rf * _amu_mass_per_charge
    dcvolts = scaled_rf * _amu_mass_per_charge * _percent_tune / 100 * 0.1678399
    tempvolts = sin(ion_time_of_flight * omega + theta) * rfvolts + dcvolts
    
    adj_elect01 = _quad_axis_voltage + tempvolts
    adj_elect02 = _quad_axis_voltage - tempvolts
endsub
 
# Update potential energy surface display periodically.
sub other_actions
    if ion_time_of_flight >= next_pe_update_out
        next_pe_update_out = ion_time_of_flight + pe_update_each_usec
        update_pe_surface = 1
    endif
endsub