    "Xanadu"
    {:events {:pre-rez {:req (req (= (:type target) "ICE"))
                        :effect (effect (rez-cost-bonus 1))}}}
+
+   "Zona Sul Shipping"
+   {:events {:runner-turn-begins {:effect (effect (add-prop card :counter 1))}}
+    :abilities [{:cost [:click 1] :msg (msg "gain " (:counter card) " [Credits]")
+                 :label "Take all credits"
+                 :effect (effect (gain :credit (:counter card)) (set-prop card :counter 0))}]
+    :effect (req (add-watch state (keyword (str "zona-sul-shipping" (:cid card)))
+                            (fn [k ref old new]
+                              (when (> (get-in new [:runner :tag]) 0)
+                                (remove-watch state (keyword (str "zona-sul-shipping" (:cid card))))
+                                (trash ref :runner card)
+                                (system-msg ref side "trash Zona Sul Shipping for being tagged")))))}
+
    ;; Icebreakers
 
    "Alpha"

                 :msg (msg "host " (:title target)) :effect (effect (host card target))}]}

   "Leverage"
   {:player :corp
    :prompt "Take 2 bad publicity?"
    :choices ["Yes" "No"]
    :effect (req (if (= target "Yes")

                                 (update-breaker-strength target))}
                {:label "Host an installed non-AI icebreaker on Dinosaurus"
                 :req (req (empty? (:hosted card)))
                 :prompt "Choose a program to host on Dinosaurus"
                 :choices {:req #(and (has? % :subtype "Icebreaker")
                                      (not (has? % :subtype "AI"))
                                      (:installed %))}
