|
Community
Szene & News
Locations
Impressum
|
Forum / Bits und Bytes
Fehler?
dax_rider  - 33
Champion
(offline)
Dabei seit 02.2006
3799
Beiträge
|
|
Geschrieben am: 24.03.2010 um 14:31 Uhr
|
|
ich suche den Fehler hab aber kein Plan von so zeug.
#!/usr/bin/perl
use Getopt::Long; use Image::Magick;
my $ofh = select STDOUT; $| = 1; select STDOUT;
GetOptions ("path=s" => \$path);
die unless defined $path;
$color1 = "#01040B";
$color2 = "#17333E";
$width = 1600;
$height = 1200;
$dim = $width . "x" . $height;
$image = Image::Magick->new;
$image->Set(size=>$dim);
$image->ReadImage("xc:$color1");
sub DrawCircles {
$r = shift;
$g = shift;
$b = shift;
$num = shift;
$minopt = shift;
$maxopt = shift;
for ($lcv = 1; $lcv <= $num; $lcv++)
{
$locx = int(rand($width));
$locy = int(rand($height));
$locxx = $locx + (int(rand(50)+20));
$locyy = $locy + (int(rand(50)+20));
$a = rand($maxopt)+$minopt;
$circlecolor = "rgba($r,$g,$b,$a)";
$image->Draw(primitive=>"circle",fill=>$circlecolor,points=>"$loc
x,$locy $locxx,$locyy");
}
}
DrawCircles(17,43,58,100,0.4,.7);
DrawCircles(45,65,65,20,0.7,.9);
$image->Modulate(brightness=>80);
$image->Blur(radius=>100,sigma=>100);
DrawCircles(21,63,87,20,0.1,0.3);
$image->Blur(radius=>2,sigma=>2);
DrawCircles(46,107,110,15,0.1,0.8);
$image->Blur(radius=>2,sigma=>2);
DrawCircles(99,175,170,15,0.1,0.8);
$image->Blur(radius=>1,sigma=>1);
$image->Modulate(brightness=>90);
$image->Write(filename=>$path);
Der Gipfel der Arroganz ist erreicht wenn man beim Orgasmus den eigenen Namen ruft.
|
|
SiiickBoy - 36
Experte
(offline)
Dabei seit 09.2009
1175
Beiträge
|
|
Geschrieben am: 24.03.2010 um 14:59 Uhr
|
|
Gibts da nicht ne Software, mit der man die Codes prüfen kann?
http://www.mixcloud.com/Studio43/hanzmis sionstudio43_chilli_sunday_funf_viertel_ stunden_edit/
|
|
dax_rider - 33
Champion
(offline)
Dabei seit 02.2006
3799
Beiträge
|
|
Geschrieben am: 24.03.2010 um 20:38 Uhr
|
|
[selfbump]
Der Gipfel der Arroganz ist erreicht wenn man beim Orgasmus den eigenen Namen ruft.
|
|
bredator - 41
Champion
(offline)
Dabei seit 03.2008
5319
Beiträge
|
|
Geschrieben am: 24.03.2010 um 20:43 Uhr
|
|
Du hast keinen Plan vom Programmieren und andere sollen dir die Arbeit abnehmen? Beschäftige dich mit dem Thema, wenn du es dringend brauchst oder bezahl jemanden dafür. Glaub kaum, dass jemand da groß Bock drauf hat ;)
Lache nicht über jemanden, der einen Schritt zurück macht. Er könnte Anlauf nehmen.
|
|
Filmriss - 36
Experte
(offline)
Dabei seit 11.2009
1497
Beiträge
|
|
Geschrieben am: 24.03.2010 um 20:45 Uhr
|
|
Zitat von bredator: Du hast keinen Plan vom Programmieren und andere sollen dir die Arbeit abnehmen? Beschäftige dich mit dem Thema, wenn du es dringend brauchst oder bezahl jemanden dafür. Glaub kaum, dass jemand da groß Bock drauf hat ;)
normalerweise gibts immer 2/3 nerds die nix besseres zu tun haben bzw so den nerd raushängen lassen können
Into the motherland the german army marches...
|
|
bredator - 41
Champion
(offline)
Dabei seit 03.2008
5319
Beiträge
|
|
Geschrieben am: 24.03.2010 um 20:56 Uhr
|
|
Zitat von Filmriss: Zitat von bredator: Du hast keinen Plan vom Programmieren und andere sollen dir die Arbeit abnehmen? Beschäftige dich mit dem Thema, wenn du es dringend brauchst oder bezahl jemanden dafür. Glaub kaum, dass jemand da groß Bock drauf hat ;)
normalerweise gibts immer 2/3 nerds die nix besseres zu tun haben bzw so den nerd raushängen lassen können
Es geht ums Prinzip. ScriptKiddies mag niemand, wer programmieren will, der soll es halt lernen. Copy und Paste zählt nicht. Weil ich beruflich Programmiere, bin ich also ein Nerd? Schön, dass man bei PC-technischen Berufen immer gleich als Nerd eingestuft wird, wenn man was von seinem Fach versteht ;)
Lache nicht über jemanden, der einen Schritt zurück macht. Er könnte Anlauf nehmen.
|
|
Forum / Bits und Bytes
|
[