Added new keyword.txt parameter for gen-card.pl.

This commit is contained in:
LevelX2 2013-05-25 15:43:41 +02:00
parent 9f277547de
commit 5da4b0ffd3

View file

@ -206,7 +206,11 @@ foreach my $setName (keys %{$cards{$cardName}}) {
$ability =~ m/({.*})/g;
$vars{'abilities'} .= "\n this.addAbility(new " . $kw . 'Ability(new ManaCostsImpl("' . fixCost($1) . '")));';
$vars{'abilitiesImports'} .= "\nimport mage.abilities.costs.mana.ManaCostsImpl;";
} elsif ($keywords{$kw} eq 'card, manaString') {
$ability =~ m/({.*})/g;
$vars{'abilities'} .= "\n this.addAbility(new " . $kw . 'Ability(this, "' . fixCost($1) . '"));';
}
$vars{'abilitiesImports'} .= "\nimport mage.abilities.keyword." . $kw . "Ability;";
} else {