]> granicus.if.org Git - imagemagick/commitdiff
...
authorCristy <urban-warrior@imagemagick.org>
Wed, 27 Sep 2017 22:02:41 +0000 (18:02 -0400)
committerCristy <urban-warrior@imagemagick.org>
Wed, 27 Sep 2017 22:02:41 +0000 (18:02 -0400)
PerlMagick/demo/shadow-text.pl

index 42a541d7a364e7293fc6958d8cb54cbf4cf4147b..0b96baa21492f792d3832cbbdcbb2e48f489b41d 100644 (file)
@@ -7,9 +7,9 @@ use Image::Magick;
 $image=Image::Magick->new(size=>'500x120');
 $image->Read('xc:white');
 $image->Annotate(fill=>'rgba(100,100,100,0.8)',pointsize=>60,
-   text=>'Works like magick!',geometry=>'+30+90');
+   text=>'Works like magick!',geometry=>'+10+90');
 $image->Blur('0x1');
 $image->Annotate(fill=>'red',stroke=>'blue',pointsize=>60,
-  text=>'Works like magick!',geometry=>'+26+86');
+  text=>'Works like magick!',geometry=>'+6+86');
 $image->Write('shadow.gif');
 $image->Write('win:');