[KHC] Implemented Serpent's Soul-Jar

Mage.Sets/src/mage/cards/s/SerpentsSoulJar.java

@@ -0,0 +1,190 @@
+package mage.cards.s;
+
+import mage.MageObjectReference;
+import mage.abilities.Ability;
+import mage.abilities.common.DiesCreatureTriggeredAbility;
+import mage.abilities.common.SimpleActivatedAbility;
+import mage.abilities.costs.common.PayLifeCost;
+import mage.abilities.costs.common.TapSourceCost;
+import mage.abilities.effects.AsThoughEffectImpl;
+import mage.abilities.effects.OneShotEffect;
+import mage.cards.Card;
+import mage.cards.CardImpl;
+import mage.cards.CardSetInfo;
+import mage.constants.*;
+import mage.filter.FilterPermanent;
+import mage.filter.common.FilterControlledPermanent;
+import mage.game.Game;
+import mage.game.events.GameEvent;
+import mage.game.permanent.Permanent;
+import mage.players.Player;
+import mage.watchers.Watcher;
+
+import java.util.*;
+
+/**
+ * @author TheElk801
+ */
+public final class SerpentsSoulJar extends CardImpl {
+
+    private static final FilterPermanent filter = new FilterControlledPermanent(SubType.ELF, "an Elf you control");
+
+    public SerpentsSoulJar(UUID ownerId, CardSetInfo setInfo) {
+        super(ownerId, setInfo, new CardType[]{CardType.ARTIFACT}, "{2}{B}");
+
+        // Whenever an Elf you control dies, exile it.
+        this.addAbility(new DiesCreatureTriggeredAbility(
+                new SerpentsSoulJarExileEffect(), false, filter, true)
+        );
+
+        // {T}, Pay 2 life: Until end of turn, you may cast a creature spell from among cards exiled with Serpent's Soul-Jar.
+        Ability ability = new SimpleActivatedAbility(new SerpentsSoulJarCastFromExileEffect(), new TapSourceCost());
+        ability.addCost(new PayLifeCost(2));
+        this.addAbility(ability, new SerpentsSoulJarWatcher());
+    }
+
+    private SerpentsSoulJar(final SerpentsSoulJar card) {
+        super(card);
+    }
+
+    @Override
+    public SerpentsSoulJar copy() {
+        return new SerpentsSoulJar(this);
+    }
+}
+
+class SerpentsSoulJarExileEffect extends OneShotEffect {
+
+    SerpentsSoulJarExileEffect() {
+        super(Outcome.Benefit);
+        staticText = "exile it";
+    }
+
+    private SerpentsSoulJarExileEffect(final SerpentsSoulJarExileEffect effect) {
+        super(effect);
+    }
+
+    @Override
+    public SerpentsSoulJarExileEffect copy() {
+        return new SerpentsSoulJarExileEffect(this);
+    }
+
+    @Override
+    public boolean apply(Game game, Ability source) {
+        Player player = game.getPlayer(source.getControllerId());
+        Permanent permanent = source.getSourcePermanentIfItStillExists(game);
+        Card card = game.getCard(targetPointer.getFirst(game, source));
+        if (player == null || permanent == null || card == null) {
+            return false;
+        }
+        MageObjectReference mor = new MageObjectReference(permanent, game);
+        player.moveCards(card, Zone.EXILED, source, game);
+        String exileId = "serpentsSoulJar_" + mor.getSourceId() + mor.getZoneChangeCounter();
+        if (game.getState().getValue(exileId) == null) {
+            game.getState().setValue(exileId, new HashSet<MageObjectReference>());
+        }
+        ((Set) game.getState().getValue(exileId)).add(new MageObjectReference(card, game));
+        return true;
+    }
+}
+
+class SerpentsSoulJarCastFromExileEffect extends AsThoughEffectImpl {
+
+    SerpentsSoulJarCastFromExileEffect() {
+        super(AsThoughEffectType.PLAY_FROM_NOT_OWN_HAND_ZONE, Duration.EndOfTurn, Outcome.Benefit);
+        staticText = "until end of turn, you may cast a creature spell from among cards exiled with {this}";
+    }
+
+    private SerpentsSoulJarCastFromExileEffect(final SerpentsSoulJarCastFromExileEffect effect) {
+        super(effect);
+    }
+
+    @Override
+    public boolean apply(Game game, Ability source) {
+        return true;
+    }
+
+    @Override
+    public SerpentsSoulJarCastFromExileEffect copy() {
+        return new SerpentsSoulJarCastFromExileEffect(this);
+    }
+
+    @Override
+    public void init(Ability source, Game game) {
+        super.init(source, game);
+        SerpentsSoulJarWatcher watcher = game.getState().getWatcher(SerpentsSoulJarWatcher.class);
+        if (watcher != null) {
+            watcher.addPlayable(source, game);
+        }
+    }
+
+    @Override
+    public boolean applies(UUID sourceId, Ability source, UUID affectedControllerId, Game game) {
+        SerpentsSoulJarWatcher watcher = game.getState().getWatcher(SerpentsSoulJarWatcher.class);
+        if (watcher == null || !watcher.checkPermission(affectedControllerId, source, game)) {
+            return false;
+        }
+        Object value = game.getState().getValue(
+                "serpentsSoulJar_" + source.getSourceId() + source.getSourceObjectZoneChangeCounter()
+        );
+        if (!(value instanceof Set)) {
+            discard();
+            return false;
+        }
+        Set<MageObjectReference> morSet = (Set<MageObjectReference>) value;
+        if (game.getState().getZone(sourceId) != Zone.EXILED
+                || morSet.stream().noneMatch(mor -> mor.refersTo(sourceId, game))) {
+            return false;
+        }
+        Card card = game.getCard(sourceId);
+        return card != null && card.isCreature() && !card.isLand();
+    }
+}
+
+class SerpentsSoulJarWatcher extends Watcher {
+
+    private final Map<MageObjectReference, Map<UUID, Integer>> morMap = new HashMap<>();
+
+    SerpentsSoulJarWatcher() {
+        super(WatcherScope.GAME);
+    }
+
+    @Override
+    public void watch(GameEvent event, Game game) {
+        if (event.getType() == GameEvent.EventType.SPELL_CAST) {
+            if (event.getAdditionalReference() == null) {
+                return;
+            }
+            morMap.computeIfAbsent(event.getAdditionalReference().getApprovingMageObjectReference(), m -> new HashMap<>())
+                    .compute(event.getPlayerId(), (u, i) -> i == null ? 0 : Integer.sum(i, -1));
+            return;
+        }
+    }
+
+    @Override
+    public void reset() {
+        morMap.clear();
+        super.reset();
+    }
+
+    boolean checkPermission(UUID playerId, Ability source, Game game) {
+        if (!playerId.equals(source.getControllerId())) {
+            return false;
+        }
+        MageObjectReference mor = new MageObjectReference(
+                source.getSourceId(), source.getSourceObjectZoneChangeCounter(), game
+        );
+        if (!morMap.containsKey(mor)) {
+            return false;
+        }
+        return morMap.get(mor).getOrDefault(playerId, 0) > 0;
+    }
+
+    void addPlayable(Ability source, Game game) {
+        MageObjectReference mor = new MageObjectReference(
+                source.getSourceId(), source.getSourceObjectZoneChangeCounter(), game
+        );
+        morMap.computeIfAbsent(mor, m -> new HashMap<>())
+                .compute(source.getControllerId(), (u, i) -> i == null ? 1 : Integer.sum(i, 1));
+    }
+}

Mage.Sets/src/mage/sets/KaldheimCommander.java

@@ -27,6 +27,7 @@ public final class KaldheimCommander extends ExpansionSet {
         cards.add(new SetCardInfo("Pact of the Serpent", 9, Rarity.RARE, mage.cards.p.PactOfTheSerpent.class));
         cards.add(new SetCardInfo("Ruthless Winnower", 10, Rarity.RARE, mage.cards.r.RuthlessWinnower.class));
         cards.add(new SetCardInfo("Sage of the Beyond", 6, Rarity.RARE, mage.cards.s.SageOfTheBeyond.class));
+        cards.add(new SetCardInfo("Serpent's Soul-Jar", 11, Rarity.RARE, mage.cards.s.SerpentsSoulJar.class));
         cards.add(new SetCardInfo("Spectral Deluge", 7, Rarity.RARE, mage.cards.s.SpectralDeluge.class));
         cards.add(new SetCardInfo("Stoic Farmer", 5, Rarity.RARE, mage.cards.s.StoicFarmer.class));
         cards.add(new SetCardInfo("Tales of the Ancestors", 8, Rarity.RARE, mage.cards.t.TalesOfTheAncestors.class));