FreewarWiki:Bot/Skripts/npclist2wiki.pl

aus FreewarWiki, der Referenz für Freewar
Version vom 16. Februar 2009, 01:13 Uhr von Three Of Twelve (Diskussion | Beiträge)
(Unterschied) ← Nächstältere Version | ↑ Aktuelle Version (Unterschied) | Nächstjüngere Version → (Unterschied)
Zur Navigation springen Zur Suche springen
  1. !/usr/bin/perl
  1. in: npclist

print "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.

Name Angr. LP XP Gold XP/LP Gold/LP Gold/XP\n";

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, $lp == 0 ? '?' : $xp / $lp, $lp == 0 ? '?' : $gm / $lp, $xp == 0 ? '—' : int($gm / $xp + 0.5);

}

print " |}";