最新消息

[公告2014/05/30] 如有需要將部落格中,任何一篇文章的程式碼使用在商業用途,請與我聯繫。

[公告2015/04/26] Line版的 iInfo程式與投資應用 群組已上線想加入的朋友們,請先查看 "入群須知" 再與我聯繫 Line : aminwhite5168,加入請告知身分與回答 "入群須知" 的問題。

[公告2018/04/22] 台北 Python + Excel VBA 金融資訊爬蟲課程,課程如網頁內容 金融資訊爬蟲班:台北班 Python 金融資訊爬蟲、EXCEL VBA 金融資訊爬蟲

[公告2019/01/08] 請注意:我再次重申,部落格文章的程式碼,是要提供各位參考與學習,一旦網頁改版請自行修改,別要求東要求西要我主動修改,你們用我寫東西賺錢了、交差了,請問有分我一杯羹嗎?既然賺錢沒分我,請問有什麼理由要求我修改,如果沒能力改,就花錢來找我上課。

[公告2019/12/01] 若各位有 Excel VBA 案子開發需求,歡迎與我聯繫,可接案處理。

[公告2020/05/22] 頁面載入速度慢,起因為部分JS來源(alexgorbatchev.com)失效導致頁面載入變慢,目前已做調整,請多見諒。

2016年6月30日 星期四

MultiCharts 與 Excel 畫冰火能量圖 (8)

前面寫了一系列的冰火能量圖都是以Multicharts為主,接下來筆者就來介紹以Excel VBA的冰火能量圖,這一系列的冰火能量圖的用法寫完後,可能會讓這個方法失效,大家就低調點,千萬! 千萬! 不要告訴你的爸爸、媽媽、叔叔、伯伯、阿姨、阿公、阿媽、鄰居、及親朋友好們,以下說明僅供教學使用,請勿做為投資之依據,投資盈虧一概不負責。
坊間的看盤軟體中,可以使用DDE與RTD將盤中即時的訊號抓出來,以HTS的看盤軟體主要是以DDE為主,少部分已RTD為主,今天將介紹已RTD的訊號為主,大家可以參考看看。
筆者用嘉實資訊提供的  XQ操盤高手  來製作冰火能量圖,其實有不少的券商也都採用XQ系統,大家有興趣的可以自行研究。

Step 1.下載安裝  XQ操盤高手

Step 2. 點選「功能」、「輸出到Excel」。

Step 3. 選擇商品。

Step 4. 選擇欄位,並且選擇右下角「儲存格只記錄單一欄位公式」,並選擇「RTD伺服器」。

Step 5. 選擇完所需欄位後,點選「完成」,公式隨即輸出到Excel 。

以下RTD語法從  XQ操盤高手  節錄出來,請各位自行參考:
代碼=RTD("xqrtd.rtdserverxqlite",,"FITX07.TF-ID")
商品=RTD("xqrtd.rtdserverxqlite",,"FITX07.TF-Name")
交易日期=RTD("xqrtd.rtdserverxqlite",,"FITX07.TF-TradingDate")
時間=RTD("xqrtd.rtdserverxqlite",,"FITX07.TF-Time")
成交=RTD("xqrtd.rtdserverxqlite",,"FITX07.TF-Price")
開盤=RTD("xqrtd.rtdserverxqlite",,"FITX07.TF-Open")
最高=RTD("xqrtd.rtdserverxqlite",,"FITX07.TF-High")
最低=RTD("xqrtd.rtdserverxqlite",,"FITX07.TF-Low")
累委買筆=RTD("xqrtd.rtdserverxqlite",,"FITX07.TF-NWTotalBidSize")
累委賣筆=RTD("xqrtd.rtdserverxqlite",,"FITX07.TF-NWTotalAskSize")
累計委買量=RTD("xqrtd.rtdserverxqlite",,"FITX07.TF-NWTotalBidContract")
累計委賣量=RTD("xqrtd.rtdserverxqlite",,"FITX07.TF-NWTotalAskContract")
累買成筆=RTD("xqrtd.rtdserverxqlite",,"FITX07.TF-TotalBidMatchTx")
累賣成筆=RTD("xqrtd.rtdserverxqlite",,"FITX07.TF-TotalAskMatchTx")
內盤=RTD("xqrtd.rtdserverxqlite",,"FITX07.TF-InSize")
外盤=RTD("xqrtd.rtdserverxqlite",,"FITX07.TF-OutSize")
委買一=RTD("xqrtd.rtdserverxqlite",,"FITX07.TF-BestBidSize1")
委買二=RTD("xqrtd.rtdserverxqlite",,"FITX07.TF-BestBidSize2")
委買三=RTD("xqrtd.rtdserverxqlite",,"FITX07.TF-BestBidSize3")
委買四=RTD("xqrtd.rtdserverxqlite",,"FITX07.TF-BestBidSize4")
委買五=RTD("xqrtd.rtdserverxqlite",,"FITX07.TF-BestBidSize5")
委賣一=RTD("xqrtd.rtdserverxqlite",,"FITX07.TF-BestAskSize1")
委賣二=RTD("xqrtd.rtdserverxqlite",,"FITX07.TF-BestAskSize2")
委賣三=RTD("xqrtd.rtdserverxqlite",,"FITX07.TF-BestAskSize3")
委賣四=RTD("xqrtd.rtdserverxqlite",,"FITX07.TF-BestAskSize4")
委賣五=RTD("xqrtd.rtdserverxqlite",,"FITX07.TF-BestAskSize5")

