    "https://blockchain.info/address/$address$?format=json"])
 
 (defn- balance [result]
-  (or (.-final_balance result)
-      (some-> result
-        .-data
-        .-address
-        .-confirmedBalance)))
+  (or (.-final_balance result) ; blockchain
+      (some-> result ; helloblock
+        (.-data)
+        (.-address)
+        (.-confirmedBalance))))
 
 (defn- parse-body [response]
   (->> response

(defn get-balance [urls address]
  (go
    (if-let [url (-> urls first (.replace "$address$" address))]
      (let [response (a/<! (request url))]
        (if-let [error (:error response)]
          (do
            (println "zomg error" error)
            (a/<! (get-balance (rest urls) address)))
          (-> response parse-body balance))))))

(defn address->balance [urls address]
  (go
    (let [amount (a/<! (get-balance urls address))]
      [address amount])))


(defn- send? [fee amount]
    (< (* 3 fee) amount))

        (-> wallet .-addresses js->clj))
    (unspent-amounts [this]
      (let [my-addrs (addresses this)]
        (if (empty? my-addrs)
          (go nil)
          (->> my-addrs
            (map (partial address->balance urls))
            (a/merge)
            (a/into { })))))
    (unspent-channel [this]
      (let [return (a/chan)]
        (js/setInterval
