eXorithm – Execute Algorithm: View / Run Algorithm watermark_image

function watermark_image ($image, $watermark, $position, $margin, $transparency
{
  $w = imagesx$image);
  $h = imagesy$image);
  
  $ww = imagesx$watermark);
  $hw = imagesy$watermark);
  
  $image2 = image_create_alpha$w, $h);
  imagecopy$image2, $image, 0, 0, 0, 0, $w, $h);
  
  imagealphablending$image2, true);
  imagesavealpha$image2, true);
  
  switch ($position) {
    case 'tl'
      $top = $margin
      $left = $margin
      break
    case 'tr'
      $top = $margin
      $left = $w$ww$margin
      break
    case 'br'
      $top = $h$hw$margin
      $left = $w$ww$margin
      break
    case 'bl'
      $top = $h$hw$margin
      $left = $margin
      break
    default
      $top = ($h$hw)/2;
      $left = ($w$ww)/2;
  }
  
  if ($transparency>0)
    imagecopy$image2, add_transparency$watermark, $transparency), $left, $top, 0, 0, $ww, $hw); 
  else
    imagecopy$image2, $watermark, $left, $top, 0, 0, $ww, $hw);
  
  return $image2
}