常見問題(Q&A)

怎麼知道群益 API 到底有沒有開通 ?

請上網「啟用」並開通 http://www.capital.com.tw/Service2/Download/api.asp

1.啟動策略王,若出現下圖的訊息視窗,才表示「開通成功」,但不一定能用,要上網「啟用」。

2.由策略王下單看看,若下單成功,才表示「憑証匯入成功」。

3.再來是檢查下單大師的設定:「身分証」、「分公司代碼」與「登入密碼」(不是憑証密碼)。

4.最後是「商品代碼與月份」。

5.以上都正確,才能下單成功。

6.記得防毒軟體、防火牆要開放喔 ~

群益 API 開通.png

 

 

有無 Excel 輸出文字檔範例 ?

Sub Export()

On Error Resume Next

Dim DestFile As String

Dim FileNum As Integer

Dim ColumnCount As Integer

Dim RowCount As Integer

FileNum = FreeFile()

DestFile = “C:\current.txt"

Open DestFile For Output As #FileNum

Print #FileNum, Cells(1, 1) & “" & Time & “," & Cells(1, 3) & “," & Cells(1, 4);

Close #FileNum

End Sub

把 Excel 接 DDE 報價,再把 Excel 本身當作 DDE 資料源,要如何寫 Excel  的 DDE 公式 ?

如果直接打 DDE 公式不穩定的話,可以利用 Excel 接 DDE 公式,再把 Excel 當作資料源,傳送給 DDE Server 和下單大師

原來方式:看盤軟體 –> DDE Server 和下單大師

轉送方式:看盤軟體 –> Excel –> DDE Server 和下單大師

在 DDE Server 和下單大師中,輸入 Excel 的 DDE 公式如下:Excel 檔案名稱為 MyDDE.xls

(1) Excel.exe|’MyDDE.xls!R2C3′    

// 第一頁的第 2 橫列(Row)第 3 直行(Col)  (欄位 C2) 

(2) Excel.exe|'[MyDDE.xls]Sheet3!R5C8′  

// 活頁名稱是 Sheet3 的第 5 橫列第 8 直行 (欄位 H5)

// 活頁名稱可用中文如:Excel.exe|'[MyDDE.xls]報價!R5C8′

 

請問建議的下單電腦配備 ?

1.光纖網路:不要用無線與Cable,會常常有網路「瞬斷」的問題,因部份API很敏感,極短時間的瞬斷,就會被登出。

2.其它就視個人需求,當然是電腦愈強愈好,裡面安裝的軟體愈少愈好。

3.若要定一標準,就是建議只單純安裝下單用到的軟體,且盤中運作時,CPU 使用率不可超過 40%

4.建議用 PC,不要用筆電,更加不要用小筆電,因為 CPU 若達到 100%,下單會卡住,當然現在的筆電也愈來愈強了,只要 CPU 不會跑到 100%,下單不會卡住,用筆電也是 ok 的。

 

可否提供奇狐的訊號輸出範例 ?

// 請注意:請先至「公告設定」之「一鍵搞定」中「註冊-萬用 API 元件」
// 訊號來源格式,請設為:Date Time Current Price
// 輸出文字檔範例 R:\curr.txt

M1:=MA(CLOSE,5);
M2:=MA(CLOSE,10);

M1:=ref(m1,1);
M2:=ref(m2,1);

BB:=CROSS(M1,M2); //買進訊號
SS:=CROSS(M2,M1); //賣出訊號

drawicon(BB,L-15,4); //畫買進訊號
drawicon(SS,H+15,5); //畫賣出訊號

DD:=barslast(DATE<>REF(DATE,1)); //開盤至今K線數
B1:=barslast(bb); //買訊至今K線數
B2:=barslast(ss); //賣訊至今K線數

PO:=if(B1<B2,’1′,’-1′); PO:=if((B1>DD and B2>DD) or OPENMINUTES(TIME)>=280 ,’0′,PO); ; //今未有訊號不交易, 1:25出場
curr := NUMTOSTR(YEAR,0) + ‘/’ +NUMTOSTR(MONTH,0)+ ‘/’+NUMTOSTR(DAY,0) + ‘ ‘+NUMTOSTR(HOUR,0)+’:’+NUMTOSTR(MINUTE,0)+’:00 ‘ +PO +’ ‘ + NUMTOSTR(C,0); //要輸出的字串

<% on error resume next Dim fso, MyFile curr = FFL.VarData(“curr") Set fso = CreateObject(“Scripting.FileSystemObject") Set MyFile= fso.CreateTextFile(“R:\curr.txt", True) MyFile.WriteLine(curr) MyFile.Close err.clear %>

 

IB 下單 API 上線

經過了千辛萬苦終於完成了IB的API串接,下單大師正式支援國外大型券商,邁向國際化的第一步,感謝各位用戶,為了大家的需求下單大師一定會努力!!

支援IBGateway。

請至下載專區下載"盈透-外掛程式套件.zip"內有最新手冊。

下單大師-用戶交流俱樂部成立 !

這是下單大師用戶交流的專屬社團 !
目前加入沒有條件,且任何人都可以貼文。

版規只有一個:

請勿張貼與下單大師無關的貼文 !

目前貼文暫不審核,請大家珍惜並遵守規定,一再違反者只好踢出社團,列入黑名單,謝謝大家配合。

請點選本站頁尾圖示加入 !