.-.-.-.-.-

<?php

// LT Diagram Builder 3.4 - PHP version using the gd extension
// Copyright (c) 2001-2006 Lutz Tautenhahn, all rights reserved.
//
// The Author grants you a non-exclusive, royalty free, license to use,
// modify and redistribute this software, provided that this copyright notice
// and license appear on all copies of the software.
// This software is provided "as is", without a warranty of any kind.

// no direct access
defined('_JEXEC') or die('Restricted access');

function UTC($yy, $mm, $dd, $hh, $nn, $ss)
{ return(mktime($hh, $nn, $ss, $mm, $dd, $yy));
}

function GetRGB($ss,&$rr,&$gg,&$bb)
{ $tt="000000";
  if (strlen($ss)==6) $tt=$ss;
  if (strlen($ss)==7) $tt=substr($ss, 1);
  $rr=intval(substr($tt, 0, 2),16);
  $gg=intval(substr($tt, 2, 2),16);
  $bb=intval(substr($tt, 4, 2),16);
}

function sign($rr)
{ if ($rr<0) return(-1); else return(1);
}

class Diagram
{ var $left, $right, $top, $bottom;
  var $xmin, $xmax, $ymin, $ymax;
  var $xtext="";
  var $ytext="";
  var $title="";
  var $XScale=1;
  var $YScale=1;
  var $XScalePosition="bottom";
  var $YScalePosition="left";
  var $logsub=array(0.301, 0.477, 0.602, 0.699, 0.778, 0.845, 0.903, 0.954);
  var $XGrid=array(0,0,0);
  var $YGrid=array(0,0,0);
  var $XGridDelta=0;
  var $YGridDelta=0;
  var $XSubGrids=0;
  var $YSubGrids=0;
  var $SubGrids=0;
  var $XGridColor="";
  var $YGridColor="";
  var $XSubGridColor="";
  var $YSubGridColor="";
  var $Font=4;
  var $BFont=5;
  var $MaxGrids;
  var $LastColor="";
  var $LastImgColorIndex=0;
  var $ImgMapData="";
  var $Img;

function GetImgColorIndex($theColor)
  { if ($theColor==$this->LastColor) return($this->LastImgColorIndex);
    GetRGB($theColor,$rr,$gg,$bb);
    $cc=imagecolorexact($this->Img,$rr,$gg,$bb);
    if ($cc<0) $cc = imagecolorallocate($this->Img, $rr, $gg, $bb);
    if ($cc<0) $cc = imagecolorclosest($this->Img, $rr, $gg, $bb);
    $this->LastColor=$theColor;
    $this->LastImgColorIndex=$cc;
    return($cc);
  }

function SetFrame($theLeft, $theTop, $theRight, $theBottom)
  { $this->left   = $theLeft;
    $this->right  = $theRight;
    $this->top    = $theTop;
    $this->bottom = $theBottom;
  }

function SetBorder($theLeftX, $theRightX, $theBottomY, $theTopY)
  { $this->xmin = $theLeftX;
    $this->xmax = $theRightX;
    $this->ymin = $theBottomY;
    $this->ymax = $theTopY;
  }

function SetText($theScaleX, $theScaleY, $theTitle)
  { $this->xtext=$theScaleX;
    $this->ytext=$theScaleY;
    $this->title=$theTitle;
  }

function SetGridColor($theGridColor, $theSubGridColor="undefined")
  { $this->XGridColor=$theGridColor;
    $this->YGridColor=$theGridColor;
    if ($theSubGridColor!="undefined")
    { $this->XSubGridColor=$theSubGridColor;
      $this->YSubGridColor=$theSubGridColor;
    }
  }

function SetXGridColor($theGridColor, $theSubGridColor="undefined")
  { $this->XGridColor=$theGridColor;
    if ($theSubGridColor!="undefined") $this->XSubGridColor=$theSubGridColor;
  }

function SetYGridColor($theGridColor, $theSubGridColor="undefined")
  { $this->YGridColor=$theGridColor;
    if ($theSubGridColor!="undefined") $this->YSubGridColor=$theSubGridColor;
  }

function ScreenX($theRealX)
  { return(round(($theRealX-$this->xmin)/($this->xmax-$this->xmin)*($this->right-$this->left)+$this->left));
  }

function ScreenY($theRealY)
  { return(round(($this->ymax-$theRealY)/($this->ymax-$this->ymin)*($this->bottom-$this->top)+$this->top));
  }

function RealX($theScreenX)
  { return($this->xmin+($this->xmax-$this->xmin)*($theScreenX-$this->left)/($this->right-$this->left));
  }

function RealY($theScreenY)
  { return($this->ymax-($this->ymax-$this->ymin)*($theScreenY-$this->top)/($this->bottom-$this->top));
  }

if (($this->XScale==1)||(is_string($this->XScale)))
    { $u="";
      $fn="";
      if (is_string($this->XScale))
      { if (substr($this->XScale,0,9)=="function ") $fn=substr($this->XScale,9);
        else $u=$this->XScale;
      }
      $dx=($this->xmax-$this->xmin);
      if (abs($dx)>0)
      { $invdifx=($this->right-$this->left)/($this->xmax-$this->xmin);
        $r=1;
        while (abs($dx)>=100) { $dx/=10; $r*=10; }
        while (abs($dx)<10) { $dx*=10; $r/=10; }
        if (abs($dx)>=50) { $this->SubGrids=5; $deltax=10*$r*sign($dx); }
        else
        { if (abs($dx)>=20) { $this->SubGrids=5; $deltax=5*$r*sign($dx); }
          else { $this->SubGrids=4; $deltax=2*$r*sign($dx); }
        }
        if ($this->XGridDelta!=0) $deltax=$this->XGridDelta;
        if ($this->XSubGrids!=0) $this->SubGrids=$this->XSubGrids;
        $sub=$deltax*$invdifx/$this->SubGrids;
        $sshift=0;
        if (($this->XScalePosition=="top-left")||($this->XScalePosition=="bottom-left")) $sshift=-abs($deltax*$invdifx/2);
        if (($this->XScalePosition=="top-right")||($this->XScalePosition=="bottom-right")) $sshift=abs($deltax*$invdifx/2);
        $x=floor($this->xmin/$deltax)*$deltax;
        $itext=0;
        if ($deltax!=0) $this->MaxGrids=floor(abs(($this->xmax-$this->xmin)/$deltax))+2;
        else $this->MaxGrids=0;
        for ($j=$this->MaxGrids; $j>=-1; $j--)
        { $xr=$x+$j*$deltax;
          $x0=round($this->left+(-$this->xmin+$xr)*$invdifx);
          if ($this->XSubGridColor!="")
          { for ($k=1; $k<$this->SubGrids; $k++)
            { if (($x0-$k*$sub>$this->left+1)&&($x0-$k*$sub<$this->right-1))
                imageline($this->Img,round($x0-$k*$sub),$this->top+1,round($x0-$k*$sub),$this->bottom-1,$ccSubGridX);
            }
            if ($this->SubGrids==-1)
            { for ($k=0; $k<8; $k++)
              { if (($x0-$this->logsub[$k]*$sub*sign($deltax)>$this->left+1)&&($x0-$this->logsub[$k]*$sub*sign($deltax)<$this->right-1))
                  imageline($this->Img,round($x0-$this->logsub[$k]*$sub*sign($deltax)),$this->top+1,round($x0-$this->logsub[$k]*$sub*sign($deltax)),$this->bottom-1,$ccSubGridX);
              }
            }
          }
          if (($x0>=$this->left)&&($x0<=$this->right))
          { $itext++;
            if (($itext!=2)||(!$isScaleText))
            { if ($r>1)
              { if ($fn!="") $l=call_user_func($fn,$xr);
                else $l=$xr.$u;
              }
              else
              { if ($fn!="") $l=call_user_func($fn,round(10*$xr/$r)/round(10/$r));
                else $l=round(10*$xr/$r)/round(10/$r) .$u;
              }
              if (substr($l,0,1)==".") $l="0".$l;
              if (substr($l,0,2)=="-.") $l="-0"+substr($l,1);
            }
            else $l=$this->xtext;
            $dd=imagefontwidth(abs($this->Font))*strlen($l);
            $hh=imagefontheight(abs($this->Font));
            if (substr($this->XScalePosition,0,3)!="top")
            { if (($x0+$sshift>=$this->left)&&($x0+$sshift<=$this->right))
              { if ($this->Font>=0) imagestring($this->Img, $this->Font, $x0-$dd/2+$sshift, $this->bottom+8, $l, $ccText);
                else imagestringup($this->Img, -$this->Font, $x0-$hh/2+$sshift, $this->bottom+9+$dd, $l, $ccText);
              }
              imageline($this->Img, $x0, $this->bottom-5, $x0, $this->bottom+6, $ccText);
            }
            else
            { if (($x0+$sshift>=$this->left)&&($x0+$sshift<=$this->right))
              { if ($this->Font>=0) imagestring($this->Img, $this->Font, $x0-$dd/2+$sshift, $this->top-6-$hh, $l, $ccText);
                else imagestringup($this->Img, -$this->Font, $x0-$hh/2+$sshift, $this->top-9, $l, $ccText);
              }
              imageline($this->Img, $x0, $this->top-5, $x0, $this->top+6, $ccText);
            }
            if (($this->XGridColor!="")&&($x0>$this->left)&&($x0<$this->right))
              imageline($this->Img, $x0, $this->top+1, $x0, $this->bottom-1, $ccGridX);
          }
        }
      }
    }
    if ((!is_string($this->XScale))&&($this->XScale>1))
    { $dx=($this->xmax-$this->xmin);
      if (abs($dx)>0)
      { $invdifx=($this->right-$this->left)/($this->xmax-$this->xmin);
        $deltax=$this->DateInterval(abs($dx))*sign($dx);
        if ($this->XGridDelta!=0) $deltax=$this->XGridDelta;
        if ($this->XSubGrids!=0) $this->SubGrids=$this->XSubGrids;
        $sub=$deltax*$invdifx/$this->SubGrids;
        $sshift=0;
        if (($this->XScalePosition=="top-left")||($this->XScalePosition=="bottom-left")) $sshift=-abs($deltax*$invdifx/2);
        if (($this->XScalePosition=="top-right")||($this->XScalePosition=="bottom-right")) $sshift=abs($deltax*$invdifx/2);
        $x=floor($this->xmin/$deltax)*$deltax;
        $itext=0;
        if ($deltax!=0) $this->MaxGrids=floor(abs(($this->xmax-$this->xmin)/$deltax))+2;
        else $this->MaxGrids=0;
        for ($j=$this->MaxGrids; $j>=-2; $j--)
        { $xr=$x+$j*$deltax;
          $x0=round($this->left+(-$this->xmin+$x+$j*$deltax)*$invdifx);
          if ($this->XSubGridColor!="")
          { for ($k=1; $k<$this->SubGrids; $k++)
            { if (($x0-$k*$sub>$this->left+1)&&($x0-$k*$sub<$this->right-1))
                imageline($this->Img,round($x0-$k*$sub),$this->top+1,round($x0-$k*$sub),$this->bottom-1,$ccSubGridX);
            }
          }
          if (($x0>=$this->left)&&($x0<=$this->right))
          { $itext++;
            if (($itext!=2)||(!$isScaleText)) $l=DateFormat($xr, abs($deltax), $this->XScale);
            else $l=$this->xtext;
            $dd=imagefontwidth(abs($this->Font))*strlen($l);
            $hh=imagefontheight(abs($this->Font));
            if (substr($this->XScalePosition,0,3)!="top")
            { if (($x0+$sshift>=$this->left)&&($x0+$sshift<=$this->right))
              { if ($this->Font>=0) imagestring($this->Img, $this->Font, $x0-$dd/2+$sshift, $this->bottom+8, $l, $ccText);
                else imagestringup($this->Img, -$this->Font, $x0-$hh/2+$sshift, $this->bottom+9+$dd, $l, $ccText);
              }
              imageline($this->Img, $x0, $this->bottom-5, $x0, $this->bottom+6, $ccText);
            }
            else
            { if (($x0+$sshift>=$this->left)&&($x0+$sshift<=$this->right))
              { if ($this->Font>=0) imagestring($this->Img, $this->Font, $x0-$dd/2+$sshift, $this->top-6-$hh, $l, $ccText);
                else imagestringup($this->Img, -$this->Font, $x0-$hh/2+$sshift, $this->top-9, $l, $ccText);
              }
              imageline($this->Img, $x0, $this->top-5, $x0, $this->top+6, $ccText);
            }
            if (($this->XGridColor!="")&&($x0>$this->left)&&($x0<$this->right))
              imageline($this->Img, $x0, $this->top+1, $x0, $this->bottom-1, $ccGridX);
          }
        }
      }
    }
    if (($this->YScale==1)||(is_string($this->YScale)))
    { $u="";
      $fn="";
      if (is_string($this->YScale))
      { if (substr($this->YScale,0,9)=="function ") $fn=substr($this->YScale,9);
        else $u=$this->YScale;
      }
      $dy=$this->ymax-$this->ymin;
      if (abs($dy)>0)
      { $invdify=($this->bottom-$this->top)/($this->ymax-$this->ymin);
        $r=1;
        while (abs($dy)>=100) { $dy/=10; $r*=10; }
        while (abs($dy)<10) { $dy*=10; $r/=10; }
        if (abs($dy)>=50) { $this->SubGrids=5; $deltay=10*$r*sign($dy); }
        else
        { if (abs($dy)>=20) { $this->SubGrids=5; $deltay=5*$r*sign($dy); }
          else { $this->SubGrids=4; $deltay=2*$r*sign($dy); }
        }
        if ($this->YGridDelta!=0) $deltay=$this->YGridDelta;
        if ($this->YSubGrids!=0) $this->SubGrids=$this->YSubGrids;
        $sub=$deltay*$invdify/$this->SubGrids;
        $sshift=0;
        if (($this->YScalePosition=="left-top")||($this->YScalePosition=="right-top")) $sshift=-abs($deltay*$invdify/2);
        if (($this->YScalePosition=="left-bottom")||($this->YScalePosition=="right-bottom")) $sshift=abs($deltay*$invdify/2);
        $y=floor($this->ymax/$deltay)*$deltay;
        $itext=0;
        if ($deltay!=0) $this->MaxGrids=floor(abs(($this->ymax-$this->ymin)/$deltay))+2;
        else $this->MaxGrids=0;
        for ($j=-1; $j<=$this->MaxGrids; $j++)
        { $yr=$y-$j*$deltay;
          $y0=round($this->top+($this->ymax-$yr)*$invdify);
          if ($this->YSubGridColor!="")
          { for ($k=1; $k<$this->SubGrids; $k++)
            { if (($y0+$k*$sub>$this->top+1)&&($y0+$k*$sub<$this->bottom-1))
                imageline($this->Img,$this->left+1,round($y0+$k*$sub),$this->right-1,round($y0+$k*$sub),$ccSubGridY);
            }
            if ($this->SubGrids==-1)
            { for ($k=0; $k<8; $k++)
              { if (($y0+$this->logsub[$k]*$sub*sign($deltay)>$this->top+1)&&($y0+$this->logsub[$k]*$sub*sign($deltay)<$this->bottom-1))
                  imageline($this->Img,$this->left+1,round($y0+$this->logsub[$k]*$sub*sign($deltay)),$this->right-1,round($y0+$this->logsub[$k]*$sub*sign($deltay)),$ccSubGridY);
              }
            }
          }
          if (($y0>=$this->top)&&($y0<=$this->bottom))
          { $itext++;
            if (($itext!=2)||(!$isScaleText))
            { if ($r>1)
              { if ($fn!="") $l=call_user_func($fn,$yr);
                else $l=$yr.$u;
              }
              else
              { if ($fn!="") $l=call_user_func($fn,round(10*$yr/$r)/round(10/$r));
                else $l=round(10*$yr/$r)/round(10/$r) .$u;
              }
              if (substr($l,0,1)==".") $l="0".$l;
              if (substr($l,0,2)=="-.") $l="-0"+substr($l,1);
            }
            else $l=$this->ytext;
            $dd=imagefontwidth(abs($this->Font))*strlen($l);
            $hh=imagefontheight(abs($this->Font));
            if (substr($this->YScalePosition,0,5)!="right")
            { if (($y0+$sshift>=$this->top)&&($y0+$sshift<=$this->bottom))
                imagestring($this->Img, abs($this->Font), $this->left-$dd-10, $y0-$hh/2+$sshift, $l, $ccText);
              imageline($this->Img, $this->left-5, $y0, $this->left+6, $y0, $ccText);
            }
            else
            { if (($y0+$sshift>=$this->top)&&($y0+$sshift<=$this->bottom))
                imagestring($this->Img, abs($this->Font), $this->right+10, $y0-$hh/2+$sshift, $l, $ccText);
              imageline($this->Img, $this->right-5, $y0, $this->right+6, $y0, $ccText);
            }
            if (($this->YGridColor!="")&&($y0>$this->top)&&($y0<$this->bottom))
              imageline($this->Img, $this->left+1, $y0, $this->right-1, $y0, $ccGridY);
          }
        }
      }
    }
    if ((!is_string($this->YScale))&&($this->YScale>1))
    { $dy=$this->ymax-$this->ymin;
      if (abs($dy)>0)
      { $invdify=($this->bottom-$this->top)/($this->ymax-$this->ymin);
        $deltay=$this->DateInterval(abs($dy))*sign($dy);
        if ($this->YGridDelta!=0) $deltay=$this->YGridDelta;
        if ($this->YSubGrids!=0) $this->SubGrids=$this->YSubGrids;
        $sub=$deltay*$invdify/$this->SubGrids;
        $sshift=0;
        if (($this->YScalePosition=="left-top")||($this->YScalePosition=="right-top")) $sshift=-abs($deltay*$invdify/2);
        if (($this->YScalePosition=="left-bottom")||($this->YScalePosition=="right-bottom")) $sshift=abs($deltay*$invdify/2);
        $y=floor($this->ymax/$deltay)*$deltay;
        $itext=0;
        if ($deltay!=0) $this->MaxGrids=floor(abs(($this->ymax-$this->ymin)/$deltay))+2;
        else $this->MaxGrids=0;
        for ($j=-2; $j<=$this->MaxGrids; $j++)
        { $yr=$y-$j*$deltay;
          $y0=round($this->top+($this->ymax-$y+$j*$deltay)*$invdify);
          if ($this->YSubGridColor!="")
          { for ($k=1; $k<$this->SubGrids; $k++)
            { if (($y0+$k*$sub>$this->top+1)&&($y0+$k*$sub<$this->bottom-1))
                imageline($this->Img,$this->left+1,round($y0+$k*$sub),$this->right-1,round($y0+$k*$sub),$ccSubGridY);
            }
          }
          if (($y0>=$this->top)&&($y0<=$this->bottom))
          { $itext++;
            if (($itext!=2)||(!$isScaleText)) $l=DateFormat($yr, abs($deltay), $this->YScale);
            else $l=$this->ytext;
            $dd=imagefontwidth(abs($this->Font))*strlen($l);
            $hh=imagefontheight(abs($this->Font));
            if (substr($this->YScalePosition,0,5)!="right")
            { if (($y0+$sshift>=$this->top)&&($y0+$sshift<=$this->bottom))
                imagestring($this->Img, abs($this->Font), $this->left-$dd-10, $y0-$hh/2+$sshift, $l, $ccText);
              imageline($this->Img, $this->left-5, $y0, $this->left+6, $y0, $ccText);
            }
            else
            { if (($y0+$sshift>=$this->top)&&($y0+$sshift<=$this->bottom))
                imagestring($this->Img, abs($this->Font), $this->right+10, $y0-$hh/2+$sshift, $l, $ccText);
              imageline($this->Img, $this->right-5, $y0, $this->right+6, $y0, $ccText);
            }
            if (($this->YGridColor!="")&&($y0>$this->top)&&($y0<$this->bottom))
              imageline($this->Img, $this->left+1, $y0, $this->right-1, $y0, $ccGridY);
          }
        }
      }
    }
    imagerectangle($this->Img,$this->left,$this->top,$this->right,$this->bottom,$ccText);
    if ($this->title!="")
    { $dd=imagefontwidth(abs($this->Font))*strlen($this->title);
      $hh=imagefontheight(abs($this->Font));
      if (substr($this->XScalePosition,0,3)!="top")
        imagestring($this->Img, abs($this->Font), ($this->left+$this->right-$dd)/2, $this->top-$hh-4, $this->title, $ccText);
      else
        imagestring($this->Img, abs($this->Font), ($this->left+$this->right-$dd)/2, $this->bottom+4, $this->title, $ccText);
    }
    if (($theTooltipText!="")||($theOnClickAction!="")||($theOnMouseoverAction!="")||($theOnMouseoutAction!=""))
    { $tmpMapData="<area shape=rect coords='".$this->left.",".$this->top.",".$this->right.",".$this->bottom."' ";
      if ($theTooltipText!="") $tmpMapData=$tmpMapData." title='".$theTooltipText."' alt='".$theTooltipText."'";
      if ($theOnClickAction!="") $tmpMapData=$tmpMapData." href='javascript:".$theOnClickAction."'";
      if ($theOnMouseoverAction!="") $tmpMapData=$tmpMapData." onMouseover='".$theOnMouseoverAction."'";
      if ($theOnMouseoutAction!="") $tmpMapData=$tmpMapData." onMouseout='".$theOnMouseoutAction."'";
      $tmpMapData=$tmpMapData.">\n";
      $this->ImgMapData=$tmpMapData.$this->ImgMapData;
    }
  }

