Date 30 May 1995 Main program : WRT_IMAGE.PRO wrt_image.pro st_rini (c module) wrt_build xmanager : main13_event pdmenu5_event (MENU activated) FILE.save FILE.print wrt_print FILE.exit img_rexit OPERATIONS OPTIONS.continuous.display_ON dispon timer OPTIONS.continuous.display_OFF OPTIONS.next image wrt_build img_rhdr img_rlin wrt_disp_spec_im wrt_readfmt wrt_disp_spat_im 'main13'(TIMER) >>wrt_build when display.continuous_ON window_draw (cursor position Automat for rebuilding spatial x spatial image or temporal evolution used in wrt_build.pro DISPLAY_STATUS =Status used for rasters concerning the display 0 beginning of the raster/initialization 1 intermediate lines of the raster 2 end of the raster found 3 new raster found before the end of the last one 4 error in the wavelenght expected ; end of the last raster WAVE_TEST = status used for detrmine the number of wavelengths of the spectrohelio 0 number of lines not determined 1 number of lines determined once 2 same number of lines retreived twice ITLAMBDA = counter used in a loop to determine the parameters of the raster must be [0,49] SEQ_TEST = status used for the comparizon of parameters during a raster 0 step size or step number or format number has changed compared with the last format received 1 same step size and step number and image format than the previous format IMGAC_DATA = accumulative image counter must be >= imgac_min (if already defined) must be <= imgac_max (if already defined) _____________________________________________________________________________ display_stat itlambda imgac_data wave_test seq_test case process _____________________________________________________________________________ | | | | < imgac_min 1 II | | | |=1 | | | | >= imgac_min 2 I | | | < 49 |____________________________________________________ | | | | < imgac_min 3 II | | | |=0 | | | | >= imgac_min 4 III | | =0 |_______|____________________________________________________ | | | | < imgac_min 5 II | | | |=1 | | | | >= imgac_min 6 III | | | >= 49 |____________________________________________________ | | | | < imgac_min 7 II | | | |=0 | | | | >= imgac_min 8 III | =1 | ______|_______|____________________________________________________ | | | | < imgac_min 1 II | | | |=1 | | | | >= imgac_min 2 I | | | < 49 |____________________________________________________ | | | | < imgac_min 3 II | | | |=0 | | | | >= imgac_min 4 III | | =1 |_______|____________________________________________________ | | | | < imgac_min 5 II | | | |=1 | | | | >= imgac_min 6 III | | | >= 49 |____________________________________________________ | | | | < imgac_min 7 II | | | |=0 | | | | >= imgac_min 8 III | |_______|_______|____________________________________________________ | | | | < imgac_min 1 II | | | |=1 imgac_min<= x <= imgac_max 9 IV | | | | >= imgac_max 10 V | | | < 49 |____________________________________________________ | | | | < imgac_min 3 II | | | |=0 imgac_min<= x <= imgac_max 11 VI | | | | >= imgac_max 12 V | | =2 |_______|____________________________________________________ | | | | < imgac_min 6 II | | | |=1 imgac_min<= x <= imgac_max 13 IV | | | | >= imgac_max 14 V | | | >= 49 |____________________________________________________ | | | | < imgac_min 7 II | | | |=0 imgac_min<= x <= imgac_max 15 VI | | | | >= imgac_max 16 V |_______|_______|_______|____________________________________________________ *** CASE 1 *** DISPLAY_STATUS = 1 WAVE_TEST = 0 | 1 | 2 ITLAMBDA = < 49 SEQ_TEST = 1 IMGAC_DATA = < imgac_min Read the data status not changed Look for following header *** CASE 2 *** DISPLAY_STATUS = 1 WAVE_TEST = 0 | 1 ITLAMBDA = < 49 SEQ_TEST = 1 IMGAC_DATA = >= imgac_min Read the data Process the data /process A *** CASE 3 *** DISPLAY_STATUS = 1 WAVE_TEST = 0 | 1 | 2 ITLAMBDA = < 49 SEQ_TEST = 0 IMGAC_DATA = < imgac_min Read the data Status not changed Look for following header *** CASE 4 *** DISPLAY_STATUS = 1 WAVE_TEST = 0 | 1 ITLAMBDA = <49 SEQ_TEST = 0 IMGAC_DATA = >= imgac_min No image read Display a message Header in memory return to the menu *** CASE 5 *** DISPLAY_STATUS = 1 WAVE_TEST = 0 | 1 ITLAMBDA = >= 49 SEQ_TEST = 1 IMGAC_DATA = < imgac_min No image read Display a message Header in memory Return to the menu *** CASE 6 *** DISPLAY_STATUS = 1 WAVE_TEST = 0 | 1 | 2 ITLAMBDA = >= 49 SEQ_TEST = 1 IMGAC_DATA = >= imgac_min Read the data Status not changed Look for the following image *** CASE 7 *** DISPLAY_STATUS = 1 WAVE_TEST = 0 | 1 | 2 ITLAMBDA = >= 49 SEQ_TEST = 0 IMGAC_DATA = < imgac_min Read the data Status not changed Look for the following image *** CASE 8 *** DISPLAY_STATUS = 1 WAVE_TEST = 0 | 1 ITLAMBDA = >= 49 SEQ_TEST = 0 IMGAC_DATA = >= imgac_min No image read Display a message Header in memory Return to the menu *** CASE 9 *** DISPLAY_STATUS = 1 WAVE_TEST = 2 ITLAMBDA = < 49 SEQ_TEST = 1 IMGAC_DATA = imgac_min <= x <= imgac_max Read the data Process the data /process B *** CASE 10 *** DISPLAY_STATUS = 1 WAVE_TEST = 2 ITLAMBDA = < 49 SEQ_TEST = 1 IMGAC_DATA = >= imgac_max No image read Display current image with display_status=2 Header in memory Return to the menu *** CASE 11 *** DISPLAY_STATUS = 1 WAVE_TEST = 2 ITLAMBDA = < 49 SEQ_TEST = 0 IMGAC_DATA = imgac_min<= x <= imgac_max No image read Display current image with error message "REBUILT ABORTED" Header in memory Return to the menu *** CASE 12 *** DISPLAY_STATUS = 1 WAVE_TEST = 2 ITLAMBDA = < 49 SEQ_TEST = 0 IMGAC_DATA = >= imgac_max No image read Display current image Header in memory return to the menu *** CASE 13 *** DISPLAY_STATUS = 1 WAVE_TEST = 2 ITLAMBDA = >= 49 SEQ_TEST = 1 IMGAC_DATA = imgac_min<= x <= imgac_max Read the data Process the data /process B *** CASE 14 *** DISPLAY_STATUS = 1 WAVE_TEST = 2 ITLAMBDA = >= 49 SEQ_TEST = 1 IMGAC_DATA = >= imgac_max No image read Display current image with display_status=2 Header in memory Return to the menu *** CASE 15 *** DISPLAY_STATUS = 1 WAVE_TEST = 2 ITLAMBDA = >= 49 SEQ_TEST = 0 IMGAC_DATA = imgac_min<= x <= imgac_max No image read Display current image with error message "REBUILT ABORTED" Header in memory Return to the menu *** CASE 16 *** DISPLAY_STATUS = 1 WAVE_TEST = 2 ITLAMBDA = >= 49 SEQ_TEST = 0 IMGAC_DATA = >= imgac_max No image read Display current image with display_status=2 Header in memory Return to the menu