    "City Surveillance"
    {:events {:runner-turn-begins
              {:prompt "Pay 1 [Credits] or take 1 tag" :choices ["Pay 1 credit" "Take 1 tag"]
-              :player :runner
-              :effect (req (when-not (and (= target "Pay 1 credit") (pay state side card :credit 1))
-                             (gain state side :tag 1)))}}}
+              :player :runner :msg "make the Runner pay 1 [Credits] or take 1 tag"
+              :effect (req (if-not (and (= target "Pay 1 credit") (pay state side card :credit 1))
+                             (do (gain state side :tag 1) (system-msg state side "takes 1 tag"))
+                             (system-msg state side "pays 1 [Credits]")))}}}
 
    "Cloak"
    {:recurring 1}

            [game.utils :refer [has?]]))

(def cards
  {"Access to Globalsec"
   {:effect (effect (gain :link 1)) :leave-play (effect (lose :link 1))}

   "Account Siphon"
   {:effect (effect (run :hq
                      {:replace-access
                       {:effect (effect (gain :tag 2 :credit (* 2 (min 5 (:credit corp))))
                                        (lose :corp :credit (min 5 (:credit corp))))}}))}

   "Activist Support"
   {:events


   "Anonymous Tip"
   {:effect (effect (draw 3))}

   "Argus Security: Protection Guaranteed"
   {:events {:agenda-stolen
             {:prompt "Take 1 tag or suffer 2 meat damage?"
              :choices ["1 tag" "2 meat damages"] :player :runner
              :msg "make the Runner take 1 tag or suffer 2 meat damage"
              :effect (req (if (= target "1 tag")
                             (do (gain state :runner :tag 1) (system-msg state side "takes 1 tag"))
                             (do (damage state :runner :meat 2)
                                 (system-msg state side "suffers 2 meat damage"))))}}}

   "Astrolabe"
   {:effect (effect (gain :memory 1)) :leave-play (effect (lose :memory 1))
