gistfile1.txt

bitcoin.core=> (def network (testNet))
#'bitcoin.core/network
bitcoin.core=> (start)
#<Transition com.google.common.util.concurrent.AbstractService$Transition@562ccf18>
bitcoin.core=> (.getId (net))
"org.bitcoin.test"
bitcoin.core=> (def w (open-wallet "./testWallet.wallet"))
#'bitcoin.core/w
bitcoin.core=> w
#<Wallet Wallet containing 0.00 BTC in:
  0 unspent transactions
  0 spent transactions
  0 pending transactions
  0 inactive transactions
  0 dead transactions
Last seen best block: (-1) null

Keys:
  addr:mxoyvawD1szpQR2Cz7BUc6rpp3PSoVkYny pub:033a89da9e051118a5d71d37e58c7e23d465429a6ef0157d602ce628ac4877dd6f timestamp:1367376789
>
bitcoin.core=> (on-coins-received w (fn [tx prev-balance new-balance] (println "Previous balance: " prev-balance " new balance: " new-balance)))
nil
bitcoin.core=> (on-tx-broadcast-to-wallet w (fn [peer tx] (println peer tx)))
nil
bitcoin.core=> (balance w)
0
bitcoin.core=>