☰
Login
Signup
Home
›
General
Howdy, Stranger!
It looks like you're new here. If you want to get involved, click one of these buttons!
Sign In
Register
Categories
Recent Discussions
Activity
Categories
13.9K
All Categories
0
Incidents
156
Node JS client
40
Go client
793
.Net API client
380
Kite Publisher
537
.Net / VBA / Excel (3rd party)
458
Algorithms and Strategies
998
Java client
1.1K
API clients
404
PHP client
4K
Python client
347
Mobile and Desktop apps
1.4K
Market data (WebSockets)
3.3K
General
In this Discussion
September 2022
pranit0405
July 2018
kuvi
August 2016
satishvasu
July 2016
gautam_s60
July 2016
balasoft80
July 2016
Kailash
Kite Streaming data to AMIBROKER
balasoft80
July 2016
in
General
Hello,
is there any possibility to push the kite streaming data to Amibroker?
Thanks
Bala
Kailash
July 2016
Theoretically, of course, it's possible. I'm not familiar with Amibroker, so I'm unable to comment on the details.
balasoft80
July 2016
Than you. Anyone please any thoughts?
gautam_s60
July 2016
edited July 2016
I m doing it. Just use websocket webpage on localhost, and get tick data.
My sample foxpro code is here.
I am not professional developer. Kaam chal jata hai...... ;/
appIE = Createobject("InternetExplorer.Application")
appIE.Visible=.T.
appie.Width=150
appie.Height=250
appie.Left=250
appie.Top=0
appIE.Navigate("
http://localhost/dashboard/stream_kite.php
")
Do While appIE.Busy
Loop
ENDDO
WAIT TIMEOUT 5
ElementCol = appIE.Document.getElementById("LTP").innerHTML
tt=1
objAmibroker = CreateObject("Broker.Application")
objAmibroker.visible=.t.
Do While tt36000
*ElementCol1 = appIE.Document.DocumentElement.Document.All
LTP=appIE.Document.getElementById("LTP").innerHTML
LTQ=appIE.Document.getElementById("LTQ").innerHTML
?appIE.Document.getElementById("LTP").innerHTML
objOutFSO = CreateObject("Scripting.FileSystemObject")
objOutFile = objOutFSO.CreateTextFile("D:\KITE_AMIBROKER_LIVE_FEED\OutPutFile.txt",.t.)
?"CRUDE" + "," + ALLTRIM(STR(MONTH(DATE())))+"/"+ALLTRIM(STR(DAY(DATE())))+"/"+ALLTRIM(STR(YEAR(DATE()))) + "," + ALLTRIM(STR(HOUR(DATETIME())))+":"+ALLTRIM(STR(MINUT(DATETIME())))+":"+ALLTRIM(STR(SEC(DATETIME()))) + "," +LTP + ","+LTQ
objOutFile.WriteLine ("CRUDE" + "," + ALLTRIM(STR(MONTH(DATE())))+"-"+ALLTRIM(STR(DAY(DATE())))+"-"+ALLTRIM(STR(YEAR(DATE()))) + "," + ALLTRIM(STR(HOUR(DATETIME())))+":"+ALLTRIM(STR(MINUT(DATETIME())))+":"+ALLTRIM(STR(SEC(DATETIME()))) + "," +LTP + ","+LTQ )
objOutFile =.f.
objOutFSO = .f.
boolUpdate = objAmibroker.Import(0, "D:\KITE_AMIBROKER_LIVE_FEED\OutPutFile.txt", "custom1.format")
boolUpdate = objAmibroker.RefreshAll()
ELSE
IF VAL(SYS(2))> 84671
tt=3
application.StatusBar="Market closed"
WAIT TIMEOUT 10
appIE.quit
quit
ENDIF
ENDIF
LOOP
Enddo
balasoft80
July 2016
Thank you
satishvasu
August 2016
Hi gautam_s60,
Can you give a few more details on how to integrate amibroker with kite connect APIs
kuvi
July 2018
is it working?
pushing the kite streaming data to Amibroker
pranit0405
September 2022
ANY VIEWS ON WEB SOCKET DATA TO AMIBROKER ?
Sign In
or
Register
to comment.
My sample foxpro code is here.
I am not professional developer. Kaam chal jata hai...... ;/
appIE = Createobject("InternetExplorer.Application")
appIE.Visible=.T.
appie.Width=150
appie.Height=250
appie.Left=250
appie.Top=0
appIE.Navigate("http://localhost/dashboard/stream_kite.php")
Do While appIE.Busy
Loop
ENDDO
WAIT TIMEOUT 5
ElementCol = appIE.Document.getElementById("LTP").innerHTML
tt=1
objAmibroker = CreateObject("Broker.Application")
objAmibroker.visible=.t.
Do While tt36000
*ElementCol1 = appIE.Document.DocumentElement.Document.All
LTP=appIE.Document.getElementById("LTP").innerHTML
LTQ=appIE.Document.getElementById("LTQ").innerHTML
?appIE.Document.getElementById("LTP").innerHTML
objOutFSO = CreateObject("Scripting.FileSystemObject")
objOutFile = objOutFSO.CreateTextFile("D:\KITE_AMIBROKER_LIVE_FEED\OutPutFile.txt",.t.)
?"CRUDE" + "," + ALLTRIM(STR(MONTH(DATE())))+"/"+ALLTRIM(STR(DAY(DATE())))+"/"+ALLTRIM(STR(YEAR(DATE()))) + "," + ALLTRIM(STR(HOUR(DATETIME())))+":"+ALLTRIM(STR(MINUT(DATETIME())))+":"+ALLTRIM(STR(SEC(DATETIME()))) + "," +LTP + ","+LTQ
objOutFile.WriteLine ("CRUDE" + "," + ALLTRIM(STR(MONTH(DATE())))+"-"+ALLTRIM(STR(DAY(DATE())))+"-"+ALLTRIM(STR(YEAR(DATE()))) + "," + ALLTRIM(STR(HOUR(DATETIME())))+":"+ALLTRIM(STR(MINUT(DATETIME())))+":"+ALLTRIM(STR(SEC(DATETIME()))) + "," +LTP + ","+LTQ )
objOutFile =.f.
objOutFSO = .f.
boolUpdate = objAmibroker.Import(0, "D:\KITE_AMIBROKER_LIVE_FEED\OutPutFile.txt", "custom1.format")
boolUpdate = objAmibroker.RefreshAll()
ELSE
IF VAL(SYS(2))> 84671
tt=3
application.StatusBar="Market closed"
WAIT TIMEOUT 10
appIE.quit
quit
ENDIF
ENDIF
LOOP
Enddo
Can you give a few more details on how to integrate amibroker with kite connect APIs
pushing the kite streaming data to Amibroker