     :events {:runner-turn-begins {:msg "gain 2 [Credits]" :counter-cost 2
                                   :effect #(do (gain %1 :runner :credit 2)
                                                (when (zero? (:counter %3)) (trash %1 :runner %3)))}}}
+
+   "Data Dealer"
+   {:abilities [{:cost [:click 1] :effect (effect (gain :credit 10))
+                 :msg "forfeit an Agenda and gain 10 [Credits]"}]}
 
    "Data Folding"
    {:events {:runner-turn-begins {:req (req (>= (:memory runner) 2)) :msg "gain 1 [Credits]"

   {:recurring 2}

   "Self-modifying Code"
   {:abilities [{:prompt "Choose an program to install" :msg (msg "installs " (:title target))
                 :choices (req (filter #(and (has? % :type "Program")
                                             (<= (:cost %) (- (:credit runner) 2))) (:deck runner)))
                 :cost [:credit 2]
                 :effect (effect (runner-install target) (trash card) (shuffle! :deck))}]}

   "Sentinel Defense Program"
   {:events {:damage {:req (req (= target :brain)) :msg "to do 1 net damage"

   "Sahasrara"
   {:recurring 2}

   "Same Old Thing"
   {:abilities [{:cost [:click 2]
                 :prompt "Choose an event to install" :msg (msg "play " (:title target))
                 :choices (req (filter #(and (has? % :type "Event")
                                             (<= (:cost %) (:credit runner))) (:discard runner)))
                 :effect (effect (gain :click 1) (play-instant target) (trash card))}]}

   "Scorched Earth"
   {:req (req tagged) :effect (effect (damage :meat 4))}

