# create data--line
sub olpoi_line {
	my $file = shift ;
	my $point = shift ;
	my $title = shift ;
	my $dicription = shift ;
	my $icon = shift ;
	my $size = shift ;
	my $offset = shift ;
	
	#return  if(!defined($point)); 
	$title=''  if(!defined($title)); 
	$dicription=''  if(!defined($dicription)); 
	$icon=''  if(!defined($icon)); 
	$size='20,20'  if(!defined($size)); 
	$offset='10,10'  if(!defined($offset ));

	print $file $point."\t".$title."\t".$dicription."\t".$icon."\t".$size."\t".$offset."\n";
}# olpoi_line