[magick-users] Composite in Perl

[PixiGreg]

Hi,

I asked this question a few weeks ago too, and in fact I pointed out a bug :
normally, you would have to use the 'dissolve' composite op, but...

This works fine (command line):

    compose -dissolve 50 imgone.bmp imgtwo.bmp output.bmp

This doesn't work:

    $imgone->Composite(image=>$imgtwo, compose=>'dissolve', opacity=>50);

I was answered that it was going to be fixed in next beta, but I haven't
checked since this moment.
Perhaps developers could tell us?

bye
PixiGreg

----- Original Message -----
From: "mediawerk Austria" <office at mediawerk.at>
To: <magick-users at imagemagick.org>
Sent: Monday, April 28, 2003 2:30 PM
Subject: [magick-users] Composite in Perl


> Dear Sirs!
>
> I use Image Magick in Perl. How can i make the 2nd Image (caption.gif in
my
> code) 50% transparent using the Composite command?
>
>
> Here the Code i use:
>
>
> $readcaption="../caption.gif";
> $caption = Image::Magick->new();
> $caption->Read($readcaption) || print "";
> $path="../test.jpg";
> $image = Image::Magick->new();
> $image->Read($path) || print "";
> $width=$image->Get('width');
> $hight=$image->Get('height');
> $image->Composite(image=>$caption, mask=>$caption, compose=>'In',
> x=>$width-200, y=>$hight-25);
> $image->Write(filename=>$path, compression=>'None') || print "";
>
>
> Yours sincerelly
>
> Matthias Harb
>
> _______________________________________________
> Magick-users mailing list
> Magick-users at imagemagick.org
> http://studio.imagemagick.org/mailman/listinfo/magick-users