Add Land Tax

Author: radar

lib/magic/card_list.rb

@@ -95,5 +95,12 @@ def select(&condition)
     def reject(&condition)
       self.class.new(super(&condition))
     end
+
+    # filters are an array of methods to filter by
+    def filter(filters)
+      self.class.new(filters.reduce(self) do |cards, filter|
+        cards.send(filter)
+      end)
+    end
   end
 end

lib/magic/cards/fabled_passage.rb

@@ -7,13 +7,9 @@ def target_choices(receiver)
         receiver.controller.library.basic_lands
       end
 
-      class Choice < Magic::Choice::SearchLibraryForBasicLand
+      class Choice < Magic::Choice::SearchLibrary
         def initialize(actor:)
-          super(actor: actor, enters_tapped: true)
-        end
-
-        def choices
-          controller.library.basic_lands
+          super(actor: actor, to_zone: :battlefield, filter: Filter[:basic_lands], upto: 1, enters_tapped: true)
         end
 
         def resolve!(target:)

lib/magic/cards/font_of_fertility.rb

@@ -6,9 +6,14 @@ module Cards
     end
 
     class FontOfFertility < Enchantment
-      class Choice < Magic::Choice::SearchLibraryForBasicLand
+      class Choice < Magic::Choice::SearchLibrary
         def initialize(actor:)
-          super(actor: actor, enters_tapped: true)
+          super(
+            actor: actor,
+            to_zone: :battlefield,
+            enters_tapped: true,
+            filter: Filter[:basic_lands]
+          )
         end
       end
 

lib/magic/cards/land_tax.rb

@@ -0,0 +1,37 @@
+module Magic
+  module Cards
+    class LandTax < Enchantment
+      card_name "Land Tax"
+      cost white: 1
+
+      class UpkeepChoice < Magic::Choice::May
+        def resolve!
+          game.add_choice(SearchChoice.new(actor: actor))
+        end
+      end
+
+      class SearchChoice < Magic::Choice::SearchLibrary
+        def initialize(actor:)
+          super(actor: actor, upto: 3, to_zone: :hand, filter: Filter[:basic_lands])
+        end
+      end
+
+      class BeginningOfYourUpkeepTrigger < TriggeredAbility::BeginningOfYourUpkeep
+        def should_perform?
+          opponent_controls_more_lands = game.opponents(controller).any? { _1.lands.count > controller.lands.count }
+          super && opponent_controls_more_lands
+        end
+
+        def call
+          game.add_choice(UpkeepChoice.new(actor: actor))
+        end
+      end
+
+      def event_handlers
+        {
+          Events::BeginningOfUpkeep => BeginningOfYourUpkeepTrigger
+        }
+      end
+    end
+  end
+end

lib/magic/cards/rampant_growth.rb

@@ -5,9 +5,9 @@ module Cards
     end
 
     class RampantGrowth < Sorcery
-      class Choice < Magic::Choice::SearchLibraryForBasicLand
+      class Choice < Magic::Choice::SearchLibrary
         def initialize(actor:)
-          super(actor: actor, enters_tapped: true)
+          super(actor: actor, to_zone: :battlefield, enters_tapped: true, filter: Filter[:basic_lands])
         end
       end
 

lib/magic/choice/search_library.rb

@@ -0,0 +1,31 @@
+module Magic
+  class Choice
+    class SearchLibrary < Choice
+      extend TargetNormalizer
+
+      attr_reader :enters_tapped, :to_zone, :choices, :upto
+      def initialize(actor:, filter:, enters_tapped: false, upto: 1, to_zone:)
+        @upto = upto
+        @to_zone = to_zone
+        @choices = actor.controller.library.filter(filter)
+        super(actor: actor)
+        @enters_tapped = enters_tapped
+      end
+
+      def resolve!(targets:)
+        case to_zone
+        when :battlefield
+          targets.map do |target|
+            target.resolve!(enters_tapped: enters_tapped)
+          end
+        when :hand
+          targets.map do |target|
+            target.move_to_hand!
+          end
+        end.tap { controller.shuffle! }
+      end
+
+      normalize_targets :resolve!
+    end
+  end
+end

lib/magic/choice/search_library_for_basic_land.rb

@@ -8,7 +8,7 @@ def initialize(player:)
       end
 
       def inspect
-        "#<Events::BeginningOfUpkeep>"
+        "#<Events::BeginningOfUpkeep player=#{player}>"
       end
     end
   end

lib/magic/events/beginning_of_upkeep.rb

@@ -0,0 +1,7 @@
+module Magic
+  class Filter < SimpleDelegator
+    def self.[](*filters)
+      new(filters)
+    end
+  end
+end

lib/magic/filter.rb

@@ -0,0 +1,13 @@
+module Magic
+  module TargetNormalizer
+    def normalize_targets(method_name)
+      original_method = instance_method(method_name)
+
+      define_method(method_name) do |target: nil, targets: []|
+        targets = [target] if target
+        resolutions = original_method.bind(self).call(targets: targets)
+        target ? resolutions.first : resolutions
+      end
+    end
+  end
+end