#Color palettes: /opt/terascan_3.1/terascan/refdata/palettes
#Dieses Sript exportiert einen tdf file ins jpeg Format, im speziellen die
#Variable "ndvi_land", also keine einzelnen Channels! Zunächst wird eine
#Histogramm equaliztion durchgeführt. Mitexportiert werden 
#coast + gridline; außerdem wird eine diskrete Legende und eine normale Legende in das jpg image
#geschrieben.  RSRG   01.03.02

#! /bin/csh -fx
cd /usr/data/maroc/all/
foreach file (noaa-1?_utm.wgs84_*200?*)

bvhist \
        	hist_vars='ndvi_land' \
	        bin_counts='256' \
	        estimate_range='n' \
        	range_pairs='0 0.6' \
		count_outside='n' \
	        log_scale='n' \
        	unit_scale='n' \
	        lookup_table='y' \
        	bin_centers='no' \
	$file \
	$file.histo.avhrr

enhance \
      		 include_vars='ndvi_land' \
      		 lookup_file=$file.histo.avhrr \
      		 value_var='ndvi_land' \
      		 index_var='histogram' \
      		 image_colors='256' \
      		 bad_index='255' \
	$file \
	$file.enh.avhrr

imscale \
        	include_vars='ndvi_land' \
	        image_colors='256' \
        	max_width='1250' \
	        max_height='1050' \
        	fixed_size='no' \
	        zoom_factor='1' \
        	real_resample='yes' \
	        est_range='y' \
        	#min_value='-25' \
	        #max_value='200' \
        	invert_scale='no' \
	        north_up='yes' \
	$file.enh.avhrr \
	$file.byte

wedge \
	        master_file='/wolga/TERA_SCRIPT/MOROCCO/Master_marokko_utmwgs84.mas' \
        	wedge_lines='800' \
	        wedge_samples='90' \
        	wedge_dir='up' \
	        text_height='12' \
        	text_type='bold' \
	        two_color_text='n' \
        	line_offset='0' \
	        sample_offset='10' \
        	scale_min='0' \
	        scale_max='0.6' \
        	invert_scale='n' \
	        label_base='0' \
        	label_step='0.05' \
	        discrete_steps='n' \
        	outline='y' \
	$file.wedge


coast \
        	master_file='/wolga/TERA_SCRIPT/MOROCCO/Master_marokko_utmwgs84.mas' \
	        reduce_factor='1' \
        	coast_file='dcw.coast' \
	$file.coast

llgrid \
		master_file='/wolga/TERA_SCRIPT/MOROCCO/Master_marokko_utmwgs84.mas' \
        	grid_type='lines' \
	        delta_lat='2.5' \
        	delta_lon='2.5' \
	$file.Ilgrid


set pass_date=`getinfo attr_name=pass_date $file` 
set projection_name=`getinfo attr_name=projection_name $file`
set satellite=`getinfo attr_name=satellite $file`

legend \
       		line_1=$pass_date \
      		line_2=$satellite\
		line_3=$projection_name.wgs84 \
		line_4='NDVI' \
		line_5= \
	        text_height='16' \
	        text_type='bold' \
        	line_offset='810' \
	        sample_offset='-1120' \
        	full_width='no' \
	        center_text='no' \
	        outline='no' \
	        solid_bg='no' \
	$file \
	$file.legend

xinject \
	        bg_var_name='ndvi_land' \
        	colors_per='1' \
	        meta_colors='215 215 254 254' \
        	line_widths='4 2 2 2' \
	        line_types='solid solid solid solid ' \
        	marker_types='+ + + +' \
	        marker_sizes='15 15 15 15' \
        	image_colors='256' \
	$file.byte \
	$file.coast \
	$file.Ilgrid \
	$file.wedge \
	$file.legend \
	$file.xin

expim \
		image_format='jpeg' \
		jpeg_quality='90' \
		image_var='ndvi_land' \
		image_colors='255' \
		color_palette='blu-grn-red-yel' \
		draw_indexes= \
	$file.xin \
	$file.jpg
mv -f $file.jpg /usr/data/maroc/jpg/ndvi/

#mv -f $file.jpg /usr/data/maroc/	

rm $file.enh.avhrr
rm $file.histo.avhrr
rm $file.wedge
rm $file.byte
rm $file.coast
rm $file.Ilgrid
rm $file.xin
rm $file.legend

end