pyview_test_data/FakeData_tiny/IDLprogs/hannah_master_tiff_neu.pro

pro hannah_master_tiff_neu

; sample master file
; containing all available flags as of september 2008
; sorted in logical groups
; note, however, that not all flag settings are mentioned
; you still need to know what you can do and what the program does
; and you still need to run the necessary constrols


;set common blocks to get access to the variables
common data ;contains all data variables
common vars ;contains those flags that are not "flag[xxx]"
common CFD  ;contains the flag-variables
common CFDconst  ;contains the names of the flag-variables
common ExportMovieFlags ;contains the flags for movie control

; general system settings in VARS
	;colortable (for byte values 0-255)
	colortable 	= 12
	;often used color tables are: (some defined in DefineExplicitCt.pro)
	; 0 for black and white
	; 11, 12, 13 for a smooth rainbow. They differ in BW colors for color 0 and 255
	;     optimized for printout or for screen
	; 14 has 128 as grey, lower range cyan to blue, upper range yellow to red
	; 36: cyan-blue-*black*-red-yellow-white
	; 37: cyan-blue-*black*-red-yellow
	; 38: black-red-yellow-white table

	;internal variable for mac compatibitity, not used any more
	flag[MacSystem] 	= (!version.os_family eq 'MacOS')

	;setting for interactive mode ("view"), or master_mode
	flag[BatchMode]		= 1
	;graphics flag
	flag[TrueColour]	= 0
;end of general settings

;*****************************
;flags related to LOADING DATA
;*****************************

	;format of data files (used in LoadDataMaster.pro)
	flag[view_loadExp]      = 3;3;4 	; 0 for old setup, to 1 for Visicam, 2 for confocal
	;TILL photonics single wavelength: 3
	;TILL photonics dual wavelength (FURA): 4
	;ZEISS multiphoton data: 20

	;should the raw data be median filtered? (used in ViewLoadData\MedianCorrection.pro)
	flag[CSM_Median]			= 3
	;do a median correction when loading the data
	;0: no median
	;1: median in space fixed values
	;2: median in time fixed values
	;3: median in space and time, using flag values (CSM_Median_space)(CSM_Median_time)
	flag[CSM_Median_space]		= 5
	; used with CSM_Median eq 3
	flag[CSM_Median_time]		= 0
	; used with CSM_Median eq 3

	;apply an off-line binning (shrinkFaktor).
	flag[le_shrinkFaktor]	   	= 1     ;no shrinkfaktor with 1

	;are there different focal depth to be split?
	flag[RM_separateLayers] 	= 0
	;separates the layers in exportGlomeruli and SingleOverviews

	;how to make movement correction based on .moveList file. (used in ViewLoadData\MovementCorrectionMaster.pro)
	flag[CSM_Movement]			= 0
	;set to 0: no movement correction (BUT shifts from .lst file are USED!)
	;set to 1: on the spot movement correction
	;set to 2: as 1, but calculated movements are saved in the moveList file
	;set to 3: movement values are read from the moveList file
	;set to 5: no movement correction, but shifts are taken from the movement file
	;values above 10: mathiasCorrection.
	flag[CSM_DataShift]				= 1
	;set to 0: data is NOT shifted, coordinates ARE shifted
	;set to 1: data IS shifted, coordinate are NOT shifted
	;set to 2: NONE is shifted

	;trim the data frames to be loaded
	;remove n frames at the beginning of each measurement
	flag[CSM_SkipFrmUpFront]		= 0
	;remove n frames at the end of each measurement
	flag[CSM_SkipFrmAtBack]				= 0

	;settings to reduce memory usage
	flag[VIEW_No4Darray]			= 0
	;this reduces the sig1 array to a 3D array instead of a 4D array; not all routines work with this setting
	;set to 1: odor 0 is cut off memory after loading the data, p1.odors is reduced by 1
	flag[VIEW_DeleteRawData]		= 1
	;this removes the raw data from memory after loading

	;correct for scattered light, improving spatial resolution	(used in CalcSigAll3000.pro)
	flag[VIEW_ScatterLightFactor]	= 1
	;for the 3xyy and 4xyy family with scattered light correction, this factor gives the strength of the unsharp mask. Default: 1
	;only used if (yy ne 00)

	;load more than one experiment at the time
	flag[view_MultiExp]     		= 0 	; 0 for single experiment
	;load AIR trial alongside the odor response (air trial is given in control column in the .lst file)
	flag[LE_AskForAir]	     		= 0 	; 0 for not loading air

