                                 {:runner-install cloud :trash cloud :card-moved cloud})
                       :strength-bonus (req (count (filter #(has-subtype? % "Icebreaker")
                                                           (all-installed state :runner))))}))
+
+(defn- global-sec-breaker
+  "GlobalSec breakers for Sunny"
+  [type]
+  (cloud-icebreaker (auto-icebreaker [type] {:abilities [(break-sub 2 0 (lower-case type))
+                                                         (strength-pump 2 3)]})))
 
 ;;; Icebreaker definitions
 (def cards-icebreakers

    :pump strength}))

(defn- break-sub
  "Creates a break subroutine ability."
  ([cost num] (break-sub cost num nil))
  ([cost num subtype]
   {:msg (str "break " (when (> num 1) "up to ") num (when subtype (str " " subtype))
              " subroutine" (when (> num 1) "s"))
    :cost [:credit cost]}))

;;; Breaker sets

                                 (strength-pump 3 5)]})

   "Morning Star"
   {:abilities [(break-sub 1 0 "barrier")]}

   "Mimic"
   {:abilities [(break-sub 1 1 "sentry")]}
