"; $aktfile = "/hsphere/local/home/umwelt/cug.umweltnetz.ch/bildchen/farb11/farbdaten.txt"; if (file_exists($aktfile)) { if ($datei = fopen ($aktfile, "r")) { $xx=0; while (!feof ($datei)) { $zeile = fgetcsv ($datei, 100); $xx=$xx+1; $wmf = $zeile[0]; //mittelfarb $wrr = $zeile[1]; //r $wgg = $zeile[2]; //g $wbb = $zeile[3]; //b $wfile = $zeile[4]; //filenam $werte[$wmf][5][1]=$werte[$wmf][5][1]+1; $aktwertindex=$werte[$wmf][5][1]; $werte[$wmf][0][$aktwertindex]=$wmf; $werte[$wmf][1][$aktwertindex]=$wrr; $werte[$wmf][2][$aktwertindex]=$wgg; $werte[$wmf][3][$aktwertindex]=$wbb; $werte[$wmf][4][$aktwertindex]=$wfile; } fclose ($datei); $farbmax = $xx; } } else { echo "Datei $aktfile nicht vorhanden"; } //echo $farbmax." Farben
"; //flush(); $hraster = 480; $vraster = 320; //matrix mit leerzeichen füllen for ($mm=1;$mm<=$hraster;$mm++) { for ($nn=1;$nn<=$vraster;$nn++) { $punkte[$mm][$nn] = 0; } //ende nn } //ende mm //Frohe $ht1=round(mt_rand(11,$hraster-8-strlen($frohe[1])),0); ; $vt1=15; $grundfarb=round(mt_rand(40,215),0); $farbband=25; for ($t1n=0;$t1n<=29;$t1n++) { for ($t1m=0;$t1m<=strlen($frohe[$t1n]);$t1m++) { if (substr($frohe[$t1n],$t1m,1) == 1) { $akthpos=$ht1+$t1m; $aktvpos=$vt1+$t1n; $punkte[$akthpos][$aktvpos]=round(mt_rand($grundfarb-$farbband,$grundfarb+$farbband),0); } } //ende for Textstring } //ende for Textzeilen //Wjahr $ht2= round(mt_rand(11,$hraster-11-strlen($wjahr[1])),0); $vt2=48; $grundfarb=round(mt_rand(40,215),0); $farbband=25; for ($t2n=0;$t2n<=25;$t2n++) { for ($t2m=0;$t2m<=strlen($wjahr[$t2n]);$t2m++) { if (substr($wjahr[$t2n],$t2m,1) == 1) { $akthpos=$ht2+$t2m; $aktvpos=$vt2+$t2n; $punkte[$akthpos][$aktvpos]=round(mt_rand($grundfarb-$farbband,$grundfarb+$farbband),0); } } //ende for Textstring } //ende for Textzeilen //Gutes $ht3=round(mt_rand(11,$hraster-8-strlen($gutes[1])),0); ; $vt3=245; $grundfarb=round(mt_rand(40,215),0); $farbband=25; for ($t3n=0;$t3n<=29;$t3n++) { for ($t3m=0;$t3m<=strlen($gutes[$t3n]);$t3m++) { if (substr($gutes[$t3n],$t3m,1) == 1) { $akthpos=$ht3+$t3m; $aktvpos=$vt3+$t3n; $punkte[$akthpos][$aktvpos]=round(mt_rand($grundfarb-$farbband,$grundfarb+$farbband),0); } } //ende for Textstring } //ende for Textzeilen //njahr $ht4=round(mt_rand(11,$hraster-8-strlen($njahr[1])),0); $vt4=278; $grundfarb=round(mt_rand(40,215),0); $farbband=25; for ($t4n=0;$t4n<=25;$t4n++) { for ($t4m=0;$t4m<=strlen($njahr[$t4n]);$t4m++) { if (substr($njahr[$t4n],$t4m,1) == 1) { $akthpos=$ht4+$t4m; $aktvpos=$vt4+$t4n; $punkte[$akthpos][$aktvpos]=round(mt_rand($grundfarb-$farbband,$grundfarb+$farbband),0); } } //ende for Textstring } //ende for Textzeilen //baum $ht5=round(mt_rand(11,$hraster-8-strlen($baum[1])),0); $vt5=90; $grundfarb=round(mt_rand(30,225),0); $farbband=30; for ($t5n=0;$t5n<=143;$t5n++) { for ($t5m=0;$t5m<=strlen($baum[$t5n]);$t5m++) { if (substr($baum[$t5n],$t5m,1) > 0) { $akthpos=$ht5+$t5m; $aktvpos=$vt5+$t5n; $punkte[$akthpos][$aktvpos]= 1000 + substr($baum[$t5n],$t5m,1); } } //ende for Textstring } //ende for Textzeilen // ab hier grafik //A4-Format $bildh = 1140; $bildv = 770; $image = imagecreatetruecolor($bildh, $bildv); $fuellfarbe = imageColorAllocate($image, 0, 0, 0); imagefilledrectangle($image, 0, 0, $bildh, $bildv, $fuellfarbe); $bchenh=15; $bchenv=15; $fakth= $bildh/($bchenh*$hraster); $faktv= $bildv/($bchenv*$vraster); $bchh1 = ceil($bchenh*$fakth); $bchv1 = ceil($bchenv*$faktv); //echo "fakth faktv: ".$fakth." ".$faktv."
"; //echo "bchh1 bchv1: ".$bchh1." ".$bchv1."
"; $fdelta=20; for ($mm=1;$mm<=$hraster;$mm++) { for ($nn=1;$nn<=$vraster;$nn++) { $xpos = round(($mm-1) * $bchenh * $fakth); $ypos = round(($nn-1) * $bchenv * $faktv); if ($punkte[$mm][$nn] == 1001) { // grün $hfarbr=34; $hfarbra=round(mt_rand($hfarbr-$fdelta,$hfarbr+$fdelta),0); $hfarbg=139; $hfarbga=round(mt_rand($hfarbg-$fdelta,$hfarbg+$fdelta),0); $hfarbb=34; $hfarbba=round(mt_rand($hfarbb-$fdelta,$hfarbb+$fdelta),0); $aktfarb=ImageColorAllocate ($image, $hfarbra, $hfarbga, $hfarbba); imagefilledrectangle($image, $xpos,$ypos,$xpos+$bchh1,$ypos+$bchv1, $aktfarb); } if ($punkte[$mm][$nn] == 1002) { // gelb $hfarbr=234; $hfarbra=round(mt_rand($hfarbr-$fdelta,$hfarbr+$fdelta),0); $hfarbg=229; $hfarbga=round(mt_rand($hfarbg-$fdelta,$hfarbg+$fdelta),0); $hfarbb=21; $hfarbba=round(mt_rand($hfarbb-$fdelta,$hfarbb+$fdelta),0); $aktfarb=ImageColorAllocate ($image, $hfarbra, $hfarbga, $hfarbba); imagefilledrectangle($image, $xpos,$ypos,$xpos+$bchh1,$ypos+$bchv1, $aktfarb); } if ($punkte[$mm][$nn] == 1003) { // rot $hfarbr=234; $hfarbra=round(mt_rand($hfarbr-$fdelta,$hfarbr+$fdelta),0); $hfarbg=21; $hfarbga=round(mt_rand($hfarbg-$fdelta,$hfarbg+$fdelta),0); $hfarbb=21; $hfarbba=round(mt_rand($hfarbb-$fdelta,$hfarbb+$fdelta),0); $aktfarb=ImageColorAllocate ($image, $hfarbra, $hfarbga, $hfarbba); imagefilledrectangle($image, $xpos,$ypos,$xpos+$bchh1,$ypos+$bchv1, $aktfarb); } if ($punkte[$mm][$nn] != -1 and $punkte[$mm][$nn]<300) { //if ($punkte[$mm][$nn] == 0) $punkte[$mm][$nn] =1; $xpos = round(($mm-1) * $bchenh * $fakth); $ypos = round(($nn-1) * $bchenv * $faktv); //echo $xpos."/".$ypos.": "."bild/".$werte[$punktwert][4]."
"; $aktuellefarbe = $punkte[$mm][$nn]; if ($aktuellefarbe < 100 ) $aktuellefarbe = "0".$aktuellefarbe; if ($werte[$aktuellefarbe][5][1] >= 1) { // mindestens 1 farbe $aktuellenummer = round(mt_rand(1,$werte[$aktuellefarbe][5][1]),0); $bildnam = "farb11/".$werte[$aktuellefarbe][4][$aktuellenummer]; $imageo = imagecreatefromjpeg($bildnam); $bildnam=""; imagecopyresized ($image, $imageo, $xpos, $ypos, 0, 0, $bchh1, $bchv1, $bchenh, $bchenv); } } //if für -1 } //for nn } //for mm //Ausgabe des Bildes im Browser imagejpeg($image); imagedestroy($image); ?>