From 071c17d502d4be0bb7990c52717ad1b82256290d Mon Sep 17 00:00:00 2001 From: Dobrica Pavlinusic Date: Sun, 3 Apr 2011 22:49:53 +0200 Subject: [PATCH] merge icons 50% to better represent overlaping ones --- tiles.pl | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/tiles.pl b/tiles.pl index e855ba9..4a11d75 100755 --- a/tiles.pl +++ b/tiles.pl @@ -195,7 +195,8 @@ while ( my ($zoom,$tilex,$tiley) = $sth->fetchrow_array ) { $ix = $lngpix - $left - $xiconoff ; # Remove half image size $iy = $latpix - $top - $yiconoff ; # Remove half image size - $im->copy($imicon,$ix,$iy,0,0,$xiconpix,$yiconpix) ; +# $im->copy($imicon,$ix,$iy,0,0,$xiconpix,$yiconpix) ; + $im->copyMerge($imicon,$ix,$iy,0,0,$xiconpix,$yiconpix,50) ; } open(my $PNG, '>', $file) || die "$file: $!"; -- 2.20.1