;END of flags related to loading data


;************************************
;flags related to CALCULATING SIGNALS
;************************************

	;how to calculate the data (used in ViewCalculateData\CalcSigMaster.pro)
	flag[view_CalcMethod]   = 3550; see calcsigmaster3000
	;family 3xyy (deltaF/f) and 4xyy (ratio) uses x for bleach correction settings, and yy for scattered light correction
	;see  CalcSigAll3000.pro for detailed settings. Example are:
			; setting:    0 1 2 3 4 5 6 7 8 9
			;alPerimeter  + + + + - - - - C - ; with 8 bleaching is in coordinates only (variable: CoorPerimeter)
			;excludeStim  - + - + - + - + - - ; exclude stimulus is obsolete - controled by LE_BleachStartFrame group
			;addNoise     - - + + - - + + - -
			;no bleach    - - - - - - - - - +
			;air bleach   - - - - - - - - + - ;correct with bleach parameters taken from air trial
	;set to 3 for no calculation (original data).

	;which frames to use for calculating F in deltaF/F
	flag[LE_StartBackground]   		= 4; for deltaF/F calculations, or bleach corrections
	;set to -1 not to subtract background in data calculation, to frame for background start. Default: 4
	flag[LE_PrestimEndBackground]   = 0; for deltaF/F calculations, or bleach corrections
	;How many frames before stimulus to stop with background. Default: 2
	;so: background is calculated from LE_StartBackground to StimulusOn - LE_PrestimEndBackground
	;that means that StimulusOn is an important parameter and needs to be set correctly for deltaF/F

	;settings for bleach correction when using CalcSigAll3000
	flag[LE_BleachStartFrame]	= 1; start bleaching correction here
	;for logarithmic bleach correction, all frames smaller are excluded in the fit function
	;used in CalcSigAll3000; default 2
	flag[LE_LogInitialFactor]	= 3; weigh the frames before stimulus more than those after stimulus
	;for logarithmic bleach correction, all frames before stimulus onset are more important by this factor
	;used in CalcSigAll3000; default 1 for maximum compatibility
	flag[LE_LogExcludeSeconds]	= 12; 15 für vaga; 12 für vaga2016; 12 für Apis; how many seconds should be excluded during stimulation for bleach log fitting?
	;for logarithmic bleach correction, how many seconds after stimulus onset to exclude
	;used in CalcSigAll3000; default 0 for maximum compatibility
	;this uses the time information - therefore make sure that is correct
	;graphic display of weights can be switched of and on in the program CalcSigAll3000

;END of flags related to calculating signals


;************************************
;flags related to SIGNAL CORRECTIONS
;************************************
;note: this is for the extra set of corrected signals, not for corrections done during loading or calculation

;ask for air needs to be set to 1 to use this
	flag[VIEW_InitCorr]			= -1	; set to -1 in order not to create a corrected data set
	CorrectFlag					= 0 	; set to 1 to access corrected dataset, to 0 to access original data set



