print, "test_gated script starting."

taurus = mx_get_record( mx_database, "taurus" )

server = mx_get_record( mx_database, "adserver" )

image_frame_data_nf = mx_network_field_init( server, "taurus.image_frame_data" )

num_frames = 10
exposure_time = 2.0
gate_time = 25.0

fifth_frame_transferred = 0

mx_area_detector_set_gated_mode, taurus, num_frames, exposure_time, gate_time

print, "Detector setup for gated mode (sro 0)"
print, "  num_frames = ", num_frames
print, "  exposure_time = ", exposure_time
print, "  gate_time = ", gate_time

mx_area_detector_start, taurus

print, "Detector started."

while 1 do begin

    extended_status = mx_area_detector_get_extended_status( taurus )

    print, extended_status

    if ( fifth_frame_transferred eq 0 ) then begin
        last_frame_number = extended_status[0]

        if ( last_frame_number ge 4 ) then begin
            mx_area_detector_readout_frame, taurus, 4
            mx_area_detector_correct_frame, taurus

            ;;; frame = mx_area_detector_transfer_frame( taurus, 0, frame )

            image_frame_data = mx_get( image_frame_data_nf )

            fifth_frame_transferred = 1

            print, "Fifth frame transferred."
        endif
    endif

    status = extended_status[2]

    if ( status eq 0 ) then begin
        print, "Detector sequence complete."
        stop
    endif

    wait, 1.0
endwhile

end