Legacy ImageMagick Discussions Archive

Hello: I thought that if you use caption for text, that it is supposed to word wrap to fit. Often times I find that words are cut off on the right side (gravity west), and there is plenty of space below for the words to wrap, but they often don't. I could add in Text::Wrap but I shouldn't have to, i...

fmw42 - for what ever reason, using rotate seems to use a convoluted method to create the rotation, and depending on the degree's of rotation, does not give good effects: http://www.imagemagick.org/discourse-server/viewtopic.php?f=1&t=17792#p67335 In the case of what I am doing, it is a circle i...

OK, I figured this one out, at least it seems to be working right now. fmw42 -Thanks for the suggestion, but as in the example I cited, I intended to set only the black-point color, as that is how you get the results I am after in the black to red cow example. In the command line version you specifi...

Does anyone know how to use LevelColors in perl as in the example with turning the black cow to red as on this page: http://www.imagemagick.org/Usage/color_mods/#level-colors I have tried the following: $image->LevelColors('black-point' => "red", ); This only turns white to cyan, and does ...

Hello: I'm trying to get a arrow png to rotate to a direction around the center. I tried rotate, but that seems to rotate around the corner. I have found talk about using Distort SRT instead, but there seem to be no good Perl examples for use. I tried this: my $windicon = Image::Magick->new; $windic...

Hello: I am cleaning up some old code in a script, and I had use strict/warnings commented out, so I uncommented them, and then received the following error on a few lines: Argument "gravity" isn't numeric in subroutine entry at ... line ... Probably part of why they were commented out. Th...

Sorry - that is a typo in what was posted here, as I shortened the variable name for posting here.
It does not exist in my code.

Thanks though, I wish it was something that simple.

Yes, I didn't show all the code, because there is a lot of other image magick stuff going on in the same script. Everything else works but that. It's just a pain because right now I have to save the image out, do the conversion via command line once for each of the 10 colors, read the image back int...

Thanks. However, the -transparent-color color command is supposed to take care of the alpha and channel settings so that you don't need to do that when converting a color to a transparency. "The -transparent operator also ensures that the image has an alpha channel enabled, as per "-alpha ...

Hello: I am using the following suggested on another site to remove a set of colors from a gif image, by making them transparent: my @noise = ( '#646464' , '#ccffff' , '#cc99cc' , '#996699' , '#663366' , '#cccc99' , '#999966' , '#646464' , '#04e9e7' , '#019ff4' ) ; my $fuzz = 32; $img->Set(colorspac...

Hello: Does anyone know if there is a way to get a result back when you use caption in perl, so that you can get a flag back if your text has overflowed the box? For example get back a "1" if the text fit in the box, or a "0" if it did not. I have a situation where I am dealing w...

Ok, after much searching, I found it.

You add png24: before the filename:
John

Hello all: I have been looking around, and not really finding the right answer yet. I have PNG's that are being dynamically created every hour, and they are coming out as 64-bit PNG's. They do have transparencies in them, as part of the image creation, right now I do not need the transparencies in t...

Ok, a little farther. I changed images to gif, and then could do command line convert of gifs to animated gif with delay. Then I tried the same command line changing output to mov - and it chugged for a second and seemed to write a file, looked in directory, file with about the same size as animated...

Well - for one I can't find any perl examples to even animate a gif, except for 1: #!/usr/bin/perl use Image::Magick; $q = Image::Magick->new; $x = $q->Read("B1.png", "B2.png", "B3.png", "B4.png", "B5.png"); warn "$x" if $x; $x = $q->Write(...