;*************************************
;flags related to data analysis OUTPUT
;*************************************

	flag[VIEW_ReportMethod]		= 119	; which output do you want? This is one of the main flags
										; all settings are in View_gr_reports\subloop_report.pro; the most often used are
										; 10: false-color coded pictures (calls reportTIFF)
										; 11, 111: glodatamix (without, with tags)
										; 12: movies
										; 19, 119: glodatamix with CTV (without, with tags)

	flag[CTV_Method]			= 22	; curve-to-value function for single number output or still images
										; 22 gives
										; 22 is the difference between two fixed points
										; 35 relates to the maximum within 3 secs after stimulus onset
										; all values in ViewOverview\CurveToValue
										; values below 0 go to personal program in ImageALlocal folder: CurveToValueLocal.pro
	flag[CTVM_Method]			= 0		; for multiple CTV values at once, not safely implemented yet

	firstframe 					= 60   	; 70; vaga2016 60; many CTVs use fixed frames. These use the variables firstFrame and lastFrame
	lastframe  					= 30	; 35; vaga2016 30; for example, CTV 22 calculates the difference between lastframe (3 frames) and firstframe (3 frames)

	flag[LE_FirstBuffer]		= 1		; sets which buffer to start with in output routines
										; standard is 1. Set to 0 to start with 0 (generally 0 is empty)
										; instead of LE_firstbuffer you can use LE_usefirstbuffer (synonymous)

	;old flags, currently out of fashion
	flag[PTA_PlotTimeRange]		= 1		;
	flag[PTA_PlotMeanValue]		= 1		;

	;flags specifically for graphical output (TIFF files and the like, i.e. "overviews")
	flag[SO_Method]				= 10	; used in ViewOverview\Overview.pro. Only values 0 or 10 are used now
										;  0 for calculations pixel by pixel (i.e. on the time-course in each pixel)
										; 10 for calculations frame by frame (much faster, but not all functions are possible)
										; for 10, the CTV value is applied within ViewOverview\overview10ctv.pro
	flag[SO_indiScale]			= 3		; what scaling to use? 0 for fixed values, else individual scale for each frame
										; 3 for scaling within center of each frame
										; can be used in quite sophisticated ways, see ViewOverview\SingleOverviews.pro
										; also explained in the documentation
	scalemax 				=  3.000	; value to scale maximum to with SO_indiScale equals 0
	scalemin 				= -1.000	; corresponding value for minimum

	flag[SO_morphoBackgr]		= 0		; Used to show an anatomical picture with an overlay of only the strongest POSITIVE responses
	flag[SO_morphoBackgrNeg]	= 0		; Used to show an anatomical picture with an overlay of only the strongest NEGATIVE responses
	flag[SO_withinmask]			= 0		; False-color output limited to the mask in the .area file

	flag[CTV_scalebar]			= 0		; some output options allow to print out the color scalebar (SingleOverviews.pro)
	flag[RM_FotoOk]				= 1 	; Overlay other information to overview output, (SingleOverviews.pro)
										; 1: puts squares in the coordinate positions (from .coor file)
										; 5: shows the perimeter of the .area file
	flag[RM_differentViews]		= 0		; Change view, e.g. mirror flip right ALs   (SingleOverviews.pro)
	flag[RM_unsharpmask]		= 0		; Post-hoc filter on false-color images     (SingleOverviews.pro)

	flag[RM_NewColumn]			= 0		; Start a new column in "tapeten" output    (SingleOverviews.pro)
										; this flag is generally set in the gr_XXX file

	;old flags
	flag[RM_PlotTrace]			= 0		;
	flag[RM_PrintAscii]			= 0		;
	flag[RM_PrintLine]			= 0		;
	flag[RM_ROItrace]			= 0		;


	;flags for filters
	flag[FT_radius]				= 5	    ; 5 vaga; 10 Apis; For calculating traces (glodatamix), or for some spatial filters
	FilterSpaceFlag 			= 0 	; If set to 1, the signal is calculated on the time trace at each pixel
										; after taking the mean of the pixels around it (FT_radius). Therefor this is a slow filter
										; If set to 0, this filter is switched off
	FilterSpaceSize 			= 3 	; Filter size applied after overview calculation, always.
										; set to 0 when FilterSpaceFlag is on, to avoid double filtering.
	FilterTimeFlag  			= 0		; Switch for the temporal filter
	FilterTimeSize  			= 0		; Size of the temporal filter


	;Linestiles in IDL are (for fast traces):
	; 0: solid; 1: dotted; 2: dashed; 3: dash-dot; 4: dash-dot-dot; 5: long dashes


;*******************************************
;flags to control PATHS for input and output
;*******************************************

	; this is one standard arrangement of folders
	; just adapt the MotherOfAllFolders, but all subfolders must exist
	; place where all files are
	; MotherOfAllFolders				= 'C:\Hannah\PhD\Konstanz08\hannah08\'
	MotherOfAllFolders				= 'E:\HannahData\Konstanz\IDL\'


	flag[stg_ReportTag]				= 'XXX' ; this contains the animal flag; set this for each round and animal,
											; this is set within the gr_file

	; folder for the data files
	;flag[STG_Datapath]				= MotherOfAllFolders + 'data\'
	flag[STG_Datapath]				= 'E:\HannahData\Konstanz\Data\2018\Hanna_OXON-PELM_summer2018\'
	; folder for the .inf files
	flag[STG_OdorInfoPath]			= MotherOfAllFolders + 'IDL\lists\'
	;flag[STG_OdorInfoPath]			= 'E:\HannahData\Konstanz\Data\Hannah16\'
	; folder for the .coor and the .area file
	flag[STG_OdormaskPath]			= MotherOfAllFolders + 'IDL\coor\'
	; folder for the all OUTPUT files
	flag[STG_OdorReportPath]		= MotherOfAllFolders + 'IDL\IDLoutput\'
	; this is not used any more
	flag[STG_OdorReportFile]			= ''
	; I don't know where this is used any more
	flag[STG_Missing]				= '999'


