; ; IDL Widget Interface Procedures. This Code is automatically ; generated and should not be modified. ; ; Generated on: 07/17/2014 10:24.23 ; pro WID_pcrdv_base_event, Event wTarget = (widget_info(Event.id,/NAME) eq 'TREE' ? $ widget_info(Event.id, /tree_root) : event.id) wWidget = Event.top case wTarget of Widget_Info(wWidget, FIND_BY_UNAME='WID_pcrdv_base'): begin end Widget_Info(wWidget, FIND_BY_UNAME='W_load_raw_file_1'): begin if( Tag_Names(Event, /STRUCTURE_NAME) eq 'WIDGET_BUTTON' )then $ load_raw_file, Event end Widget_Info(wWidget, FIND_BY_UNAME='W_load_sata_file'): begin if( Tag_Names(Event, /STRUCTURE_NAME) eq 'WIDGET_BUTTON' )then $ load_sata_file, Event end Widget_Info(wWidget, FIND_BY_UNAME='W_load_pcrdv_file'): begin if( Tag_Names(Event, /STRUCTURE_NAME) eq 'WIDGET_BUTTON' )then $ load_pcrdv_file, Event end Widget_Info(wWidget, FIND_BY_UNAME='W_load_par_file'): begin if( Tag_Names(Event, /STRUCTURE_NAME) eq 'WIDGET_BUTTON' )then $ load_par_file, Event end Widget_Info(wWidget, FIND_BY_UNAME='W_load_idcdu_file'): begin if( Tag_Names(Event, /STRUCTURE_NAME) eq 'WIDGET_BUTTON' )then $ load_idcdu_file, Event end Widget_Info(wWidget, FIND_BY_UNAME='WID_save_pcrdv_btn'): begin if( Tag_Names(Event, /STRUCTURE_NAME) eq 'WIDGET_BUTTON' )then $ save_pcrdv_file, Event end Widget_Info(wWidget, FIND_BY_UNAME='WID_change_format_btn'): begin if( Tag_Names(Event, /STRUCTURE_NAME) eq 'WIDGET_BUTTON' )then $ change_format, Event end Widget_Info(wWidget, FIND_BY_UNAME='WID_analyze_data_btn'): begin if( Tag_Names(Event, /STRUCTURE_NAME) eq 'WIDGET_BUTTON' )then $ start_pcrdv_data_analysis, Event end Widget_Info(wWidget, FIND_BY_UNAME='WID_default_dir_tick_1'): begin if( Tag_Names(Event, /STRUCTURE_NAME) eq 'WIDGET_BUTTON' )then $ manage_default_dir_flag, Event end Widget_Info(wWidget, FIND_BY_UNAME='WID_PCRDV_STOP_1_btn'): begin if( Tag_Names(Event, /STRUCTURE_NAME) eq 'WIDGET_BUTTON' )then $ PCRDV_STOP_1, Event end Widget_Info(wWidget, FIND_BY_UNAME='WID_PCRDV_EXIT_btn'): begin if( Tag_Names(Event, /STRUCTURE_NAME) eq 'WIDGET_BUTTON' )then $ PCRDV_EXIT, Event end else: endcase end pro WID_pcrdv_base, GROUP_LEADER=wGroup, _EXTRA=_VWBExtra_ Resolve_Routine, 'pcrdv_gui_eventcb',/COMPILE_FULL_FILE ; Load event callback routines WID_pcrdv_base = Widget_Base( GROUP_LEADER=wGroup, $ UNAME='WID_pcrdv_base' ,XOFFSET=5 ,YOFFSET=5 ,SCR_XSIZE=367 $ ,SCR_YSIZE=366 $ ,NOTIFY_REALIZE='wpcrdv_service_param_on_realize' $ ,TITLE='PCRDV' ,SPACE=3 ,XPAD=3 ,YPAD=3) init_wpcrdv_service_param, WID_pcrdv_base, _EXTRA=_VWBExtra_ WID_load_btn = Widget_Button(WID_pcrdv_base, UNAME='WID_load_btn' $ ,XOFFSET=25 ,YOFFSET=19 ,SCR_XSIZE=150 ,SCR_YSIZE=50 $ ,/ALIGN_CENTER ,/MENU ,VALUE='LOAD') W_load_raw_file_1 = Widget_Button(WID_load_btn, $ UNAME='W_load_raw_file_1' ,VALUE='Load RAW file (.dat, .bin)') W_load_sata_file = Widget_Button(WID_load_btn, $ UNAME='W_load_sata_file' ,VALUE='Load SATA file (.sata)') W_load_pcrdv_file = Widget_Button(WID_load_btn, $ UNAME='W_load_pcrdv_file' ,VALUE='Load PCRDV file (.cmp)') W_load_par_file = Widget_Button(WID_load_btn, $ UNAME='W_load_par_file' ,VALUE='Load PAR file (.net, .bin,'+ $ ' .dat)') W_load_idcdu_file = Widget_Button(WID_load_btn, $ UNAME='W_load_idcdu_file' ,VALUE='Load IDCDU file (.idcdu)') WID_save_pcrdv_btn = Widget_Button(WID_pcrdv_base, $ UNAME='WID_save_pcrdv_btn' ,XOFFSET=185 ,YOFFSET=18 $ ,SCR_XSIZE=150 ,SCR_YSIZE=50 ,SENSITIVE=0 ,/ALIGN_CENTER $ ,VALUE='SAVE') WID_change_format_btn = Widget_Button(WID_pcrdv_base, $ UNAME='WID_change_format_btn' ,XOFFSET=25 ,YOFFSET=161 $ ,SCR_XSIZE=150 ,SCR_YSIZE=50 ,SENSITIVE=0 ,/ALIGN_CENTER $ ,VALUE='CHANGE FORMAT DATA') WID_analyze_data_btn = Widget_Button(WID_pcrdv_base, $ UNAME='WID_analyze_data_btn' ,XOFFSET=185 ,YOFFSET=161 $ ,SCR_XSIZE=150 ,SCR_YSIZE=50 ,SENSITIVE=0 ,/ALIGN_CENTER $ ,VALUE='ANALYZE') WID_source_file_txt = Widget_Text(WID_pcrdv_base, $ UNAME='WID_source_file_txt' ,XOFFSET=25 ,YOFFSET=89 $ ,SCR_XSIZE=310 ,SCR_YSIZE=18 ,/NO_NEWLINE ,VALUE=[ ' ' ] $ ,XSIZE=20 ,YSIZE=1) WID_source_file_label = Widget_Label(WID_pcrdv_base, $ UNAME='WID_source_file_label' ,XOFFSET=29 ,YOFFSET=74 $ ,/ALIGN_LEFT ,VALUE='Source file:') WID_applied_format_txt = Widget_Text(WID_pcrdv_base, $ UNAME='WID_applied_format_txt' ,XOFFSET=25 ,YOFFSET=131 $ ,SCR_XSIZE=310 ,SCR_YSIZE=18 ,/NO_NEWLINE ,VALUE=[ ' ' ] $ ,XSIZE=20 ,YSIZE=1) WID_applied_format_label = Widget_Label(WID_pcrdv_base, $ UNAME='WID_applied_format_label' ,XOFFSET=28 ,YOFFSET=116 $ ,/ALIGN_LEFT ,VALUE='Applied format:') WID_BASE_1 = Widget_Base(WID_pcrdv_base, UNAME='WID_BASE_1' $ ,XOFFSET=30 ,YOFFSET=274 ,SCR_XSIZE=102 ,SCR_YSIZE=36 $ ,TITLE='IDL' ,COLUMN=1 ,/NONEXCLUSIVE) WID_default_dir_tick_1 = Widget_Button(WID_BASE_1, $ UNAME='WID_default_dir_tick_1' ,/ALIGN_LEFT ,VALUE='Default'+ $ ' directory') WID_total_batch_txt = Widget_Text(WID_pcrdv_base, $ UNAME='WID_total_batch_txt' ,XOFFSET=100 ,YOFFSET=230 $ ,SCR_XSIZE=78 ,SCR_YSIZE=18 ,/WRAP ,VALUE=[ ' ' ] ,XSIZE=20 $ ,YSIZE=1) WID_total_num_batch_label = Widget_Label(WID_pcrdv_base, $ UNAME='WID_total_num_batch_label' ,XOFFSET=28 ,YOFFSET=232 $ ,/ALIGN_LEFT ,VALUE='Num batch:') WID_signal_available_label = Widget_Label(WID_pcrdv_base, $ UNAME='WID_signal_available_label' ,XOFFSET=210 ,YOFFSET=230 $ ,/ALIGN_RIGHT ,VALUE='Signal: NOT AVAILABLE' ,/SUNKEN_FRAME) WID_PCRDV_STOP_1_btn = Widget_Button(WID_pcrdv_base, $ UNAME='WID_PCRDV_STOP_1_btn' ,XOFFSET=151 ,YOFFSET=274 $ ,SCR_XSIZE=83 ,SCR_YSIZE=41 ,/ALIGN_CENTER ,VALUE='STOP') WID_PCRDV_EXIT_btn = Widget_Button(WID_pcrdv_base, $ UNAME='WID_PCRDV_EXIT_btn' ,XOFFSET=252 ,YOFFSET=274 $ ,SCR_XSIZE=83 ,SCR_YSIZE=41 ,/ALIGN_CENTER ,VALUE='EXIT') Widget_Control, /REALIZE, WID_pcrdv_base XManager, 'WID_pcrdv_base', WID_pcrdv_base, /NO_BLOCK end ; ; Empty stub procedure used for autoloading. ; pro pcrdv_gui, GROUP_LEADER=wGroup, _EXTRA=_VWBExtra_ WID_pcrdv_base, GROUP_LEADER=wGroup, _EXTRA=_VWBExtra_ end