function Pixel($theX, $theY, $theColor)
  { $cc=$this->GetImgColorIndex($theColor);
    imagesetpixel($this->Img,$theX,$theY,$cc);
  }

function Line($theX0, $theY0, $theX1, $theY1, $theColor, $theSize=1, $theTooltipText="", $theOnClickAction="", $theOnMouseoverAction="", $theOnMouseoutAction="")
  { $cc=$this->GetImgColorIndex($theColor);
    imagesetthickness($this->Img,2*$theSize-1);
    imageline($this->Img,$theX0,$theY0,$theX1,$theY1,$cc);
    imagesetthickness($this->Img,1);
    if (($theTooltipText!="")||($theOnClickAction!="")||($theOnMouseoverAction!="")||($theOnMouseoutAction!=""))
    { $LL=1;
      $DDX=$theX1-$theX0;
      $DDY=$theY1-$theY0;
      if (($DDX!=0)||($DDY!=0)) $LL=sqrt(($DDX*$DDX)+($DDY*$DDY));
      $tmpMapData="<area shape=polygon coords='".round($theX0+($theSize+1)*$DDY/$LL).",".round($theY0-($theSize+1)*$DDX/$LL).",".round($theX1+($theSize+1)*$DDY/$LL).",".round($theY1-($theSize+1)*$DDX/$LL).",".round($theX1-($theSize+1)*$DDY/$LL).",".round($theY1+($theSize+1)*$DDX/$LL).",".round($theX0-($theSize+1)*$DDY/$LL).",".round($theY0+($theSize+1)*$DDX/$LL)."' ";
      if ($theTooltipText!="") $tmpMapData=$tmpMapData." title='".$theTooltipText."' alt='".$theTooltipText."'";
      if ($theOnClickAction!="") $tmpMapData=$tmpMapData." href='javascript:".$theOnClickAction."'";
      if ($theOnMouseoverAction!="") $tmpMapData=$tmpMapData." onMouseover='".$theOnMouseoverAction."'";
      if ($theOnMouseoutAction!="") $tmpMapData=$tmpMapData." onMouseout='".$theOnMouseoutAction."'";
      $tmpMapData=$tmpMapData.">\n";
      $this->ImgMapData=$tmpMapData.$this->ImgMapData;
    }
  }

