반응형
생각보다 엄청 오래 걸렸네요.
빗썸 API 문서를 금방 분석하고 해석될 거라 생각했었는데 그게 아녔네요
빗썸 API 문서 분석만 일주일은 걸린 거 같네요
빗썸 API 문서와 레퍼런스 코드는 생각보다 수정되어야 할 부분이 많지만 수정이 되지 않고 있는 듯하여 많은 컴퓨터 언어를 검색도 해서 수정했습니다.
구구 절절 이야기하면 어렵지만
파이썬 , C# , C++ , JAVA까지 4개 코드를 열심히 수정해야만 해결했네요
샘플 코드라고 제공된 것도 바로 실행되지도 않고.....
생각보다 고생을 했지만....
빗썸 API는 문서는 아주 불친절했지만 돌려주는 값은 아주 착실하네요
내 지갑 정리 , 자산 정보를 제공하는 Balance에 현재 시세가 붙어있네요~!
빗썸에서 Balance에서 제공하는 Response 값입니다.
필드 | 설명 |
status | 결과 상태 코드 (정상: 0000, 그 외 에러 코드 참조) |
total_{currency} | 전체 가상자산 수량 |
total_krw | 전체 원화(KRW) 금액 |
in_use_{currency} | 주문 중 묶여있는 가상자산 수량 |
in_use_krw | 주문 중 묶여있는 원화(KRW) 금액 |
available_{currency} | 주문 가능 가상자산 수량 |
available_krw | 주문 가능 원화(KRW) 금액 |
xcoin_last_{currency} | 마지막 체결된 거래 금액 ALL 호출 시 필드 명 – xcoin_last_{currency} |
이렇게 됩니다.
그러면 바로 엑셀로 옮겨 보겠습니다.
기본적으로 추가해야 되는 레퍼런스가 있어야 하며 , 제가 작성했던 다른 함수들도 호출해야 합니다.
Dim whttp As New WinHttp.WinHttpRequest
URL = "https://api.bithumb.com"
whttp.Open "get", URL
whttp.Send
Nows = ChangeDate(whttp.GetResponseHeader("Date"))
api_key = "api키값 입력"
api_secret = "secret키값 입력"
endpoint = "/info/balance"
str_data = "endpoint=%2Finfo%2Fbalance¤cy=ALL"
nonce = TimeStamp(Nows)
Data = endpoint & Chr(0) & str_data & Chr(0) & nonce
utf8_hex_output = Hex_HMACSHA512(Data, api_secret)
api_sign = EncodeBase64(utf8_hex_output)
URL = URL & endpoint
whttp.Open "post", URL
whttp.SetRequestHeader "content-type", "application/x-www-form-urlencoded"
whttp.SetRequestHeader "Api-Key", api_key
whttp.SetRequestHeader "Api-Sign", api_sign
whttp.SetRequestHeader "Api-Nonce", nonce
whttp.Send (str_data)
함께 호출해야 되는 함수 블로그 글
대부분 비슷한 형태라서 다른 곳에서 사용하던 함수들을 계속 사용하네요
반응형
'코인 > 빗썸API' 카테고리의 다른 글
엑셀 빗썸 API 연결하여 거래하기 - VBA (0) | 2021.11.25 |
---|---|
빗썸 지수 엑셀 확인하기 - VBA (1) | 2021.06.03 |
댓글