;************************************
;flags used for MOVIE output
;************************************

; in interactive mode, these flags are overwritten by the values in
; imageALlocal\SetExportMovieFlags.pro
; the variables are defined in view.pro

		mv_exportFormat			= 6		; 1 for TIFF (single files), 2 for PICT (premiere), 3 for MPEG, 4 for multilayer GIF, 5: multilayer TIF
										; 6 for uncompressed AVI (generally the best)
		mv_realTime				= 0		; insert frames per second, 0 for no realTime, 24 for MPEG, 15 for GIF->QuickTime
										; AVI can work with any time, therefore 0 IS realTIME. In the other formats, additional frames are invented to create real time
										; if a negative number is given, that many frames are removed
		mv_SpeedFactor			= 1		; for exportFormat 6, increase or decrease speed of movie
		mv_reverseIt			= 1		; turn it upside down
		mv_rotateImage			= 0		; rotate only image,  ; 0 for no action, 2 for 180 degrees
		mv_cutborder			= 0		; how many pixels to cut from each side (border, to hide filter artefacts)
		mv_morphoThreshold		= 0		; substitutes lower range with morphological image to be taken from file
		mv_withinMask			= 0		; limits output to within the mask in xxx.area
		mv_sdSignificanceCut	= 0		; cuts everything below that significance level. Stimulus is included in calculation, ignored if below 0.1.
		;								; Not implemented yet
		mv_markStimulus			= 1		; marks stimulus application with a red box
		mv_percentileScale		= 0		; scaling to a percentaje of noise. don´t use
		mv_individualScale		= 3		; follows a similar logic to (flag[so_indiScale])
										;0, 1: Pixmin and Pixmax are taken
										;2 : min and maximum of sequence is taken
										;3 : min and max of central region is taken
										;4 : max of sequence is taken, min is Pixmin
										;5 : min and max from area region
										;6 : min from pixmin, max from area
										;7 : min from pixmin, max from area but only stimulus + 2*stimulus length

		mv_indiScale3factor		= 0.2 	; set to 0.2 for 20 % border to be ignored when scaling usind idividualscale eq 3
										; for mv_individualScale above 100
		mv_percentileValue		= 0		; = float(individualScale MOD 100)/100.0
		mv_xgap					= 30	; vertical + horizontal gaps, only even numbers!
		mv_ygap					= 50  	; 6, 10
		mv_correctStimulusOnset	= 0 	; value to be added to stimulus onset (in frames)
		mv_displayTime			= 1		; time in ss:ms as figures
		mv_minimumBrightness	= 0		; creates a mask that depends on the brightnes of the foto
		;these flags are for interactive use in view (fasttraces)
		;but are also used in movies to select a frame range for movie output
		;set both to -1 to calculate the entire movie, else to fixed frame numbers
		flag[FT_FirstFrame]				= -1		; show trace subsed in fast traces in VIEW
		flag[FT_LastFrame]				= -1		; show trace subsed in fast traces in VIEW

		;flags that are also relevant for movies; do NOT change them here to avoid confusion, change them above
		;check program viewoverview\Exportmovie
		;flag[ctv_scalebar]
		;scaleMin
		;scaleMax
		;filterSpaceFlag
		;filterSpaceSize
		;colortable
		;FILENAME defined in localOdorText

;end of movie settings



;************************************
;flags NOT USED for off-line analysis
;************************************

	flag[LE_ShowBox]				= 0		;
	flag[FT_AllOdors]				= 0		; show all odor traces in fast traces in VIEW
	flag[FT_TimeXAxis]				= 0		; show time as x-axis in fast traces in VIEW
	flag[FT_Subset]					= 0		; show trace subsed in fast traces in VIEW
	flag[FT_SelectFrame]			= 0		; show trace subsed in fast traces in VIEW

;**************************************************************************************************************



;		calling via a gr file needs a line as this one:
;flag[stg_reporttag] = '060503a_22a' & gr_060503a_22a

; 		calling without a fixed order can be done with
; gr_takefromlist, '060503a_22a', 2
; 		here the number 2 relates to the corresponding column in the .lst file;
; 		which measurements are picked depends on this number


;animallist



flag[so_indiScale]          = 3; 0


;call another program that contains the individual animal's lists

;tapeten_list ;Apis

;GC_list

;GC_2013_list

