Нанесение текстовых водяных знаков на изображение

// Константы положения водяного знака на картинке
define ("WATERMARK_LEFT_BOTTOM",0);
define ("WATERMARK_LEFT_TOP",1);
define ("WATERMARK_RIGHT_BOTTOM",2);
define ("WATERMARK_RIGHT_TOP",3);
define ("WATERMARK_CENTER",4);

function Watermark_Image($picture, $font, $font_size, $marker,
$watermark_position=WATERMARK_LEFT_BOTTOM) {
// Проверки на наличие файлов и допустимые параметры
if (!file_exists($picture)) { return false; }
if (!file_exists($font)) { return false; }
if ($font_size<10) { return false; }
if (($marker=trim($marker))=="") { return false; }

// Получить размеры исходного изображения
list ($sx,$sy)=GetImageSize($picture);
if ($sx==0 || $sy==0) { return false; }

$dst_im=imageCreatetruecolor($sx,$sy);

// Определить цвета для нанесения водяных знаков
$black=ImageColorAllocate($dst_im,0,0,0);
$white=ImageColorAllocate($dst_im,255,255,255);

// Если расширения нет, то выход с ошибкой
$pocket=Array();
eregi("\.([a-z]*)$",$picture,$pocket);
if ($pocket[1]=="") { return false; }

// На основании расширения создать картинку
switch (strtolower($pocket[1])) {
case "jpeg":
case "jpg": {
if (!$im=@ImageCreateFromJpeg($picture)) { return false; }
break;
}
case "gif": {
if (!$im=@ImageCreateFromGif($picture)) { return false; }
break;
}
case "png": {
if (!$im=@ImageCreateFromPng($picture)) { return false; }
break;
}
default: { return false; }
}

ImageCopyResampled($dst_im, $im, 0, 0, 0, 0, $sx, $sy, $sx, $sy);
imageDestroy($im);

// Получить координаты блока под текст
list($lnx,$lny,$rnx,$rny,$rvx,$rvy,$lvx,$lvy) =
ImageTTFBBox($font_size,0,$font,$marker);

// Вычислить размеры блока
$text_width=$rnx-$lnx;
$text_height=$rny-$rvy;

// Получить координаты блока на картинке для нанесения надписи
switch ($watermark_position) {
case WATERMARK_LEFT_BOTTOM: {
$pos_x=10;
$pos_y=$sy-10;
break;
}
case WATERMARK_RIGHT_BOTTOM: {
$pos_x=$sx-$text_width-10;
$pos_y=$sy-10;
break;
}
case WATERMARK_LEFT_TOP: {
$pos_x=10;
$pos_y=$text_height+10;
break;
}
case WATERMARK_RIGHT_TOP: {
$pos_x=$sx-$text_width-10;
$pos_y=$text_height+10;
break;
}
case WATERMARK_CENTER: {
$pos_x=intval($sx/2-$text_width/2);
$pos_y=intval($sy/2+$text_height/2);
break;
}
default: { return false; }
}

// Подсчитать количество светлых и темных пикселов в блоке
$dark=0;
$light=0;

for ($x=0; $x<$text_width; $x++) {
for ($y=0; $y<$text_height; $y++) {
$color=imageColorAt($dst_im,($pos_x+$x),($pos_y+$y-$text_height));
list($r,$g,$b)=array_values(imageColorsForIndex($dst_im,$color));
if (($r+$g+$b)<(128*3)) { $dark++; } else { $light++; }
}
}

// В зависимости от количества светлых и темных точек нанести
// светлую или темную надпись
if ($light>$dark) {
// Темный текст со светлой рамкой
ImageTTFText($dst_im,$font_size,0,$pos_x-1,$pos_y-1,$white,$font,$marker);
ImageTTFText($dst_im,$font_size,0,$pos_x,$pos_y-1,$white,$font,$marker);
ImageTTFText($dst_im,$font_size,0,$pos_x+1,$pos_y-1,$white,$font,$marker);

ImageTTFText($dst_im,$font_size,0,$pos_x-1,$pos_y,$white,$font,$marker);
ImageTTFText($dst_im,$font_size,0,$pos_x+1,$pos_y,$white,$font,$marker);

ImageTTFText($dst_im,$font_size,0,$pos_x-1,$pos_y+1,$white,$font,$marker);
ImageTTFText($dst_im,$font_size,0,$pos_x,$pos_y+1,$white,$font,$marker);
ImageTTFText($dst_im,$font_size,0,$pos_x+1,$pos_y+1,$white,$font,$marker);

ImageTTFText($dst_im,$font_size,0,$pos_x,$pos_y,$black,$font,$marker);
}
else {
// Светлый текст с темной рамкой
ImageTTFText($dst_im,$font_size,0,$pos_x-1,$pos_y-1,$black,$font,$marker);
ImageTTFText($dst_im,$font_size,0,$pos_x,$pos_y-1,$black,$font,$marker);
ImageTTFText($dst_im,$font_size,0,$pos_x+1,$pos_y-1,$black,$font,$marker);

ImageTTFText($dst_im,$font_size,0,$pos_x-1,$pos_y,$black,$font,$marker);
ImageTTFText($dst_im,$font_size,0,$pos_x+1,$pos_y,$black,$font,$marker);

ImageTTFText($dst_im,$font_size,0,$pos_x-1,$pos_y+1,$black,$font,$marker);
ImageTTFText($dst_im,$font_size,0,$pos_x,$pos_y+1,$black,$font,$marker);
ImageTTFText($dst_im,$font_size,0,$pos_x+1,$pos_y+1,$black,$font,$marker);

ImageTTFText($dst_im,$font_size,0,$pos_x,$pos_y,$white,$font,$marker);
}