FreewarWiki:Bot/Skripts/npclist2wikibilder.pl

#!/usr/bin/perl

# input: npclist 

print <<EOF;
<div style="background-color:orange;padding:1px;border:4px dashed black;">
{| {{Bausteindesign3}}
 | '''Hinweis:'''
Diese Tabelle wird von Zeit zu Zeit automatisch aus den Daten auf den einzelnen NPC-Seiten erstellt.<br/>'''Die Daten hier sollten nicht direkt geändert werden, weil solche Änderungen bei einer Neuerstellung verloren gehen.'''<br/>Stattdessen bitte die Daten auf den Seiten des jeweiligen NPC korrigieren!<br/><br/>
(Für den Autor gibt es ein Vorlagenfeld "BildAutor", das dann auch im NPC-Artikel angezeigt wird.)
|}
</div>

{| {{Prettytable}}
 |-
 !Bild||NPC||Maler
EOF
while(<>)
{
    chomp;
    
    ($text,$atk,$lp,$xp,$gm,$area,$drop,$bild,$autor)=split(/;/);
    next unless($bild =~ /^http:/);
    printf " |-\n |%s||[[%s]]||%s\n",
        $bild, $text, ((length($autor)>0 && $autor ne "none") ? $autor : "??");
}
print <<EOF;
 |}

[[Kategorie:NPC-Listen]]
[[Kategorie:NPCs mit Bild|!]]
EOF