Legacy ImageMagick Discussions Archive

I did not read the version question correctly..
I'm first going to upgrade ImageMagick and than try again.

of is or (sorry I'm dutch)

Of course I did, but perl doesn't like: $img->Set(gradient:vector=>'x1,y1, x2,y2');
You are not allowed to use a : in a hash key whithout enclosing with ' or "

so either .. Set('gradient:vector'=> ... of gradient_vector

But still no luck.

After your reply I tried:

$img->Set("gradient:vector"=>"1,1 100,100");
$img->Set("gradient_vector"=>"1,1 100,100");
$img->Set(gradient_vector=>"1,1 100,100");

Before and after the $img->ReadImage('gradient:green-orange');
I also tried to put in in the ReadIMage itself, no luck so far ...

I'm using version 6.6.9-7
IMHO: Aren't Read and ReadImage the same? They produce the same results.


I looked at http://www.imagemagick.org/script/gradient.php
but how can I use these settings from perlmagick? For example:

-define gradient:vector=x1,y1, x2,y2

$img=Image::Magick->new();
$img->Set(size=>'500x500');
$img->Read('gradient:green-red');


Gives a box with a linear gradient from left to right, I would like a linear gradient from top-left to bottom right in the same box.
If I use a Rotate than the complete box gets rotated.

Any hints are ...

found:first create a separate image with the gradient circle and mask and than a composite.

So true, but how can I solve this?

You can see the result at: http://digirent.nl/images/m3.jpg

It is written in perl and my current code is as follows:

#!/usr/bin/perl
#
use strict;
use Image::Magick;
my $x;

# Source, Composite or Overlay image
my $src=Image::Magick->new();
$src->Set(size=>'80x80');
$src->Read('radial-gradient ...

First image is a radial-gradient image (rectangle) (80x80)
Second image is a black circle to be used as a mask (80x80)
Third image is a bigger background image (Big red circle) 200x200

I want to place a gradient (first image) cirkel om de big circle using the mask (second image)
When I use ...

I have made the following "working" example:
Still have a few questions at the bottom left.
...
####################
# part of example script
####################
print "Create 3D ball ...\n";
$img=Image::Magick->new;
$img->Set(size=>'500x500');
$x=$img->ReadImage('xc:white');
warn "$x" if "$x";
my ...

I'm looking for a perl example to create a 3-D looking circle (or ball).
Any help would be appreciated.

I would like to create a 3D looking rectangle or a rectangle with a gradient.
I cannot figure out how. Any help or pointing in the right direction would be appreciated.
I'm using the following perl script.


#!/usr/bin/perl
use Image::Magick;

$image = Image::Magick->new; # create new image ...

First of all I'm new in using Image::Magick so have patience with me :)

I'm using Image::Magick from perl for creating images from scratch, drawing shapes and annotating text on images.
For examples see http://digirent.nl/images/proef/

When trying the default font versus true type fonts I see ...