function Cell($w,$h=0,$txt='',$border=0,$ln=0,$align='',$fill=0,$link='')
		{
			//$txt=str_replace(chr(13),'',$txt); // \r заменяем на пустоту
		    //Output a cell
		    $k=$this->k;
		   
		    	if($this->y+$h>$this->PageBreakTrigger && !$this->InHeader && !$this->InFooter && $this->AcceptPageBreak())
	{
		        $x=$this->x;
		        $ws=$this->ws;
		        if($ws>0)
		        {
		            $this->ws=0;
		            $this->_out('0 Tw');
		        }
		        $this->AddPage($this->CurOrientation,$this->CurPageFormat);
		        $this->x=$x;
		        if($ws>0)
		        {
		            $this->ws=$ws;
		            $this->_out(sprintf('%.3f Tw',$ws*$k));
		        }

		    }
		    if($w==0)
		        $w=$this->w-$this->rMargin-$this->x;
		    $s='';
		// begin change Cell function 12.08.2003
		    if($fill==1 or $border>0)
		    {
		        if($fill==1)
		            $op=($border>0) ? 'B' : 'f';
		        else
		            $op='S';
		        if ($border>1) {
		            $s=sprintf(' q %.2f w %.2f %.2f %.2f %.2f re %s Q ',$border,
		                $this->x*$k,($this->h-$this->y)*$k,$w*$k,-$h*$k,$op);
		        }
		        else
		            $s=sprintf('%.2f %.2f %.2f %.2f re %s ',$this->x*$k,($this->h-$this->y)*$k,$w*$k,-$h*$k,$op);
		    }
		    if(is_string($border))
		    {
		        $x=$this->x;
		        $y=$this->y;
		        if(is_int(strpos($border,'L')))
		            $s.=sprintf('%.2f %.2f m %.2f %.2f l S ',$x*$k,($this->h-$y)*$k,$x*$k,($this->h-($y+$h))*$k);
		        else if(is_int(strpos($border,'l')))
		            $s.=sprintf('q 2 w %.2f %.2f m %.2f %.2f l S Q ',$x*$k,($this->h-$y)*$k,$x*$k,($this->h-($y+$h))*$k);

		        if(is_int(strpos($border,'T')))
		            $s.=sprintf('%.2f %.2f m %.2f %.2f l S ',$x*$k,($this->h-$y)*$k,($x+$w)*$k,($this->h-$y)*$k);
		        else if(is_int(strpos($border,'t')))
		            $s.=sprintf('q 2 w %.2f %.2f m %.2f %.2f l S Q ',$x*$k,($this->h-$y)*$k,($x+$w)*$k,($this->h-$y)*$k);

		        if(is_int(strpos($border,'R')))
		            $s.=sprintf('%.2f %.2f m %.2f %.2f l S ',($x+$w)*$k,($this->h-$y)*$k,($x+$w)*$k,($this->h-($y+$h))*$k);
		        else if(is_int(strpos($border,'r')))
		            $s.=sprintf('q 2 w %.2f %.2f m %.2f %.2f l S Q ',($x+$w)*$k,($this->h-$y)*$k,($x+$w)*$k,($this->h-($y+$h))*$k);

		        if(is_int(strpos($border,'B')))
		            $s.=sprintf('%.2f %.2f m %.2f %.2f l S ',$x*$k,($this->h-($y+$h))*$k,($x+$w)*$k,($this->h-($y+$h))*$k);
		        else if(is_int(strpos($border,'b')))
		            $s.=sprintf('q 2 w %.2f %.2f m %.2f %.2f l S Q ',$x*$k,($this->h-($y+$h))*$k,($x+$w)*$k,($this->h-($y+$h))*$k);
		    }
		    if (trim($txt)!='') {
		        $cr=substr_count($txt,"\n");
		        if ($cr>0) { // Multi line
		        	  	preg_match_all("/<font color=\"#(\S+)\">(.*)<\/font>/iUs",$txt,$r);
		    	if(count($r[0])>0)
		    	{ $txt2=$txt;
	foreach($r[0] as $key=>$v)
{ 
$txt2=str_replace($v,') Tj ET q '.$this->conv_color($r[1][$key]).' ('.$r[2][$key].') Tj ET q '.$this->TextColor.' (',$txt2);
$txt=str_replace($v,$r[2][$key],$txt); 
}
//print_r ($txt2);
}
		            $txts = explode("\n", $txt);
		           if($txt2) $txts2 = explode("\n", $txt2);
		            $lines = count($txts);
		            //$dy=($h-2*$this->cMargin)/$lines;
		            for($l=0;$l<$lines;$l++) {
		                $txt=$txts[$l];
		               if($txt2) $txt2=$txts2[$l];
		                $w_txt=$this->GetStringWidth($txt);
		                if($align=='R')
		                    $dx=$w-$w_txt-$this->cMargin;
		                elseif($align=='C')
		                    $dx=($w-$w_txt)/2;
		                else
		                    $dx=$this->cMargin;

		               $txt=str_replace(')','\\)',str_replace('(','\\(',str_replace('\\','\\\\',$txt)));
		                if($this->ColorFlag)
		                    $s.='q '.$this->TextColor.' ';
		                $s.=$gar=sprintf('BT %.2f %.2f Td (%s) Tj ET ',
		                    ($this->x+$dx)*$k,
		                    ($this->h-($this->y+.5*$h+(.7+$l-$lines/2)*($this->FontSize+$this->h_font)))*$k,
		                    (isset($txt2)?$txt2:$txt)); 
		                   // print_r ($s);
		                if($this->strikeline)
		                		$s.=' '.$this->_strikeline($this->x+$dx,$this->y+.5*$h+.3*$this->FontSize,$txt);
		                if($this->underline)
		                    $s.=' '.$this->_dounderline($this->x+$dx,$this->y+.5*$h+.3*$this->FontSize,$txt);
		                if($this->ColorFlag)
		                    $s.=' Q ';
		                if($link)
		                    $this->Link($this->x+$dx,$this->y+.5*$h-.5*$this->FontSize,$w_txt,$this->FontSize,$link);
		            }
		           
		        }
		        else { // Single line
		            $w_txt=$this->GetStringWidth($txt);
		            $Tz=100;
/*commented*/
/*
		            if ($w_txt>$w-2*$this->cMargin) { // Need compression
		                $Tz=($w-2*$this->cMargin)/$w_txt*100;
		                $w_txt=$w-2*$this->cMargin;
		            }
*/
		            if($align=='R')
		                $dx=$w-$w_txt-$this->cMargin;
		            elseif($align=='C')
		                $dx=($w-$w_txt)/2;
		            else
		                $dx=$this->cMargin;
		            $txt=str_replace(')','\\)',str_replace('(','\\(',str_replace('\\','\\\\',$txt)));
		            if($this->ColorFlag)
		                $s.='q '.$this->TextColor.' ';
		            $s.=sprintf('q BT %.2f %.2f Td %.2f Tz (%s) Tj ET Q ',
		                        ($this->x+$dx)*$k,
		                        ($this->h-($this->y+.5*$h+.3*$this->FontSize))*$k,
		                        $Tz,$txt);
		            if($this->strikeline)
		                $s.=' '.$this->_strikeline($this->x+$dx,$this->y+.5*$h+.3*$this->FontSize,$txt);
		            if($this->underline)
		                $s.=' '.$this->_dounderline($this->x+$dx,$this->y+.5*$h+.3*$this->FontSize,$txt);
		            if($this->ColorFlag)
		                $s.=' Q ';
		            if($link)
		                $this->Link($this->x+$dx,$this->y+.5*$h-.5*$this->FontSize,$w_txt,$this->FontSize,$link);
		        }
		    }
		// end change Cell function 12.08.2003
		    if($s)
		        $this->_out($s);
		    $this->lasth=$h;
		    if($ln>0)
		    {
		        //Go to next line
		        $this->y+=$h;
		        if($ln==1)
		            $this->x=$this->lMargin;
		    }
		    else
		        $this->x+=$w;
		}