function Area($theX0, $theY0, $theX1, $theY1, $theColor, $theBase=0, $theTooltipText="", $theOnClickAction="", $theOnMouseoverAction="", $theOnMouseoutAction="")
  { $cc=$this->GetImgColorIndex($theColor);
    $pp=array($theX0, $theBase, $theX0, $theY0, $theX1, $theY1, $theX1, $theBase-1);
    imagefilledpolygon($this->Img, $pp, 4 , $cc);
    if (($theTooltipText!="")||($theOnClickAction!="")||($theOnMouseoverAction!="")||($theOnMouseoutAction!=""))
    { $tmpMapData="<area shape=polygon coords='".$theX0.",".$theBase.",".$theX0.",".$theY0.",".$theX1.",".$theY1.",".$theX1.",".$theBase."' ";
      if ($theTooltipText!="") $tmpMapData=$tmpMapData." title='".$theTooltipText."' alt='".$theTooltipText."'";
      if ($theOnClickAction!="") $tmpMapData=$tmpMapData." href='javascript:".$theOnClickAction."'";
      if ($theOnMouseoverAction!="") $tmpMapData=$tmpMapData." onMouseover='".$theOnMouseoverAction."'";
      if ($theOnMouseoutAction!="") $tmpMapData=$tmpMapData." onMouseout='".$theOnMouseoutAction."'";
      $tmpMapData=$tmpMapData.">\n";
      $this->ImgMapData=$tmpMapData.$this->ImgMapData;
    }
  }

