Network.Bitcoin.BitX.Public

Usage example

As a small example, to get the current selling price of bitcoin on the BitX exchange, do the following:

{-# LANGUAGE QuasiQuotes #-}

import Record.Lens
import Record
import Network.Bitcoin.BitX

main = do
  bitXResponse <- getTicker XBTZAR
  case bitXResponse of
    ValidResponse tic -> print (view [lens| ask |] tic)
    _                 -> error "Ah well..."
 

Documentation

getTicker :: CcyPair -> IO (BitXAPIResponse Ticker)

Returns the latest ticker indicators.

getTickers :: IO (BitXAPIResponse [Ticker])

Returns the latest ticker indicators from all active BitX exchanges.

getOrderBook :: CcyPair -> IO (BitXAPIResponse Orderbook)

Returns a list of bids and asks in the order book.

Ask orders are sorted by price ascending. Bid orders are sorted by price descending. Note that multiple orders at the same price are not necessarily conflated.

getTrades :: CcyPair -> IO (BitXAPIResponse [Trade])

Returns a list of the most recent trades