;Vespula

;vaga2016

;Apis2018_winter

Apis2018_summer

;
; 	scalemax =3.000
;	scalemin =  -2.000
;flag[stg_reporttag] ='HS_bee_OXON_PELM_180420'
;gr_HS_bee_OXON_PELM_180420
;;gr_takefromlist, 'HS_bee_OXON_PELM_180420', 2






;	scalemax =3.000
;	scalemin =  -2.000
;flag[stg_reporttag] ='HS_bee_OXON_180727'
;gr_HS_bee_OXON_180727
;;gr_takefromlist, 'HS_bee_OXON_180727', 2
;


;	scalemax =3.000
;	scalemin =  -2.000
;flag[stg_reporttag] ='HS_bee_OXON_180416a'
;gr_HS_bee_OXON_180416a
;;gr_takefromlist, 'HS_bee_OXON_180416a', 2
;
;	scalemax =3.000
;	scalemin =  -2.000
;flag[stg_reporttag] ='HS_bee_PELM_180416b'
;gr_HS_bee_PELM_180416b
;gr_takefromlist, 'HS_bee_PELM_180416b', 2
;
;	scalemax =3.000
;	scalemin =  -2.000
;flag[stg_reporttag] ='HS_bee_OXON_PELM_180417'
;;gr_HS_bee_OXON_PELM_180417
;gr_takefromlist, 'HS_bee_OXON_PELM_180417', 2






;	scalemax =3.000
;	scalemin =  -2.000
;flag[stg_reporttag] ='vaga160425a'
;;gr_vaga160425a
;gr_takefromlist, 'vaga160425a', 2

;
;
;	scalemax =3.000
;	scalemin =  -2.000
;flag[stg_reporttag] ='vaga160407b'
;gr_vaga160407b

;Unterschied Andrena vaga - Apis: Radius, LogExcludeSeconds, CTV first frame last frame


;flag[stg_reporttag] = 'vaga9414_1'
;	scalemax =  3.500
;    scalemin = -1.000
;;gr_vaga9414_1
;
;flag[stg_reporttag] = 'vaga9414_2'
;	scalemax =  3.500
;    scalemin = -1.000
;;gr_vaga9414_2
;
;flag[stg_reporttag] = 'vaga9415_2'
;	scalemax =  3.500
;    scalemin = -1.000
;;gr_vaga9415_2
;
;flag[stg_reporttag] = 'vaga9415_3'
;	scalemax =  3.500
;    scalemin = -1.000
;;gr_vaga9415_3
;
;flag[stg_reporttag] = 'vaga9416_1'
;	scalemax =  3.500
;    scalemin = -1.000
;;gr_vaga9416_1
;
;flag[stg_reporttag] = 'vaga9416_2'
;	scalemax =  3.500
;    scalemin = -1.000
;;gr_vaga9416_2
;
;flag[stg_reporttag] = 'vaga9417_1'
;	scalemax =  3.500
;    scalemin = -1.000
;;gr_vaga9417_1
;
;flag[stg_reporttag] = 'vaga9417_2'
;	scalemax =  3.500
;    scalemin = -1.000
;;gr_vaga9417_2
;
;
;flag[stg_reporttag] = 'vaga9418_1'
;	scalemax =  3.500
;    scalemin = -1.000
;;gr_vaga9418_1
;
;
;
;
;
;
;
;flag[stg_reporttag] = 'vaga8405a'
;	scalemax =  3.500
;    scalemin = -1.000
;;gr_vaga8405a
;;gr_takefromlist,'vaga8405a',2
;
;flag[stg_reporttag] = 'vaga8406b'
;	scalemax =  4.000
;    scalemin = -1.000
;;gr_vaga8406b
;;gr_takefromlist,'vaga8406b',2
;
;flag[stg_reporttag] = 'vaga8407a'
;;gr_vaga8407a
;;gr_takefromlist,'vaga8407a',2
;
;flag[stg_reporttag] = 'vaga8407b_2'
;;gr_vaga8407b_2
;;gr_takefromlist,'vaga8407b_2',2
;
;flag[stg_reporttag] = 'vaga8408a'
;;gr_vaga8408a
;;gr_takefromlist,'vaga8408a',2
;
;flag[stg_reporttag] = 'vaga8409a'
;    scalemax =  4.500
;    scalemin = -1.000
;;gr_vaga8409a
;;gr_takefromlist,'vaga8409a',2
;
;flag[stg_reporttag] = 'vaga8410b'
;    scalemax =  4.000
;    scalemin = -1.000
;;gr_vaga8410b
;;gr_takefromlist,'vaga8410b',2





