nightly-test-server/jpgraph/jpgraph_plotmark.inc - llvm-archive - Git at Google

 <?php
 //=======================================================================
 // File:	JPGRAPH_PLOTMARK.PHP
 // Description:	Class file. Handles plotmarks
 // Created: 	2003-03-21
 // Author:	Johan Persson (johanp@aditus.nu)
 // Ver:		$Id$
 //
 // Copyright (c) Aditus Consulting. All rights reserved.
 //========================================================================


 //========================================================================
 // CLASS ImgData
 // Description: Base class for all image data classes that contains the
 // real image data.
 //========================================================================
 class ImgData {
     var $name = '';		// Each subclass gives a name
     var $an = array();		// Data array names
     var $colors = array();	// Available colors
     var $index  = array();	// Index for colors
     var $maxidx = 0 ;		// Max color index
     var $anchor_x=0.5, $anchor_y=0.5 ;    // Where is the center of the image
     // Create a GD image from the data and return a GD handle
     function GetImg($aMark,$aIdx) {
 	$n = $this->an[$aMark];
 	if( is_string($aIdx) ) {
 	    if( !in_array($aIdx,$this->colors) ) {
 		JpGraphError::RaiseL(23001,$this->name,$aIdx); //('This marker "'.($this->name).'" does not exist in color: '.$aIdx);
 	    }
 	    $idx = $this->index[$aIdx];
 	}
 	elseif( !is_integer($aIdx) ||
 		(is_integer($aIdx) && $aIdx > $this->maxidx ) ) {
 	    JpGraphError::RaiseL(23002,$this->name);
 //('Mark color index too large for marker "'.($this->name).'"');
 	}
 	else
 	    $idx = $aIdx ;
 	return Image::CreateFromString(base64_decode($this->{$n}[$idx][1]));
     }
     function GetAnchor() {
 	return array($this->anchor_x,$this->anchor_y);
     }
 }


 // Keep a global flag cache to reduce memory usage
 $_gFlagCache=array(
     1 => null,
     2 => null,
     3 => null,
     4 => null,
 );
 // Only supposed to b called as statics
 class FlagCache {
     function GetFlagImgByName($aSize,$aName) {
 	global $_gFlagCache;
 	require_once('jpgraph_flags.php');
 	if( $_gFlagCache[$aSize] === null ) {
 	    $_gFlagCache[$aSize] =& new FlagImages($aSize);
 	}
 	$f =& $_gFlagCache[$aSize];
 	$idx = $f->GetIdxByName($aName,$aFullName);
 	return $f->GetImgByIdx($idx);
     }
 }

 //===================================================
 // CLASS PlotMark
 // Description: Handles the plot marks in graphs
 //===================================================
 class PlotMark {
     var $title, $show=true;
     var $type,$weight=1;
     var $color="black", $width=4, $fill_color="blue";
     var $yvalue,$xvalue='',$csimtarget,$csimalt,$csimareas;
     var $iFormatCallback="";
     var $iFormatCallback2="";
     var $markimg='',$iScale=1.0;
     var $oldfilename='',$iFileName='';
     var $imgdata_balls = null;
     var $imgdata_diamonds = null;
     var $imgdata_squares = null;
     var $imgdata_bevels = null;
     var $imgdata_stars = null;
     var $imgdata_pushpins = null;

 //--------------
 // CONSTRUCTOR
     function PlotMark() {
 	$this->title = new Text();
 	$this->title->Hide();
 	$this->csimareas = '';
 	$this->csimalt = '';
 	$this->type=-1;
     }
 //---------------
 // PUBLIC METHODS
     function SetType($aType,$aFileName='',$aScale=1.0) {
 	$this->type = $aType;
 	if( $aType == MARK_IMG && $aFileName=='' ) {
 	    JpGraphError::RaiseL(23003);//('A filename must be specified if you set the mark type to MARK_IMG.');
 	}
 	$this->iFileName = $aFileName;
 	$this->iScale = $aScale;
     }

     function SetCallback($aFunc) {
 	$this->iFormatCallback = $aFunc;
     }

     function SetCallbackYX($aFunc) {
 	$this->iFormatCallback2 = $aFunc;
     }

     function GetType() {
 	return $this->type;
     }

     function SetColor($aColor) {
 	$this->color=$aColor;
     }

     function SetFillColor($aFillColor) {
 	$this->fill_color = $aFillColor;
     }

     function SetWeight($aWeight) {
 	$this->weight = $aWeight;
     }

     // Synonym for SetWidth()
     function SetSize($aWidth) {
 	$this->width=$aWidth;
     }

     function SetWidth($aWidth) {
 	$this->width=$aWidth;
     }

     function SetDefaultWidth() {
 	switch( $this->type ) {
 	    case MARK_CIRCLE:
 	    case MARK_FILLEDCIRCLE:
 		$this->width=4;
 		break;
 	    default:
 		$this->width=7;
 	}
     }

     function GetWidth() {
 	return $this->width;
     }

     function Hide($aHide=true) {
 	$this->show = !$aHide;
     }

     function Show($aShow=true) {
 	$this->show = $aShow;
     }

     function SetCSIMAltVal($aY,$aX='') {
         $this->yvalue=$aY;
         $this->xvalue=$aX;
     }

     function SetCSIMTarget($aTarget) {
         $this->csimtarget=$aTarget;
     }

     function SetCSIMAlt($aAlt) {
         $this->csimalt=$aAlt;
     }

     function GetCSIMAreas(){
         return $this->csimareas;
     }

     function AddCSIMPoly($aPts) {
         $coords = round($aPts[0]).", ".round($aPts[1]);
         $n = count($aPts)/2;
         for( $i=1; $i < $n; ++$i){
             $coords .= ", ".round($aPts[2*$i]).", ".round($aPts[2*$i+1]);
         }
         $this->csimareas="";
         if( !empty($this->csimtarget) ) {
 	    $this->csimareas .= "<area shape=\"poly\" coords=\"$coords\" href=\"".htmlentities($this->csimtarget)."\"";
 	    if( !empty($this->csimalt) ) {
 		$tmp=sprintf($this->csimalt,$this->yvalue,$this->xvalue);
 		$this->csimareas .= " title=\"$tmp\"";
 	    }
 	    $this->csimareas .= " alt=\"$tmp\" />\n";
 	}
     }

     function AddCSIMCircle($x,$y,$r) {
     	$x = round($x); $y=round($y); $r=round($r);
         $this->csimareas="";
         if( !empty($this->csimtarget) ) {
 	    $this->csimareas .= "<area shape=\"circle\" coords=\"$x,$y,$r\" href=\"".htmlentities($this->csimtarget)."\"";
     	    if( !empty($this->csimalt) ) {
 		$tmp=sprintf($this->csimalt,$this->yvalue,$this->xvalue);
 		$this->csimareas .= " title=\"$tmp\"";
 	    }
             $this->csimareas .= " alt=\"$tmp\" />\n";
         }
     }

     function Stroke(&$img,$x,$y) {
 	if( !$this->show ) return;

 	if( $this->iFormatCallback != '' || $this->iFormatCallback2 != '' ) {

 	    if( $this->iFormatCallback != '' ) {
 		$f = $this->iFormatCallback;
 		list($width,$color,$fcolor) = call_user_func($f,$this->yvalue);
 		$filename = $this->iFileName;
 		$imgscale = $this->iScale;
 	    }
 	    else {
 		$f = $this->iFormatCallback2;
 		list($width,$color,$fcolor,$filename,$imgscale) = call_user_func($f,$this->yvalue,$this->xvalue);
 		if( $filename=="" ) $filename = $this->iFileName;
 		if( $imgscale=="" ) $imgscale = $this->iScale;
 	    }

 	    if( $width=="" ) $width = $this->width;
 	    if( $color=="" ) $color = $this->color;
 	    if( $fcolor=="" ) $fcolor = $this->fill_color;

 	}
 	else {
 	    $fcolor = $this->fill_color;
 	    $color = $this->color;
 	    $width = $this->width;
 	    $filename = $this->iFileName;
 	    $imgscale = $this->iScale;
 	}

 	if( $this->type == MARK_IMG ||
 	    ($this->type >= MARK_FLAG1 && $this->type <= MARK_FLAG4 ) ||
 	    $this->type >= MARK_IMG_PUSHPIN ) {

 	    // Note: For the builtin images we use the "filename" parameter
 	    // to denote the color
 	    $anchor_x = 0.5;
 	    $anchor_y = 0.5;
 	    switch( $this->type ) {
 		case MARK_FLAG1:
 		case MARK_FLAG2:
 		case MARK_FLAG3:
 		case MARK_FLAG4:
 		    $this->markimg = FlagCache::GetFlagImgByName($this->type-MARK_FLAG1+1,$filename);
 		    break;

 		case MARK_IMG :
 		    // Load an image and use that as a marker
 		    // Small optimization, if we have already read an image don't
 		    // waste time reading it again.
 		    if( $this->markimg == '' || !($this->oldfilename === $filename) ) {
 			$this->markimg = Graph::LoadBkgImage('',$filename);
 			$this->oldfilename = $filename ;
 		    }
 		    break;

 		case MARK_IMG_PUSHPIN:
 		case MARK_IMG_SPUSHPIN:
 		case MARK_IMG_LPUSHPIN:
 		    if( $this->imgdata_pushpins == null ) {
 			require_once 'imgdata_pushpins.inc';
 			$this->imgdata_pushpins = new ImgData_PushPins();
 		    }
 		    $this->markimg = $this->imgdata_pushpins->GetImg($this->type,$filename);
 		    list($anchor_x,$anchor_y) = $this->imgdata_pushpins->GetAnchor();
 		    break;

 		case MARK_IMG_SQUARE:
 		    if( $this->imgdata_squares == null ) {
 			require_once 'imgdata_squares.inc';
 			$this->imgdata_squares = new ImgData_Squares();
 		    }
 		    $this->markimg = $this->imgdata_squares->GetImg($this->type,$filename);
 		    list($anchor_x,$anchor_y) = $this->imgdata_squares->GetAnchor();
 		    break;

 		case MARK_IMG_STAR:
 		    if( $this->imgdata_stars == null ) {
 			require_once 'imgdata_stars.inc';
 			$this->imgdata_stars = new ImgData_Stars();
 		    }
 		    $this->markimg = $this->imgdata_stars->GetImg($this->type,$filename);
 		    list($anchor_x,$anchor_y) = $this->imgdata_stars->GetAnchor();
 		    break;

 		case MARK_IMG_BEVEL:
 		    if( $this->imgdata_bevels == null ) {
 			require_once 'imgdata_bevels.inc';
 			$this->imgdata_bevels = new ImgData_Bevels();
 		    }
 		    $this->markimg = $this->imgdata_bevels->GetImg($this->type,$filename);
 		    list($anchor_x,$anchor_y) = $this->imgdata_bevels->GetAnchor();
 		    break;

 		case MARK_IMG_DIAMOND:
 		    if( $this->imgdata_diamonds == null ) {
 			require_once 'imgdata_diamonds.inc';
 			$this->imgdata_diamonds = new ImgData_Diamonds();
 		    }
 		    $this->markimg = $this->imgdata_diamonds->GetImg($this->type,$filename);
 		    list($anchor_x,$anchor_y) = $this->imgdata_diamonds->GetAnchor();
 		    break;

 		case MARK_IMG_BALL:
 		case MARK_IMG_SBALL:
 		case MARK_IMG_MBALL:
 		case MARK_IMG_LBALL:
 		    if( $this->imgdata_balls == null ) {
 			require_once 'imgdata_balls.inc';
 			$this->imgdata_balls = new ImgData_Balls();
 		    }
 		    $this->markimg = $this->imgdata_balls->GetImg($this->type,$filename);
 		    list($anchor_x,$anchor_y) = $this->imgdata_balls->GetAnchor();
 		    break;
 	    }

 	    $w = $img->GetWidth($this->markimg);
 	    $h = $img->GetHeight($this->markimg);

 	    $dw = round($imgscale * $w );
 	    $dh = round($imgscale * $h );

 	    // Do potential rotation
 	    list($x,$y) = $img->Rotate($x,$y);

 	    $dx = round($x-$dw*$anchor_x);
 	    $dy = round($y-$dh*$anchor_y);

 	    $this->width = max($dx,$dy);

 	    $img->Copy($this->markimg,$dx,$dy,0,0,$dw,$dh,$w,$h);
 	    if( !empty($this->csimtarget) ) {
 		$this->csimareas = "<area shape=\"rect\" coords=\"".
 		    $dx.','.$dy.','.round($dx+$dw).','.round($dy+$dh).'" '.
 		    "href=\"".htmlentities($this->csimtarget)."\"";
 		if( !empty($this->csimalt) ) {
 		    $tmp=sprintf($this->csimalt,$this->yvalue,$this->xvalue);
 		    $this->csimareas .= " title=\"$tmp\"";
 		}
 		$this->csimareas .= " alt=\"$tmp\" />\n";
 	    }

 	    // Stroke title
 	    $this->title->Align("center","top");
 	    $this->title->Stroke($img,$x,$y+round($dh/2));
 	    return;
 	}

 	$weight = $this->weight;
 	$dx=round($width/2,0);
 	$dy=round($width/2,0);
 	$pts=0;

 	switch( $this->type ) {
 	    case MARK_SQUARE:
 		$c[]=$x-$dx;$c[]=$y-$dy;
 		$c[]=$x+$dx;$c[]=$y-$dy;
 		$c[]=$x+$dx;$c[]=$y+$dy;
 		$c[]=$x-$dx;$c[]=$y+$dy;
 		$c[]=$x-$dx;$c[]=$y-$dy;
 		$pts=5;
 		break;
 	    case MARK_UTRIANGLE:
 		++$dx;++$dy;
 		$c[]=$x-$dx;$c[]=$y+0.87*$dy;	// tan(60)/2*$dx
 		$c[]=$x;$c[]=$y-0.87*$dy;
 		$c[]=$x+$dx;$c[]=$y+0.87*$dy;
 		$c[]=$x-$dx;$c[]=$y+0.87*$dy;	// tan(60)/2*$dx
 		$pts=4;
 		break;
 	    case MARK_DTRIANGLE:
 		++$dx;++$dy;
 		$c[]=$x;$c[]=$y+0.87*$dy;	// tan(60)/2*$dx
 		$c[]=$x-$dx;$c[]=$y-0.87*$dy;
 		$c[]=$x+$dx;$c[]=$y-0.87*$dy;
 		$c[]=$x;$c[]=$y+0.87*$dy;	// tan(60)/2*$dx
 		$pts=4;
 		break;
 	    case MARK_DIAMOND:
 		$c[]=$x;$c[]=$y+$dy;
 		$c[]=$x-$dx;$c[]=$y;
 		$c[]=$x;$c[]=$y-$dy;
 		$c[]=$x+$dx;$c[]=$y;
 		$c[]=$x;$c[]=$y+$dy;
 		$pts=5;
 		break;
 	    case MARK_LEFTTRIANGLE:
 		$c[]=$x;$c[]=$y;
 		$c[]=$x;$c[]=$y+2*$dy;
 		$c[]=$x+$dx*2;$c[]=$y;
 		$c[]=$x;$c[]=$y;
 		$pts=4;
 		break;
 	    case MARK_RIGHTTRIANGLE:
 		$c[]=$x-$dx*2;$c[]=$y;
 		$c[]=$x;$c[]=$y+2*$dy;
 		$c[]=$x;$c[]=$y;
 		$c[]=$x-$dx*2;$c[]=$y;
 		$pts=4;
 		break;
 	    case MARK_FLASH:
 		$dy *= 2;
 		$c[]=$x+$dx/2; $c[]=$y-$dy;
 		$c[]=$x-$dx+$dx/2; $c[]=$y+$dy*0.7-$dy;
 		$c[]=$x+$dx/2; $c[]=$y+$dy*1.3-$dy;
 		$c[]=$x-$dx+$dx/2; $c[]=$y+2*$dy-$dy;
 		$img->SetLineWeight($weight);
 		$img->SetColor($color);
 		$img->Polygon($c);
 		$img->SetLineWeight(1);
 		$this->AddCSIMPoly($c);
 		break;
 	}

 	if( $pts>0 ) {
 	    $this->AddCSIMPoly($c);
 	    $img->SetLineWeight($weight);
 	    $img->SetColor($fcolor);
 	    $img->FilledPolygon($c);
 	    $img->SetColor($color);
 	    $img->Polygon($c);
 	    $img->SetLineWeight(1);
 	}
 	elseif( $this->type==MARK_CIRCLE ) {
 	    $img->SetColor($color);
 	    $img->Circle($x,$y,$width);
 	    $this->AddCSIMCircle($x,$y,$width);
 	}
 	elseif( $this->type==MARK_FILLEDCIRCLE ) {
 	    $img->SetColor($fcolor);
 	    $img->FilledCircle($x,$y,$width);
 	    $img->SetColor($color);
 	    $img->Circle($x,$y,$width);
 	    $this->AddCSIMCircle($x,$y,$width);
 	}
 	elseif( $this->type==MARK_CROSS ) {
 	    // Oversize by a pixel to match the X
 	    $img->SetColor($color);
 	    $img->SetLineWeight($weight);
 	    $img->Line($x,$y+$dy+1,$x,$y-$dy-1);
 	    $img->Line($x-$dx-1,$y,$x+$dx+1,$y);
 	    $this->AddCSIMCircle($x,$y,$dx);
 	}
 	elseif( $this->type==MARK_X ) {
 	    $img->SetColor($color);
 	    $img->SetLineWeight($weight);
 	    $img->Line($x+$dx,$y+$dy,$x-$dx,$y-$dy);
 	    $img->Line($x-$dx,$y+$dy,$x+$dx,$y-$dy);
 	    $this->AddCSIMCircle($x,$y,$dx+$dy);
 	}
 	elseif( $this->type==MARK_STAR ) {
 	    $img->SetColor($color);
 	    $img->SetLineWeight($weight);
 	    $img->Line($x+$dx,$y+$dy,$x-$dx,$y-$dy);
 	    $img->Line($x-$dx,$y+$dy,$x+$dx,$y-$dy);
 	    // Oversize by a pixel to match the X
 	    $img->Line($x,$y+$dy+1,$x,$y-$dy-1);
 	    $img->Line($x-$dx-1,$y,$x+$dx+1,$y);
 	    $this->AddCSIMCircle($x,$y,$dx+$dy);
 	}

 	// Stroke title
 	$this->title->Align("center","center");
 	$this->title->Stroke($img,$x,$y);
     }
 } // Class


 ?>
	<?php
	//=======================================================================
	// File: JPGRAPH_PLOTMARK.PHP
	// Description: Class file. Handles plotmarks
	// Created: 2003-03-21
	// Author: Johan Persson (johanp@aditus.nu)
	// Ver: $Id$
	//
	// Copyright (c) Aditus Consulting. All rights reserved.
	//========================================================================


	//========================================================================
	// CLASS ImgData
	// Description: Base class for all image data classes that contains the
	// real image data.
	//========================================================================
	class ImgData {
	var $name = ''; // Each subclass gives a name
	var $an = array(); // Data array names
	var $colors = array(); // Available colors
	var $index = array(); // Index for colors
	var $maxidx = 0 ; // Max color index
	var $anchor_x=0.5, $anchor_y=0.5 ; // Where is the center of the image
	// Create a GD image from the data and return a GD handle
	function GetImg($aMark,$aIdx) {
	$n = $this->an[$aMark];
	if( is_string($aIdx) ) {
	if( !in_array($aIdx,$this->colors) ) {
	JpGraphError::RaiseL(23001,$this->name,$aIdx); //('This marker "'.($this->name).'" does not exist in color: '.$aIdx);
	}
	$idx = $this->index[$aIdx];
	}
	elseif( !is_integer($aIdx) \|\|
	(is_integer($aIdx) && $aIdx > $this->maxidx ) ) {
	JpGraphError::RaiseL(23002,$this->name);
	//('Mark color index too large for marker "'.($this->name).'"');
	}
	else
	$idx = $aIdx ;
	return Image::CreateFromString(base64_decode($this->{$n}[$idx][1]));
	}
	function GetAnchor() {
	return array($this->anchor_x,$this->anchor_y);
	}
	}


	// Keep a global flag cache to reduce memory usage
	$_gFlagCache=array(
	1 => null,
	2 => null,
	3 => null,
	4 => null,
	);
	// Only supposed to b called as statics
	class FlagCache {
	function GetFlagImgByName($aSize,$aName) {
	global $_gFlagCache;
	require_once('jpgraph_flags.php');
	if( $_gFlagCache[$aSize] === null ) {
	$_gFlagCache[$aSize] =& new FlagImages($aSize);
	}
	$f =& $_gFlagCache[$aSize];
	$idx = $f->GetIdxByName($aName,$aFullName);
	return $f->GetImgByIdx($idx);
	}
	}

	//===================================================
	// CLASS PlotMark
	// Description: Handles the plot marks in graphs
	//===================================================
	class PlotMark {
	var $title, $show=true;
	var $type,$weight=1;
	var $color="black", $width=4, $fill_color="blue";
	var $yvalue,$xvalue='',$csimtarget,$csimalt,$csimareas;
	var $iFormatCallback="";
	var $iFormatCallback2="";
	var $markimg='',$iScale=1.0;
	var $oldfilename='',$iFileName='';
	var $imgdata_balls = null;
	var $imgdata_diamonds = null;
	var $imgdata_squares = null;
	var $imgdata_bevels = null;
	var $imgdata_stars = null;
	var $imgdata_pushpins = null;

	//--------------
	// CONSTRUCTOR
	function PlotMark() {
	$this->title = new Text();
	$this->title->Hide();
	$this->csimareas = '';
	$this->csimalt = '';
	$this->type=-1;
	}
	//---------------
	// PUBLIC METHODS
	function SetType($aType,$aFileName='',$aScale=1.0) {
	$this->type = $aType;
	if( $aType == MARK_IMG && $aFileName=='' ) {
	JpGraphError::RaiseL(23003);//('A filename must be specified if you set the mark type to MARK_IMG.');
	}
	$this->iFileName = $aFileName;
	$this->iScale = $aScale;
	}

	function SetCallback($aFunc) {
	$this->iFormatCallback = $aFunc;
	}

	function SetCallbackYX($aFunc) {
	$this->iFormatCallback2 = $aFunc;
	}

	function GetType() {
	return $this->type;
	}

	function SetColor($aColor) {
	$this->color=$aColor;
	}

	function SetFillColor($aFillColor) {
	$this->fill_color = $aFillColor;
	}

	function SetWeight($aWeight) {
	$this->weight = $aWeight;
	}

	// Synonym for SetWidth()
	function SetSize($aWidth) {
	$this->width=$aWidth;
	}

	function SetWidth($aWidth) {
	$this->width=$aWidth;
	}

	function SetDefaultWidth() {
	switch( $this->type ) {
	case MARK_CIRCLE:
	case MARK_FILLEDCIRCLE:
	$this->width=4;
	break;
	default:
	$this->width=7;
	}
	}

	function GetWidth() {
	return $this->width;
	}

	function Hide($aHide=true) {
	$this->show = !$aHide;
	}

	function Show($aShow=true) {
	$this->show = $aShow;
	}

	function SetCSIMAltVal($aY,$aX='') {
	$this->yvalue=$aY;
	$this->xvalue=$aX;
	}

	function SetCSIMTarget($aTarget) {
	$this->csimtarget=$aTarget;
	}

	function SetCSIMAlt($aAlt) {
	$this->csimalt=$aAlt;
	}

	function GetCSIMAreas(){
	return $this->csimareas;
	}

	function AddCSIMPoly($aPts) {
	$coords = round($aPts[0]).", ".round($aPts[1]);
	$n = count($aPts)/2;
	for( $i=1; $i < $n; ++$i){
	$coords .= ", ".round($aPts[2$i]).", ".round($aPts[2$i+1]);
	}
	$this->csimareas="";
	if( !empty($this->csimtarget) ) {
	$this->csimareas .= "<area shape=\"poly\" coords=\"$coords\" href=\"".htmlentities($this->csimtarget)."\"";
	if( !empty($this->csimalt) ) {
	$tmp=sprintf($this->csimalt,$this->yvalue,$this->xvalue);
	$this->csimareas .= " title=\"$tmp\"";
	}
	$this->csimareas .= " alt=\"$tmp\" />\n";
	}
	}

	function AddCSIMCircle($x,$y,$r) {
	$x = round($x); $y=round($y); $r=round($r);
	$this->csimareas="";
	if( !empty($this->csimtarget) ) {
	$this->csimareas .= "<area shape=\"circle\" coords=\"$x,$y,$r\" href=\"".htmlentities($this->csimtarget)."\"";
	if( !empty($this->csimalt) ) {
	$tmp=sprintf($this->csimalt,$this->yvalue,$this->xvalue);
	$this->csimareas .= " title=\"$tmp\"";
	}
	$this->csimareas .= " alt=\"$tmp\" />\n";
	}
	}

	function Stroke(&$img,$x,$y) {
	if( !$this->show ) return;

	if( $this->iFormatCallback != '' \|\| $this->iFormatCallback2 != '' ) {

	if( $this->iFormatCallback != '' ) {
	$f = $this->iFormatCallback;
	list($width,$color,$fcolor) = call_user_func($f,$this->yvalue);
	$filename = $this->iFileName;
	$imgscale = $this->iScale;
	}
	else {
	$f = $this->iFormatCallback2;
	list($width,$color,$fcolor,$filename,$imgscale) = call_user_func($f,$this->yvalue,$this->xvalue);
	if( $filename=="" ) $filename = $this->iFileName;
	if( $imgscale=="" ) $imgscale = $this->iScale;
	}

	if( $width=="" ) $width = $this->width;
	if( $color=="" ) $color = $this->color;
	if( $fcolor=="" ) $fcolor = $this->fill_color;

	}
	else {
	$fcolor = $this->fill_color;
	$color = $this->color;
	$width = $this->width;
	$filename = $this->iFileName;
	$imgscale = $this->iScale;
	}

	if( $this->type == MARK_IMG \|\|
	($this->type >= MARK_FLAG1 && $this->type <= MARK_FLAG4 ) \|\|
	$this->type >= MARK_IMG_PUSHPIN ) {

	// Note: For the builtin images we use the "filename" parameter
	// to denote the color
	$anchor_x = 0.5;
	$anchor_y = 0.5;
	switch( $this->type ) {
	case MARK_FLAG1:
	case MARK_FLAG2:
	case MARK_FLAG3:
	case MARK_FLAG4:
	$this->markimg = FlagCache::GetFlagImgByName($this->type-MARK_FLAG1+1,$filename);
	break;

	case MARK_IMG :
	// Load an image and use that as a marker
	// Small optimization, if we have already read an image don't
	// waste time reading it again.
	if( $this->markimg == '' \|\| !($this->oldfilename === $filename) ) {
	$this->markimg = Graph::LoadBkgImage('',$filename);
	$this->oldfilename = $filename ;
	}
	break;

	case MARK_IMG_PUSHPIN:
	case MARK_IMG_SPUSHPIN:
	case MARK_IMG_LPUSHPIN:
	if( $this->imgdata_pushpins == null ) {
	require_once 'imgdata_pushpins.inc';
	$this->imgdata_pushpins = new ImgData_PushPins();
	}
	$this->markimg = $this->imgdata_pushpins->GetImg($this->type,$filename);
	list($anchor_x,$anchor_y) = $this->imgdata_pushpins->GetAnchor();
	break;

	case MARK_IMG_SQUARE:
	if( $this->imgdata_squares == null ) {
	require_once 'imgdata_squares.inc';
	$this->imgdata_squares = new ImgData_Squares();
	}
	$this->markimg = $this->imgdata_squares->GetImg($this->type,$filename);
	list($anchor_x,$anchor_y) = $this->imgdata_squares->GetAnchor();
	break;

	case MARK_IMG_STAR:
	if( $this->imgdata_stars == null ) {
	require_once 'imgdata_stars.inc';
	$this->imgdata_stars = new ImgData_Stars();
	}
	$this->markimg = $this->imgdata_stars->GetImg($this->type,$filename);
	list($anchor_x,$anchor_y) = $this->imgdata_stars->GetAnchor();
	break;

	case MARK_IMG_BEVEL:
	if( $this->imgdata_bevels == null ) {
	require_once 'imgdata_bevels.inc';
	$this->imgdata_bevels = new ImgData_Bevels();
	}
	$this->markimg = $this->imgdata_bevels->GetImg($this->type,$filename);
	list($anchor_x,$anchor_y) = $this->imgdata_bevels->GetAnchor();
	break;

	case MARK_IMG_DIAMOND:
	if( $this->imgdata_diamonds == null ) {
	require_once 'imgdata_diamonds.inc';
	$this->imgdata_diamonds = new ImgData_Diamonds();
	}
	$this->markimg = $this->imgdata_diamonds->GetImg($this->type,$filename);
	list($anchor_x,$anchor_y) = $this->imgdata_diamonds->GetAnchor();
	break;

	case MARK_IMG_BALL:
	case MARK_IMG_SBALL:
	case MARK_IMG_MBALL:
	case MARK_IMG_LBALL:
	if( $this->imgdata_balls == null ) {
	require_once 'imgdata_balls.inc';
	$this->imgdata_balls = new ImgData_Balls();
	}
	$this->markimg = $this->imgdata_balls->GetImg($this->type,$filename);
	list($anchor_x,$anchor_y) = $this->imgdata_balls->GetAnchor();
	break;
	}

	$w = $img->GetWidth($this->markimg);
	$h = $img->GetHeight($this->markimg);

	$dw = round($imgscale * $w );
	$dh = round($imgscale * $h );

	// Do potential rotation
	list($x,$y) = $img->Rotate($x,$y);

	$dx = round($x-$dw*$anchor_x);
	$dy = round($y-$dh*$anchor_y);

	$this->width = max($dx,$dy);

	$img->Copy($this->markimg,$dx,$dy,0,0,$dw,$dh,$w,$h);
	if( !empty($this->csimtarget) ) {
	$this->csimareas = "<area shape=\"rect\" coords=\"".
	$dx.','.$dy.','.round($dx+$dw).','.round($dy+$dh).'" '.
	"href=\"".htmlentities($this->csimtarget)."\"";
	if( !empty($this->csimalt) ) {
	$tmp=sprintf($this->csimalt,$this->yvalue,$this->xvalue);
	$this->csimareas .= " title=\"$tmp\"";
	}
	$this->csimareas .= " alt=\"$tmp\" />\n";
	}

	// Stroke title
	$this->title->Align("center","top");
	$this->title->Stroke($img,$x,$y+round($dh/2));
	return;
	}

	$weight = $this->weight;
	$dx=round($width/2,0);
	$dy=round($width/2,0);
	$pts=0;

	switch( $this->type ) {
	case MARK_SQUARE:
	$c[]=$x-$dx;$c[]=$y-$dy;
	$c[]=$x+$dx;$c[]=$y-$dy;
	$c[]=$x+$dx;$c[]=$y+$dy;
	$c[]=$x-$dx;$c[]=$y+$dy;
	$c[]=$x-$dx;$c[]=$y-$dy;
	$pts=5;
	break;
	case MARK_UTRIANGLE:
	++$dx;++$dy;
	$c[]=$x-$dx;$c[]=$y+0.87$dy; // tan(60)/2$dx
	$c[]=$x;$c[]=$y-0.87*$dy;
	$c[]=$x+$dx;$c[]=$y+0.87*$dy;
	$c[]=$x-$dx;$c[]=$y+0.87$dy; // tan(60)/2$dx
	$pts=4;
	break;
	case MARK_DTRIANGLE:
	++$dx;++$dy;
	$c[]=$x;$c[]=$y+0.87$dy; // tan(60)/2$dx
	$c[]=$x-$dx;$c[]=$y-0.87*$dy;
	$c[]=$x+$dx;$c[]=$y-0.87*$dy;
	$c[]=$x;$c[]=$y+0.87$dy; // tan(60)/2$dx
	$pts=4;
	break;
	case MARK_DIAMOND:
	$c[]=$x;$c[]=$y+$dy;
	$c[]=$x-$dx;$c[]=$y;
	$c[]=$x;$c[]=$y-$dy;
	$c[]=$x+$dx;$c[]=$y;
	$c[]=$x;$c[]=$y+$dy;
	$pts=5;
	break;
	case MARK_LEFTTRIANGLE:
	$c[]=$x;$c[]=$y;
	$c[]=$x;$c[]=$y+2*$dy;
	$c[]=$x+$dx*2;$c[]=$y;
	$c[]=$x;$c[]=$y;
	$pts=4;
	break;
	case MARK_RIGHTTRIANGLE:
	$c[]=$x-$dx*2;$c[]=$y;
	$c[]=$x;$c[]=$y+2*$dy;
	$c[]=$x;$c[]=$y;
	$c[]=$x-$dx*2;$c[]=$y;
	$pts=4;
	break;
	case MARK_FLASH:
	$dy *= 2;
	$c[]=$x+$dx/2; $c[]=$y-$dy;
	$c[]=$x-$dx+$dx/2; $c[]=$y+$dy*0.7-$dy;
	$c[]=$x+$dx/2; $c[]=$y+$dy*1.3-$dy;
	$c[]=$x-$dx+$dx/2; $c[]=$y+2*$dy-$dy;
	$img->SetLineWeight($weight);
	$img->SetColor($color);
	$img->Polygon($c);
	$img->SetLineWeight(1);
	$this->AddCSIMPoly($c);
	break;
	}

	if( $pts>0 ) {
	$this->AddCSIMPoly($c);
	$img->SetLineWeight($weight);
	$img->SetColor($fcolor);
	$img->FilledPolygon($c);
	$img->SetColor($color);
	$img->Polygon($c);
	$img->SetLineWeight(1);
	}
	elseif( $this->type==MARK_CIRCLE ) {
	$img->SetColor($color);
	$img->Circle($x,$y,$width);
	$this->AddCSIMCircle($x,$y,$width);
	}
	elseif( $this->type==MARK_FILLEDCIRCLE ) {
	$img->SetColor($fcolor);
	$img->FilledCircle($x,$y,$width);
	$img->SetColor($color);
	$img->Circle($x,$y,$width);
	$this->AddCSIMCircle($x,$y,$width);
	}
	elseif( $this->type==MARK_CROSS ) {
	// Oversize by a pixel to match the X
	$img->SetColor($color);
	$img->SetLineWeight($weight);
	$img->Line($x,$y+$dy+1,$x,$y-$dy-1);
	$img->Line($x-$dx-1,$y,$x+$dx+1,$y);
	$this->AddCSIMCircle($x,$y,$dx);
	}
	elseif( $this->type==MARK_X ) {
	$img->SetColor($color);
	$img->SetLineWeight($weight);
	$img->Line($x+$dx,$y+$dy,$x-$dx,$y-$dy);
	$img->Line($x-$dx,$y+$dy,$x+$dx,$y-$dy);
	$this->AddCSIMCircle($x,$y,$dx+$dy);
	}
	elseif( $this->type==MARK_STAR ) {
	$img->SetColor($color);
	$img->SetLineWeight($weight);
	$img->Line($x+$dx,$y+$dy,$x-$dx,$y-$dy);
	$img->Line($x-$dx,$y+$dy,$x+$dx,$y-$dy);
	// Oversize by a pixel to match the X
	$img->Line($x,$y+$dy+1,$x,$y-$dy-1);
	$img->Line($x-$dx-1,$y,$x+$dx+1,$y);
	$this->AddCSIMCircle($x,$y,$dx+$dy);
	}

	// Stroke title
	$this->title->Align("center","center");
	$this->title->Stroke($img,$x,$y);
	}
	} // Class


	?>