function Arrow($theX0, $theY0, $theX1, $theY1, $theColor, $theSize=1, $theTooltipText="", $theOnClickAction="", $theOnMouseoverAction="", $theOnMouseoutAction="")
  { $cc=$this->GetImgColorIndex($theColor);
    $LL=1;
    $ccL=6*$theSize+8;
    $ccB=2*$theSize+2;
    $DDX=$theX1-$theX0;
    $DDY=$theY1-$theY0;
    if (($DDX!=0)||($DDY!=0)) $LL=sqrt(($DDX*$DDX)+($DDY*$DDY));
    $pp=array($theX1-round(($ccL*$DDX+$ccB*$DDY)/$LL),$theY1-round(($ccL*$DDY-$ccB*$DDX)/$LL),$theX1,$theY1,$theX1-round(($ccL*$DDX-$ccB*$DDY)/$LL),$theY1-round(($ccL*$DDY+$ccB*$DDX)/$LL));
    imagefilledpolygon($this->Img, $pp, 3 , $cc);
    imagesetthickness($this->Img,2*$theSize-1);
    imageline($this->Img,$theX0,$theY0,($pp[0]+$pp[2]+$pp[4])/3,($pp[1]+$pp[3]+$pp[5])/3,$cc);
    imagesetthickness($this->Img,1);
    if (($theTooltipText!="")||($theOnClickAction!="")||($theOnMouseoverAction!="")||($theOnMouseoutAction!=""))
    { $tmpMapData="<area shape=polygon coords='".
      $pp[2].",".$pp[3].",".$pp[4].",".$pp[5].",".$pp[0].",".$pp[1].",".$pp[2].",".$pp[3].",".
      round($theX0-$theSize*$DDY/$LL).",".round($theY0+$theSize*$DDX/$LL).",".
      round($theX0+$theSize*$DDY/$LL).",".round($theY0-$theSize*$DDX/$LL)."' ";
      if ($theTooltipText!="") $tmpMapData=$tmpMapData." title='".$theTooltipText."' alt='".$theTooltipText."'";
      if ($theOnClickAction!="") $tmpMapData=$tmpMapData." href='javascript:".$theOnClickAction."'";
      if ($theOnMouseoverAction!="") $tmpMapData=$tmpMapData." onMouseover='".$theOnMouseoverAction."'";
      if ($theOnMouseoutAction!="") $tmpMapData=$tmpMapData." onMouseout='".$theOnMouseoutAction."'";
      $tmpMapData=$tmpMapData.">\n";
      $this->ImgMapData=$tmpMapData.$this->ImgMapData;
    }
  }

/home/megadansyp/www/eace8/../modules/mod_footer/../mod_vvisit_counter/diagram.php