 
    "Ice Wall"
    {:advanceable :always :abilities [end-the-run]
-    :strength-bonus (req (or (:advance-counter card) 0))}
+    :strength-bonus advance-counters}
 
    "Ichi 1.0"
    {:abilities [trash-program

                 :effect (effect (end-run))}]}

   "Nebula"
   {:advanceable :always
    :abilities [trash-program]
    :rez-cost-bonus (req (* -3 (or (:advance-counter card) 0)))}

   "Negotiator"
   {:abilities [(gain-credits 2)

  {:label (str "Gain " credits " [Credits]")
   :msg (str "gain " credits " [Credits]")
   :effect (effect (gain :credit credits))})

;;; For Advanceable ICE
(def advance-counters
  "Number of advancement counters - for advanceable ICE."
  (req (or (:advance-counter card) 0)))

(def space-ice-rez-bonus
  "Amount of rez reduction for the Space ICE."
  (req (* -3 (or (:advance-counter card) 0))))

(defn space-ice
  "Creates data for Space ICE with specified abilities."
  [& abilities]
  {:advanceable :always
   :abilities (vec abilities)
   :rez-cost-bonus space-ice-rez-bonus})


;;; For Grail ICE
(def reveal-grail
