 
    "Thomas Haas"
    {:advanceable :always
-    :abilities [{:label "Gain credits" :msg (msg "gain " (* 2 (:advance-counter card)) " [Credits]")
-                 :effect (effect (gain :credit (* 2 (:advance-counter card))) (trash card))}]}
+    :abilities [{:label "Gain credits" :msg (msg "gain " (* 2 (get card :advance-counter 0)) " [Credits]")
+                 :effect (effect (gain :credit (* 2 (get card :advance-counter 0))) (trash card))}]}
 
    "Toshiyuki Sakai"
    {:advanceable :always}

   {:advanceable :always
    :access {:optional {:prompt "Pay 1 [Credits] to use Project Junebug ability?"
                        :req (req (and installed (> (:credit corp) 0)))
                        :yes-ability {:cost [:credit 1] :msg (msg "do " (* 2 (:advance-counter card)) " net damage")
                                      :effect (effect (damage :net (* 2 (:advance-counter card)) {:card card}))}}}}

   "Psychic Field"
   (let [ab {:psi {:req (req installed)

   "GRNDL Refinery"
   {:advanceable :always
    :abilities [{:label "Gain 4 [Credits] for each advancement token on GRNDL Refinery"
                 :cost [:click 1] :msg (msg "gain " (* 4 (get card :advance-counter 0)) " [Credits]")
                 :effect (effect (trash card) (gain :credit (* 4 (get card :advance-counter 0))))}]}

   "Haas Arcology AI"
   {:advanceable :while-unrezzed
