    {:derezzed-events {:runner-turn-ends corp-rez-toast}
     :events {:corp-turn-begins ability}
     :abilities [ability]})
+
+   "PAD Factory"
+   {:abilities [{:cost [:click 1]
+                 :label "Place 1 advancement token on a card"
+                 :choices {:req #(and (:side % "Corp") (installed? %))}
+                 :msg (msg "place 1 advancement token on " (card-str state target))
+                 :effect (effect (add-prop target :advance-counter 1 {:placed true})
+                                 (register-turn-flag!
+                                   target :can-score
+                                   (fn [state side card]
+                                     (if (>= (:advance-counter card) (or (:current-cost card) (:advancementcost card)))
+                                       ((constantly false) (toast state :corp "Cannot score due to PAD Factory." "warning"))
+                                       true))))}]}
+
+   "Pālanā Agroplex"
+   (let [ability {:msg "make each player draw 1 card"
+                  :label "Make each player draw 1 card (start of turn)"
+                  :once :per-turn
+                  :effect (effect (draw 1) (draw :runner))}]
+     {:derezzed-events {:runner-turn-ends corp-rez-toast}
+      :flags {:corp-phase-12 (req true)}
+      :events {:corp-turn-begins ability}
+      :abilities [ability]})
 
    "Plan B"
    (advance-ambush

                 :effect (effect (mill :runner)
                                 (trash card {:cause :ability-cost}))}]}

   "Launch Campaign"
   (campaign 6 2)



   "Mumba Temple"
   {:recurring 2}

   "Mumbad Construction Co."
   {:derezzed-events {:runner-turn-ends corp-rez-toast}
    :events {:corp-turn-begins {:effect (effect (add-prop card :advance-counter 1 {:placed true}))}}
    :abilities [{:cost [:credit 2]
                 :req (req (and (> (get card :advance-counter 0) 0)
                                (some #(rezzed? %) (all-installed state :corp))))
                 :label "Move an advancement token to a faceup card"
                 :prompt "Choose a faceup card"
                 :choices {:req #(rezzed? %)}
                 :msg (msg "move an advancement token to " (card-str state target))
                 :effect (effect (add-prop card :advance-counter -1 {:placed true})
                                 (add-prop target :advance-counter 1 {:placed true}))}]}

   "Museum of History"
   {:flags {:corp-phase-12 (req (pos? (count (get-in @state [:corp :discard]))))}