以下DDE語法從  XQ操盤高手  節錄出來,請各位自行參考:
代碼=XQLITE|Quote!'FITX07.TF-ID'
商品=XQLITE|Quote!'FITX07.TF-Name'
交易日期=XQLITE|Quote!'FITX07.TF-TradingDate'
時間=XQLITE|Quote!'FITX07.TF-Time'
成交=XQLITE|Quote!'FITX07.TF-Price'
開盤=XQLITE|Quote!'FITX07.TF-Open'
最高=XQLITE|Quote!'FITX07.TF-High'
最低=XQLITE|Quote!'FITX07.TF-Low'
累委買筆=XQLITE|Quote!'FITX07.TF-NWTotalBidSize'
累委賣筆=XQLITE|Quote!'FITX07.TF-NWTotalAskSize'
累計委買量=XQLITE|Quote!'FITX07.TF-NWTotalBidContract'
累計委賣量=XQLITE|Quote!'FITX07.TF-NWTotalAskContract'
累買成筆=XQLITE|Quote!'FITX07.TF-TotalBidMatchTx'
累賣成筆=XQLITE|Quote!'FITX07.TF-TotalAskMatchTx'
內盤=XQLITE|Quote!'FITX07.TF-InSize'
外盤=XQLITE|Quote!'FITX07.TF-OutSize'
委買一=XQLITE|Quote!'FITX07.TF-BestBidSize1'
委買二=XQLITE|Quote!'FITX07.TF-BestBidSize2'
委買三=XQLITE|Quote!'FITX07.TF-BestBidSize3'
委買四=XQLITE|Quote!'FITX07.TF-BestBidSize4'
委買五=XQLITE|Quote!'FITX07.TF-BestBidSize5'
委賣一=XQLITE|Quote!'FITX07.TF-BestAskSize1'
委賣二=XQLITE|Quote!'FITX07.TF-BestAskSize2'
委賣三=XQLITE|Quote!'FITX07.TF-BestAskSize3'
委賣四=XQLITE|Quote!'FITX07.TF-BestAskSize4'
委賣五=XQLITE|Quote!'FITX07.TF-BestAskSize5'

要使用DDE或RTD抓資料,兩者語法很相似,請各位自行決定。
這裡須請讀者註意,嘉實資訊證實RTD不支援Office 64位元,也就是Excel 64位元的版本,所以請各位自行使用Office 32位元(Excel 32位元版本)   <==這些是中文字,再看不懂請回去重念國小

接下來就使用上面的項目來做以下計算:
市場多空:累(總)賣成筆- 累(總)買成筆。
大戶走向:累(總)委買量- 累(總)委賣量。
散戶走向:累(總)委買筆- 累(總)委賣筆。
買賣力差:累(總)委買量/ 累(總)委買筆- 累(總)委賣量/ 累(總)委賣筆。
內外盤比:內盤- 外盤。

買(B)賣(A)
市場-買成筆(TB)+賣成筆(TA)
大戶+委買量(BV)-委賣量(AV)
散戶+委買筆(BO)-委賣筆(AO)


將以上內容做成如下功能的Excel。

最後執行結果。

採用嘉實XQ系統的券商,有需要的朋友可至各券商官網下載
康和:金好康
凱基:全球理財王
富邦:富邦e01
永豐:好神通
群益:超級贏家
日盛:日盛XQ

其他家券商系統
康和:全都賺
永豐:eLeader
元大:EasyWin

延伸閱讀