FreewarWiki:Bot/Skripts/npclist2fightcalcdata.pl: Unterschied zwischen den Versionen

aus FreewarWiki, der Referenz für Freewar
Zur Navigation springen Zur Suche springen
K (Korrektur)
(+hinweis)
Zeile 1: Zeile 1:
<pre>
<!--
 
ACHTUNG: Das Skript unbedingt vom Artikel statt Quelltext kopieren da hier versteckter Wikisyntax verwendet wird!
 
--><pre>
#!/usr/bin/perl
#!/usr/bin/perl
#input: npclist
#input: npclist

Version vom 15. März 2012, 21:00 Uhr

#!/usr/bin/perl
#input: npclist
use constant CUnknown => "?";

while(<>)
{
  next if (/^GET/);
  my ($name, $atk, $lp) = split(/;/);
 
  if ($name ne CUnknown && $atk ne CUnknown && $lp ne CUnknown) {
    printf("%s;%s;%s\n", $name, $atk, $lp);
  }
}