(PowerBuilder) Bitfinex v2 REST Tickers

The tickers endpoint provides a high level overview of the state of the market. It shows the current best bid and ask, the last traded price, as well as information on the daily volume and price movement over the last day. The endpoint can retrieve multiple tickers with a single query.

Note: This example requires Chilkat v11.0.0 or greater.

For more information, see https://docs.bitfinex.com/reference#rest-public-tickers

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

integer li_rc
integer li_Success
oleobject loo_Http
oleobject loo_SbResponseBody
oleobject loo_JarrResp
integer li_RespStatusCode
oleobject loo_Jarr_1
integer j
integer li_Count_j
string ls_StrVal
integer i
integer li_Count_i

li_Success = 0

// This example assumes the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.

loo_Http = create oleobject
li_rc = loo_Http.ConnectToNewObject("Chilkat.Http")
if li_rc < 0 then
    destroy loo_Http
    MessageBox("Error","Connecting to COM object failed")
    return
end if

// Implements the following CURL command:

// curl https://api-pub.bitfinex.com/v2/tickers?symbols=tBTCUSD,tLTCUSD,fUSD

// Use the following online tool to generate HTTP code from a CURL command
// Convert a cURL Command to HTTP Source Code

loo_SbResponseBody = create oleobject
li_rc = loo_SbResponseBody.ConnectToNewObject("Chilkat.StringBuilder")

li_Success = loo_Http.QuickGetSb("https://api-pub.bitfinex.com/v2/tickers?symbols=tBTCUSD,tLTCUSD,fUSD",loo_SbResponseBody)
if li_Success = 0 then
    Write-Debug loo_Http.LastErrorText
    destroy loo_Http
    destroy loo_SbResponseBody
    return
end if

loo_JarrResp = create oleobject
li_rc = loo_JarrResp.ConnectToNewObject("Chilkat.JsonArray")

loo_JarrResp.LoadSb(loo_SbResponseBody)
loo_JarrResp.EmitCompact = 0

Write-Debug "Response Body:"
Write-Debug loo_JarrResp.Emit()

li_RespStatusCode = loo_Http.LastStatus
Write-Debug "Response Status Code = " + string(li_RespStatusCode)
if li_RespStatusCode >= 400 then
    Write-Debug "Response Header:"
    Write-Debug loo_Http.LastHeader
    Write-Debug "Failed."
    destroy loo_Http
    destroy loo_SbResponseBody
    destroy loo_JarrResp
    return
end if

// Sample JSON response:
// (Sample code for parsing the JSON response is shown below)

// [
//   [
//     "tBTCUSD",
//     9318.6,
//     21.53815472,
//     9318.7,
//     5.30463105,
//     223.5,
//     0.0246,
//     9318.7,
//     4125.21689058,
//     9370.998872,
//     9075.80199233
//   ],
//   [
//     "tLTCUSD",
//     44.008,
//     1807.8617840300003,
//     44.019,
//     2394.7625575100005,
//     2.359,
//     0.0566,
//     44.019,
//     27051.34115724,
//     44.16,
//     41.559
//   ],
//   [
//     "fUSD",
//     0.00022955068493150685,
//     0.000199,
//     30,
//     871597.2359141599,
//     0.0001962,
//     2,
//     67926.11558407999,
//     -0.00001146,
//     -0.0523,
//     0.00020757,
//     167542924.22214913,
//     0.00024,
//     0.00000299,
//     null,
//     null,
//     82649109.90968154
//   ]
// ]

// Sample code for parsing the JSON response...
// Use the following online tool to generate parsing code from sample JSON:
// Generate Parsing Code from JSON

loo_Jarr_1 = create oleobject
li_rc = loo_Jarr_1.ConnectToNewObject("Chilkat.JsonArray")

i = 0
li_Count_i = loo_JarrResp.Size
do while i < li_Count_i
    loo_JarrResp.ArrayAt2(i,loo_Jarr_1)
    j = 0
    li_Count_j = loo_Jarr_1.Size
    do while j < li_Count_j
        ls_StrVal = loo_Jarr_1.StringAt(j)
        j = j + 1
    loop
    i = i + 1
loop


destroy loo_Http
destroy loo_SbResponseBody
destroy loo_JarrResp
destroy loo_Jarr_1