Wichtelprogramm "; echo "

written by J.Kretzschmar

"; srand((double) microtime() * 1000000); //Initialisieren ZF Generator // Belegungsarray anlegen $belegung=array(); for ($i=0 ; $i'.$teilnehmer[$i][0].'('.$teilnehmer[$i][1].'):
'.$teilnehmer[$i][2].'

'; } echo"

"; echo"

Verteilung suchen...

"; // Verteilung suchen UPDATE shuffle($belegung); $teilnehmer[$belegung[count($belegung)-1]][3] = $belegung[0]; for ($i=0 ; $i<(count($teilnehmer)-1) ; $i++) { $teilnehmer[$belegung[$i]][3] = $belegung[$i+1]; } echo "

Verteilung gefunden...

"; // EMails Senden for ($i=0 ; $i";} else { echo " Mail an ". $teilnehmer[$i][0] ." (". $teilnehmer[$i][1] .") NICHT erfolgreich versand.
";} } echo"

Fertig.

"; ?>