mirror of
https://github.com/correl/mage.git
synced 2024-11-15 03:00:16 +00:00
Script for generating existing cards for a specific set.
This commit is contained in:
parent
965a047c28
commit
614a8098ef
4 changed files with 284 additions and 0 deletions
52
Utils/cardExtendedClass.tmpl
Normal file
52
Utils/cardExtendedClass.tmpl
Normal file
|
@ -0,0 +1,52 @@
|
|||
/*
|
||||
* Copyright 2010 BetaSteward_at_googlemail.com. All rights reserved.
|
||||
*
|
||||
* Redistribution and use in source and binary forms, with or without modification, are
|
||||
* permitted provided that the following conditions are met:
|
||||
*
|
||||
* 1. Redistributions of source code must retain the above copyright notice, this list of
|
||||
* conditions and the following disclaimer.
|
||||
*
|
||||
* 2. Redistributions in binary form must reproduce the above copyright notice, this list
|
||||
* of conditions and the following disclaimer in the documentation and/or other materials
|
||||
* provided with the distribution.
|
||||
*
|
||||
* THIS SOFTWARE IS PROVIDED BY BetaSteward_at_googlemail.com ``AS IS'' AND ANY EXPRESS OR IMPLIED
|
||||
* WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND
|
||||
* FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL BetaSteward_at_googlemail.com OR
|
||||
* CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
|
||||
* CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
|
||||
* SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON
|
||||
* ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
|
||||
* NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
|
||||
* ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
||||
*
|
||||
* The views and conclusions contained in the software and documentation are those of the
|
||||
* authors and should not be interpreted as representing official policies, either expressed
|
||||
* or implied, of BetaSteward_at_googlemail.com.
|
||||
*/
|
||||
package mage.sets.[=$set=];
|
||||
|
||||
import java.util.UUID;
|
||||
|
||||
/**
|
||||
*
|
||||
* @author North
|
||||
*/
|
||||
public class [=$className=] extends mage.sets.[=$baseSet=].[=$baseClassName=] {
|
||||
|
||||
public [=$className=](UUID ownerId) {
|
||||
super(ownerId);
|
||||
this.cardNumber = [=$cardNumber=];
|
||||
this.expansionSetCode = "[=$expansionSetCode=]";
|
||||
}
|
||||
|
||||
public [=$className=](final [=$className=] card) {
|
||||
super(card);
|
||||
}
|
||||
|
||||
@Override
|
||||
public [=$className=] copy() {
|
||||
return new [=$className=](this);
|
||||
}
|
||||
}
|
103
Utils/gen-existing-cards-by-set.pl
Normal file
103
Utils/gen-existing-cards-by-set.pl
Normal file
|
@ -0,0 +1,103 @@
|
|||
#!/usr/bin/perl -w
|
||||
|
||||
use Text::Template;
|
||||
use strict;
|
||||
|
||||
my $dataFile = "mtg-cards-data.txt";
|
||||
my $setsFile = "mtg-sets-data.txt";
|
||||
my $knownSetsFile = "known-sets.txt";
|
||||
|
||||
my %cards;
|
||||
my %sets;
|
||||
my %knownSets;
|
||||
my @setCards;
|
||||
|
||||
print "Enter a set name: ";
|
||||
my $setName = <STDIN>;
|
||||
chomp $setName;
|
||||
|
||||
my $template = Text::Template->new(SOURCE => 'cardExtendedClass.tmpl', DELIMITERS => [ '[=', '=]' ]);
|
||||
|
||||
sub getClassName {
|
||||
my $string = $_[0];
|
||||
$string =~ s/\b(\w+)\b/ucfirst($1)/ge;
|
||||
$string =~ s/[, ]//g;
|
||||
$string;
|
||||
}
|
||||
|
||||
sub getOldClassName {
|
||||
my $string = $_[0];
|
||||
$string =~ s/[, ]//g;
|
||||
$string;
|
||||
}
|
||||
|
||||
open (DATA, $dataFile) || die "can't open $dataFile";
|
||||
while(my $line = <DATA>) {
|
||||
my @cardData = split('\\|', $line);
|
||||
|
||||
$cards{$cardData[1]}{$cardData[2]} = \@cardData;
|
||||
|
||||
if ($cardData[2] eq $setName) {
|
||||
push(@setCards, $cardData[1]);
|
||||
}
|
||||
}
|
||||
|
||||
close(DATA);
|
||||
|
||||
open (DATA, $setsFile) || die "can't open $setsFile";
|
||||
while(my $line = <DATA>) {
|
||||
my @setData = split('\\|', $line);
|
||||
$sets{$setData[0]}= \@setData;
|
||||
}
|
||||
close(DATA);
|
||||
|
||||
open (DATA, $knownSetsFile) || die "can't open $knownSetsFile";
|
||||
while(my $line = <DATA>) {
|
||||
my @setData = split('\\|', $line);
|
||||
$knownSets{$setData[0]}= $setData[2];
|
||||
}
|
||||
close(DATA);
|
||||
|
||||
|
||||
my %vars;
|
||||
$vars{'set'} = $knownSets{$setName};
|
||||
$vars{'expansionSetCode'} = $sets{$setName}[1];
|
||||
|
||||
foreach my $cardName (@setCards) {
|
||||
my $className = getClassName($cardName);
|
||||
my $currentFileName = "../Mage.Sets/src/mage/sets/" . $knownSets{$setName} . "/" . $className . ".java";
|
||||
|
||||
if(! -e $currentFileName) {
|
||||
$vars{'className'} = $className;
|
||||
$vars{'cardNumber'} = $cards{$cardName}{$setName}[5];
|
||||
|
||||
my $found = 0;
|
||||
foreach my $key (keys %{$cards{$cardName}}) {
|
||||
if (exists $knownSets{$key} && $found eq 0) {
|
||||
my $fileName = "../Mage.Sets/src/mage/sets/" . $knownSets{$key} . "/" . $className . ".java";
|
||||
if(-e $fileName) {
|
||||
open (DATA, $fileName);
|
||||
while(my $line = <DATA>) {
|
||||
if ($line =~ /extends CardImpl<(\w+?)>/) {
|
||||
$vars{'baseClassName'} = $1;
|
||||
$vars{'baseSet'} = $knownSets{$key};
|
||||
$found = 1;
|
||||
}
|
||||
}
|
||||
close(DATA);
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
if($found eq 1) {
|
||||
#print $vars{'set'} . "|" . $vars{'baseSet'} . "|" . $vars{'className'} . "|" . $vars{'baseClassName'} . "|" . $vars{'expansionSetCode'} . "\n";
|
||||
my $result = $template->fill_in(HASH => \%vars);
|
||||
if (defined($result)) {
|
||||
#print $result;
|
||||
open CARD, "> $currentFileName";
|
||||
print CARD $result;
|
||||
close CARD;
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
24
Utils/known-sets.txt
Normal file
24
Utils/known-sets.txt
Normal file
|
@ -0,0 +1,24 @@
|
|||
Alara Reborn|ARB|alarareborn|
|
||||
Apocalypse|APC|apocalypse|
|
||||
Conflux|CON|conflux|
|
||||
Darksteel|DST|darksteel|
|
||||
Eventide|EVE|eventide|
|
||||
Magic 2010|M10|magic2010|
|
||||
Magic 2011|M11|magic2011|
|
||||
Magic 2012|M12|magic2012|
|
||||
Planechase|HOP|planechase|
|
||||
Ravnica: City of Guilds|RAV|ravnika|
|
||||
Rise of the Eldrazi|ROE|riseoftheeldrazi|
|
||||
Shards of Alara|ALA|shardsofalara|
|
||||
Tenth Edition|10E|tenth|
|
||||
Worldwake|WWK|worldwake|
|
||||
Zendikar|ZEN|zendikar|
|
||||
Scars of Mirrodin|SOM|scarsofmirrodin|
|
||||
Guildpact|GPT|guildpact|
|
||||
Dissension|DIS|dissension|
|
||||
Mirrodin|MRD|mirrodin|
|
||||
Duel Decks: Elspeth vs. Tezzeret|DDF|elspethvstezzeret|
|
||||
Mirrodin Besieged|MBS|mirrodinbesieged|
|
||||
New Phyrexia|NPH|newphyrexia|
|
||||
Tempest|TMP|tempest|
|
||||
Champions of Kamigawa|CHK|championsofkamigawa|
|
105
Utils/mtg-sets-data.txt
Normal file
105
Utils/mtg-sets-data.txt
Normal file
|
@ -0,0 +1,105 @@
|
|||
Tenth Edition|10E|
|
||||
Unlimited Edition|2ED|
|
||||
Revised Edition|3ED|
|
||||
Fourth Edition|4ED|
|
||||
Fifth Dawn|5DN|
|
||||
Fifth Edition|5ED|
|
||||
Classic Sixth Edition|6ED|
|
||||
Seventh Edition|7ED|
|
||||
Eighth Edition|8ED|
|
||||
Alliances|ALL|
|
||||
Apocalypse|APC|
|
||||
Alara Reborn|ARB|
|
||||
Arabian Nights|ARN|
|
||||
Anthologies|ATH|
|
||||
Antiquities|ATQ|
|
||||
Betrayers of Kamigawa|BOK|
|
||||
Battle Royale Box Set|BRB|
|
||||
Beatdown Box Set|BTD|
|
||||
Champions of Kamigawa|CHK|
|
||||
Chronicles|CHR|
|
||||
Conflux|CON|
|
||||
Coldsnap|CSP|
|
||||
Darksteel|DST|
|
||||
Dissension|DIS|
|
||||
Deckmasters|DKM|
|
||||
The Dark|DRK|
|
||||
Duel Decks: Divine vs. Demonic|DVD|
|
||||
Duel Decks: Elves vs. Goblins|EVG|
|
||||
Duel Decks: Garruk vs. Liliana|GVL|
|
||||
Duel Decks: Jace vs. Chandra|JVC|
|
||||
Duel Decks: Phyrexia vs. the Coalition|PVC|
|
||||
Eventide|EVE|
|
||||
Exodus|EXO|
|
||||
Fallen Empires|FEM|
|
||||
Future Sight|FUT|
|
||||
From the Vault: Dragons|FVD|
|
||||
From the Vault: Exiled|FVE|
|
||||
Guildpact|GPT|
|
||||
Homelands|HML|
|
||||
Planechase|HOP|
|
||||
Ice Age|ICE|
|
||||
Invasion|INV|
|
||||
Judgment|JUD|
|
||||
Limited Edition Alpha|LEA|
|
||||
Limited Edition Beta|LEB|
|
||||
Legends|LEG|
|
||||
Legions|LGN|
|
||||
Lorwyn|LRW|
|
||||
Magic 2010|M10|
|
||||
Magic 2011|M11|
|
||||
Magic 2012|M12|
|
||||
Masters Edition II|ME2|
|
||||
Masters Edition III|ME3|
|
||||
Masters Edition IV|ME4|
|
||||
Masters Edition|MED|
|
||||
Mirage|MIR|
|
||||
Mercadian Masques|MMQ|
|
||||
Morningtide|MOR|
|
||||
Mirrodin|MRD|
|
||||
Ninth Edition|9ED|
|
||||
Nemesis|NEM|
|
||||
Odyssey|ODY|
|
||||
Onslaught|ONS|
|
||||
Portal Second Age|PO2|
|
||||
Prophecy|PCY|
|
||||
Planar Chaos|PLC|
|
||||
Planeshift|PLS|
|
||||
Portal|POR|
|
||||
Portal Three Kingdoms|PTK|
|
||||
Premium Deck Series: Fire and Lightning|PD2|
|
||||
Premium Deck Series: Slivers|PDS|
|
||||
Ravnica: City of Guilds|RAV|
|
||||
Rise of the Eldrazi|ROE|
|
||||
Starter 2000|S00|
|
||||
Starter 1999|S99|
|
||||
Scourge|SCG|
|
||||
Shadowmoor|SHM|
|
||||
Shards of Alara|ALA|
|
||||
Saviors of Kamigawa|SOK|
|
||||
Stronghold|STH|
|
||||
Tempest|TMP|
|
||||
Torment|TOR|
|
||||
Time Spiral "Timeshifted"|TSB|
|
||||
Time Spiral|TSP|
|
||||
Urza's Destiny|UDS|
|
||||
Unglued|UGL|
|
||||
Urza's Legacy|ULG|
|
||||
Unhinged|UNH|
|
||||
Urza's Saga|USG|
|
||||
Vanguard Set 1|VG1|
|
||||
Vanguard Set 2|VG2|
|
||||
Vanguard Set 3|VG3|
|
||||
Vanguard Set 4|VG4|
|
||||
MTGO Vanguard|VGO|
|
||||
Visions|VIS|
|
||||
Weatherlight|WTH|
|
||||
Worldwake|WWK|
|
||||
Zendikar|ZEN|
|
||||
Archenemy|ARC|
|
||||
Scars of Mirrodin|SOM|
|
||||
From the Vault: Relics|FVR|
|
||||
Duel Decks: Elspeth vs. Tezzeret|DDF|
|
||||
Mirrodin Besieged|MBS|
|
||||
New Phyrexia|NPH|
|
||||
Magic: The Gathering-Commander|CMD|
|
Loading…
Reference in a new issue