VBA實(shí)現(xiàn)價(jià)差K線繪制 [金字塔]
- 咨詢內(nèi)容:
本人菜鳥5月份新入手金字塔VBA,我想模擬做一個(gè)價(jià)差K線,
用VBA做價(jià)差K線思路是取兩個(gè)合約的歷史數(shù)據(jù)相扣減,整了老半天感覺這樣子好像錯(cuò)了。
getHistoryData獲取的歷史數(shù)據(jù)是歷史上交易數(shù)據(jù),不同合約的歷史交易數(shù)據(jù)時(shí)點(diǎn)是不一樣的,數(shù)據(jù)量也不一樣的吧?
自己一個(gè)人瞎整不知道我這樣子的思路是不是對(duì)的。麻煩各位大哥指點(diǎn)下了。應(yīng)該是取什么數(shù)據(jù)進(jìn)行二者的價(jià)差計(jì)算,或者有什么好的思路,謝謝;
假如用公式計(jì)算價(jià)差,這樣子好像沒辦法根據(jù)不通的品種動(dòng)態(tài)計(jì)算價(jià)差進(jìn)行K線顯示,只能每次維護(hù)吧?或者公式能傳入 String類型的參數(shù)?另外,繪制K線思路是不是對(duì)HistoryData對(duì)象設(shè)置相應(yīng)的數(shù)據(jù),然后再調(diào)用將它呈現(xiàn)出來呢?
eg:
for i = Count-1 to 0 step -1
'插入一個(gè)K線
call HistoryC.InsertAt(i+1)
'K線數(shù)據(jù)HistoryC.open(i+1) = mxopen
HistoryC.close(i+1) = mxclose
HistoryC.high(i+1) = mxhigh
HistoryC.low(i+1) = mxlow
HistoryC.date(i+1) = historyDate(Count-1-i)call HistoryC.SaveData(newStock,newMarket,0)
nextcall Application.ActivateFrameWithCode("Technic",newStock,newMarket,5)
call Technic.Refresh - 金字塔客服:
http://www.weistock.com/bbs/dispbbs.asp?boardid=5&Id=50621根據(jù)這個(gè)帖子的思路來試試
- 用戶回復(fù):
通常使用相同市場(chǎng)的1分鐘周期的合約來計(jì)算價(jià)差是沒啥問題的
如果你使用跨市場(chǎng)不同時(shí)區(qū)的數(shù)據(jù),就要考慮首先要將時(shí)間進(jìn)行轉(zhuǎn)換,對(duì)齊時(shí)間后再來計(jì)算,金字塔的跨品種跨周期數(shù)據(jù)調(diào)用會(huì)自動(dòng)對(duì)齊時(shí)間,但是VBA就需要你程序來自己對(duì)齊了
- 網(wǎng)友回復(fù):
謝謝,根據(jù)等價(jià)K線思路做出了自己的價(jià)差K線,但是,如何讓自己的價(jià)差K線根據(jù)實(shí)時(shí)行情進(jìn)行走動(dòng)呢,設(shè)置一個(gè)定時(shí)器,每隔1秒計(jì)算K線數(shù)據(jù)并且保存到價(jià)差K線的歷史數(shù)據(jù)中嗎?我的程序這樣子做一直沒有動(dòng)態(tài)刷新K線。對(duì)窗格進(jìn)行刷新也沒用。求解這是為何?
- 網(wǎng)友回復(fù): 一語驚醒夢(mèng)中人阿,非常感謝。那時(shí)間對(duì)齊是根據(jù)兩個(gè)History數(shù)據(jù)的時(shí)間進(jìn)行匹配吧。有沒有更好的建議呢。謝謝。
有思路,想編寫各種指標(biāo)公式,程序化交易模型,選股公式,預(yù)警公式的朋友
可聯(lián)系技術(shù)人員 QQ: 1145508240 進(jìn)行 有償 編寫!(不貴!點(diǎn)擊查看價(jià)格!)
相關(guān)文章
-
沒有相關(guān)內(nèi)容