print "$Id: test_trigger.exper,v 1.1 2003/07/11 14:34:27 darnet Exp $"

// Sets up trigger, connection open on ttf5, initial voltage is -7.8 V
define object trigger = serial_port

// sets -3.12 V during 0.5s
call trigger activate 1
wait(0.5)
call trigger deactivate 1

// sets 1.5 V during 0.5s
call trigger activate 2
wait(0.5)
call trigger deactivate 2

// sets 6.2 V during 0.5s
call trigger activate 3
wait(0.5)
call trigger deactivate 3

// sets -3.12 V
call trigger activate 1
// Adds second line, raises to 6.2 V during 0.5s
call trigger activate 2
wait(0.5)
// returns to -7.8 V
call trigger deactivate "all"

// test pulse
call trigger pulse 1
call trigger pulse 2
call trigger pulse 3

// closes trigger
call trigger close

quit