next_step
view map
view block
view full
view zoom
save

setup 
{	create
	acquire
	 

	poly_map
	header
	   

	menuset_get
	 
	   
	 
	   



	exit
}

{
}

scan_input
{
	import

	 
	 
	rotate  90
	    
	   
	 
	 

	regis_raster
	regis_geo
	reg_check
	show_reg
	reset_screen

	 
	 
	 
}

man_digitize
{
	regis_geo
	regis_dig
	reg_check
	show_reg
	reset_screen
	

	ginput -a 1
	ckeys_disp
	ginput mouse

	draw line
	draw point
	erase fatln

	undo
	
	clear_mode
}

{
}

edit1
{	
	 
	start_search
	step rt
	   
	redisp_map

	separate
	connect
	wink
	bridge_gap
	draw line
	erase rect
	

	undo
	recall
	clear_mode
	poly_clean1
	clean_frame
}

edit2
{	
	 
	log_poly1
	goto log +
	goto log -
	redisp_map

	
	
	wink
	bridge_gap
	draw line
	erase rect
	

	undo
	recall
	clear_mode
	poly_clean2
}

assemble_map
{	assemble

	poly_check
	show_vectors
	reset_screen
	
	snap_n_thin
	reset_screen

	add_edgemaps
	add_template

	chk_scn.vect
	step right
	reset_check
}

{
}

manual_atrbt
{	
	show_not_1st
	show_not_2nd
	 

	check_atrbts
	reset_screen

	dig_polyatr1
	dig_polyatr2
	    
	    



	poly_query

	regis_dig
	ginput -a 1
	ginput mouse
}

group_atrbt
{	 
	 
	  

	 
	 
	 
	atrbt_thin
	 
	atrbt_edit

	poly_query
	 

	      
	   

	 
	 
}


{
}

output_data
{	report
	 
	 
	 
	
	plot
	reset_screen
	
	export

	 


	 


	exit
}
 
 
{	 
	 
	 
	 
	 
	 
	 
	 
	 
	 
	 
	 
	 
	 

	    
	 
	 
	 
}

 
{	 

	 
	 
	 
	 
	 
 
  

	 
	 
	 
	 

	   
}

 
{ 
	 

	 
	 
	 

	 

	 
	 
 
	 
  

	 
	 
}


 
{
	 
  
 
	 
	
	 
}

 
{
	 
	 
	 


	 

	 

	 

	 
}
