=0; $i--)
print substr($email, $i, 1);
}
function status($sstatus, $cstatus, $cschiff)
{
if ($sstatus == 'Aktiv')
return "Aktiv";
elseif ($sstatus == 'Urlaub')
return "
Urlaub";
elseif ($sstatus == 'MIA')
return "
MIA";
elseif (substr($cstatus,0,2) == 'MM')
{
if ($cschiff!='$shp')
return "
MM";
else
return "Aktiv";
}
else
return $cstatus;
}
function postline ($Result /* neu hinzu */, $nurschreiber /* bis hier */)
{
GLOBAL $picrang;
print "
\n";
/* neu hinzu */
if (!$nurschreiber)
{
/* bis hier */
// Charakter-Rang
if ($size=@getimagesize("http://persodb.oesf.at/image/".$picrang."/".$Result->cha_rang_l))
print " ![](\"http://persodb.oesf.at/image/".$picrang."/".$Result-) cha_rang_l."\"> | \n";
else if ($size=@getimagesize("http://persodb.oesf.at/image/rang_sonstige/".$Result->cha_rang_l))
print " ![](\"http://persodb.oesf.at/image/rang_sonstige/".$Result-) cha_rang_l."\"> | \n";
else
print " | \n";
// Name & evtl. Schreiber
print " cha_id."\">".$Result->cha_name."";
if ($Result->sch_id>0)
print "
".$Result->cha_art.(($Result->cha_art!="GC")? "-Char" : "")." von sch_id."\">".$Result->sch_name."";
print " | \n";
// Charakter-Position
print " ".$Result->cha_position_kurz." | \n";
// Schreiber-Belobigungen
print " ";
if ($Result->sch_id>0)
print $Result->sch_belobigungen_zahl;
elseif ($Result->cha_art == "NPC")
print "NPC";
elseif ($Result->cha_art == "GC")
print "GC";
else
print " ";
print " | \n";
// Charakter-Kontakt
print " ";
if ($Result->cha_kontakt!="")
{
/* abge�ndert! */
print "cha_kontakt);
print "');\">![](\"http://www.oesf.at/bilder/mail.gif\") ";
/* bis hier */
}
else
print " ";
print " | \n";
// Charakter-Rasse
print " ".$Result->cha_rasse." | \n";
// Charakter-Status
print " ".status($Result->sch_status, $Result->cha_status, $Result->cha_schiff)." | \n";
/* neu hinzu */
}
else
{
// Schreiber-Rang
if ($size=@getimagesize("http://persodb.oesf.at/image/".$picrang."/".$Result->sch_rang_l))
print " sch_rang_l."\"> | \n";
else if ($size=@getimagesize("http://persodb.oesf.at/image/rang_sonstige/".$Result->sch_rang_l))
print " sch_rang_l."\"> | \n";
else
print " | \n";
// Schreiber
print " sch_id."\">".$Result->sch_name." | \n";
// Schreiber-Position
print " ".$Result->sch_position_kurz." | \n";
// Schreiber-Belobigungen
print " ".$Result->sch_belobigungen_zahl." | \n";
// Schreiber-Kontakt
print " ";
if ($Result->sch_kontakt!="")
{
print "sch_kontakt);
print "');\">";
}
else
print " ";
print " | \n";
// Schreiber-Status
print " ".status($Result->sch_status, $Result->sch_status, $Result->sch_schiff)." | \n";
}
/* bis hier */
print "
\n";
}
function printAbteilung($bild, $sql1, $sql2 /* neu hinzu */, $nurschreiber=false /* bis hier */)
{
print "
\n";
print " \n";
print " | ";
print " ![](\"http://www.oesf.at/bilder/half/".$bild."\")
| \n";
print "
\n";
print " \n";
print " | Rang | \n";
print " Name | \n";
print " Posten | \n";
print " Bel. | \n";
print " Mail | \n";
/* neu hinzu */
if (!$nurschreiber) // f�rs Oberkommando werden nur Scheiber-Daten angezeigt, da macht Rasse keinen Sinn
/* bis hier */
print " Rasse | \n";
print " Status | \n";
print "
\n";
$ergebnis = mysql_query ($sql1);
while($Result = mysql_fetch_object($ergebnis))
postline($Result, $nurschreiber);
/* neu hinzu */
if ($sql2!="")
{
/* bis hier */
print " | |
\n";
$ergebnis = mysql_query ($sql2);
while($Result = mysql_fetch_object($ergebnis))
postline($Result, $nurschreiber);
/* neu hinzu */
}
/* bis hier */
print "
\n";
}
?>