Benutzer:Three Of Twelve/npclist2wiki.pl

Zur Erstellen der Wiki-Seite NPCs (Liste). Mel eben gemacht, da Count Ypsilon seines noch nicht hochgeladen hat, und dieses wegen neurerer Änderungen (sortierbare Tabellen) vermutlich nicht mehr ganz aktuell ist. Auf Basis von Benutzer:Count Ypsilon/Skript:maplist2wiki.pl.

#!/usr/bin/perl
#

#in: npclist

print <<'EOT';
Diese Tabelle wird von Zeit zu Zeit automatisch aus den Daten aus den
einzelnen NPC-Artikeln erstellt. Die Daten hier sollten nicht direkt
geändert werden, weil solche Änderungen bei einer Neuerstellung
verloren gehen. Stattdessen bitte die Daten auf den Seiten des jeweiligen
NPCs korrigieren!

Die Buttons neben den Überschriften können zum Sortieren angeklickt
werden. Da die Liste sehr lang ist, kann dies allerdings einige Sekunden
dauern.

{| {{Prettytable|text-align:right;}} class="sortable"
 |- style="text-align:center;"
 ! Name || Angr. || LP || XP || Gold || XP/LP || Gold/LP || Gold/XP
EOT

while(<>)
{
    next if (/^GET/);
    my ($name, $atk, $lp, $xp, $gm, $vk, $items) = split(/;/);
    printf " |-\n | style=\"text-align:left;\" | [[%s]] || %u || %u || %u || %u || %.2f || %.2f || %s\n", 
      $name, $atk, $lp, $xp, $gm, $xp / $lp, $gm / $lp, $xp == 0 ? '—' : int($gm / $xp + 0.5);

}

print " |}

[[Kategorie:NPC-Listen]]";