;
;flag[stg_reporttag] = 'vaga8414d'
;    scalemax =  3.000
;    scalemin = -1.000
;gr_vaga8414d
;;gr_takefromlist,'vaga8414d',2
;
;flag[stg_reporttag] = 'vaga8415a'
;gr_vaga8415a
;;gr_takefromlist,'vaga8415a',2
;
;flag[stg_reporttag] = 'vaga8415b'
;gr_vaga8415b
;;gr_takefromlist,'vaga8415b',2
;
;flag[stg_reporttag] = 'vaga8415c'
;gr_vaga8415c
;;gr_takefromlist,'vaga8415c',2
;
;flag[stg_reporttag] = 'vaga8416b'
;gr_vaga8416b
;;gr_takefromlist,'vaga8416b',2
;
;flag[stg_reporttag] = 'vaga8416c'
;    scalemax =  2.500
;    scalemin =  0.000
;gr_vaga8416c
;gr_takefromlist,'vaga8416c',2
;
;flag[stg_reporttag] = 'vaga8417a'
;gr_vaga8417a
;;gr_takefromlist,'vaga8417a',2
;
;flag[stg_reporttag] = 'vaga8418a'
;gr_vaga8418a
;;gr_takefromlist,'vaga8418a',2
;
;flag[stg_reporttag] = 'vaga8418b'
;;kein IDL/Knime
;;gr_vaga8418b
;;gr_takefromlist,'vaga8418b',2
;
;flag[stg_reporttag] = 'vaga8419a'
;gr_vaga8419a
;;gr_takefromlist,'vaga8419a',2
;
;flag[stg_reporttag] = 'vaga8420a'
;;neue lst und gr erstellt, bringt auch nichts
;;gr_vaga8420a
;;gr_takefromlist,'vaga8420a',2
;
;flag[stg_reporttag] = 'vaga8421a'
;gr_vaga8421a
;;gr_takefromlist,'vaga8421a',2
;
;flag[stg_reporttag] = 'vaga8422a'
;gr_vaga8422a
;;gr_takefromlist,'vaga8422a',2
;
;flag[stg_reporttag] = 'vaga8423a'
;gr_vaga8423a
;;gr_takefromlist,'vaga8423a',2
;
;flag[stg_reporttag] = 'vaga8423b'
;gr_vaga8423b
;;gr_takefromlist,'vaga8423b',2
;
;flag[stg_reporttag] = 'vaga8424a'
;gr_vaga8424a
;;gr_takefromlist,'vaga8424a',2
;
;flag[stg_reporttag] = 'vaga8424b'
;gr_vaga8424b
;;gr_takefromlist,'vaga8424b',2
;
;flag[stg_reporttag] = 'vaga8425a'
;gr_vaga8425a
;;gr_takefromlist,'vaga8425a',2
;
;flag[stg_reporttag] = 'vaga8428a'
;gr_vaga8428a
;;gr_takefromlist,'vaga8428a',2
;
;flag[stg_reporttag] = 'vaga8429a'
;;keine lst-Datei vorhanden; Stromausfall
;;gr_vaga8429a
;;gr_takefromlist,'vaga8429a',2
;
;flag[stg_reporttag] = 'vaga8429b'
;gr_vaga8429b
;;gr_takefromlist,'vaga8429b',2
;
;flag[stg_reporttag] = 'vaga8430a'
;gr_vaga8430a
;;gr_takefromlist,'vaga8430a',2
;
;flag[stg_reporttag] = 'vaga8430b'
;gr_vaga8430b
;;gr_takefromlist,'vaga8430b',2
;
;flag[stg_reporttag] = 'vaga8501a'
;gr_vaga8501a
;;gr_takefromlist,'vaga8501a',2
;
;flag[stg_reporttag] = 'vaga8501b'
;gr_vaga8501b
;;gr_takefromlist,'vaga8501b',2
;
;flag[stg_reporttag] = 'vaga8501c'
;gr_vaga8501c
;;gr_takefromlist,'vaga8501c',2
;
;flag[stg_reporttag] = 'vaga8504a'
;gr_vaga8504a
;;gr_takefromlist,'vaga8504a',2
;
;flag[stg_reporttag] = 'vaga8507a'
;gr_vaga8507a
;;gr_takefromlist,'vaga8507a',2

end;