Tool um vordefinierten Text in alle Bilder einzufügen
Peter
- software
Hallo Leute,
ICh hab ne relativ umfangreiche Bildergallerie, jedoch habe ich auf die Bilder leider keine copyright-notiz eingefügt, was ich gerne ändern würde.
Kennt ihr ein Toll, das in jede ausgewähöte Grafik einen Text einfügt?
Danke,
PEter
Hallo Doppelgänger,
ICh hab ne relativ umfangreiche Bildergallerie, jedoch habe ich auf die Bilder leider keine copyright-notiz eingefügt, was ich gerne ändern würde.
Kennt ihr ein Toll, das in jede ausgewähöte Grafik einen Text einfügt?
es gibt bestimmt einige "Rundum"-Programme die das können. Wenn du PERL & Image Magick zur Verfügung hast hilft dir aber vielleicht schon folgendes Script (kannst es ja noch ein bißchen anpassen):
#!/usr/bin/perl
my $text = "Copyleft 2003";
use Image::Magick;
die "Syntax: $0 DATEIEN\n" if ($#ARGV == -1);
foreach my $name (@ARGV) {
print STDERR "berabeite $name\n";
my $img = Image::Magick->new;
$img->Read($name) && "Fehler: Kann $name nicht öffnen.\n";
my $width = $img->Get("width");
my $height = $img->Get("height");
$img->Annotate(text => $text,
geometry => "+".($width-4)."+".($height-4),
stroke => "black",
font => 'helvetica',
rotate => "270",
antialias => "true",
stroke_width => 12);
$img->Write($name) && die "Fehler: Kann $name nicht schreiben.\n";
}
Grüße,
Peter
Hi,
danke erstmal für das Script...
Wird der Text in alle Bilddateien geschrieben?
Danke,
Peter[2]
Hy Peter.
Wird der Text in alle Bilddateien geschrieben?
Ja, der Text wird in jede Bilddatei die du beim Aufruf des Scripts übergibst unten rechts geschrieben (entlang des rechten Randes).
Also: [perl] script.pl bild1.jpg bild2.gif bild3.png [...]
bearbeitet bild1.jpg, bild2.gif ...
Die Position, Ausrichtung, Größe, Schriftart und Farbe des Textes kannst du aber auch ziemlich leicht ändern.
Grüße,
Peter [?]
Hi,
danke dann weiß ich erstmal Bescheid...
Ich muss dann doch aber alle Grafiken in den cgi-Ordner laden, weil Perl auf andere Grafiken keinen Einfluss hat, oder?
Danke nochmal,
Peter [round(rand())]