Erwan

-fix bug with Regal force

projects/mtg/bin/Res/test/_tests.txt

@@ -131,6 +131,7 @@ pygmy_troll.txt
 pyroclasm.txt
 rampant_growth.txt
 recover.txt
+regal_force.txt
 resurrection.txt
 righteous_cause.txt
 rootwalla.txt

projects/mtg/bin/Res/test/regal_force.txt

@@ -0,0 +1,21 @@
+#Bug: Regal force draws when new creatures come into play
+[INIT]
+FIRSTMAIN
+[PLAYER1]
+inplay:grizzly bears,forest
+hand:llanowar elves,regal force
+manapool:{4}{G}{G}{G}
+library:plains,mountain,swamp
+[PLAYER2]
+[DO]
+regal force
+forest
+llanowar elves
+[ASSERT]
+FIRSTMAIN
+[PLAYER1]
+inplay:grizzly bears,forest,regal force,llanowar elves
+hand:mountain,swamp
+library:plains
+[PLAYER2]
+[END]

projects/mtg/src/MTGAbility.cpp

@@ -276,6 +276,7 @@ MTGAbility * AbilityFactory::parseMagicLine(string s, int id, Spell * spell, MTG
         int oneShot = 0;
         if (card->hasType("sorcery") || card->hasType("instant")) oneShot = 1;
         if (i == 3) oneShot = 1;
+        if (a->oneShot) oneShot = 1;
         switch(i){
           case 0: result =  NEW ALord(id, card, lordTargets, lordIncludeSelf, a); break;
           case 1: result =  NEW AForeach(id, card, target,lordTargets, lordIncludeSelf, a); break;