小弟最近研究如何讓AB可以用下單大師自動下單,
以下是初步的成果,如果有興趣要用的人可能還需要針對所需的部份做一些修改,
但已經可以正常運作了,如果有更好的想法也請麻煩告知,謝謝。
使用上要注意的是在AB中now(0)這一個函數是要取得系統時間,
而所取得的系統時間的格式和系統上設定的時間相同,
除非用strformat()來指定輸出的格定,但我沒有處理這個部份,
而是直接在控制台-->地區及語言,把時間的設定改成我要的格式HH:mm:ss
另外在使用前還需在下單大師的目錄下執行RegOMCOM.bat這一個批次檔(注意不是RegOMCOM.exe)
才可正常使用,較詳細的資訊請參考:
http://coco-in.net/viewthread.php?tid=6624&extra=page%3D1
以下是程式碼:
- OMComAPI = CreateStaticObject("OMSignAPI.OMCOMAPI");
- OMComAPI.IniDllAndPosition("FTX", 0);
- up=Cross(MA(C,20),MA(C,50));
- down=Cross(MA(C,50),MA(C,20));
- Buy = up;
- Sell = down;
- Buy =ExRem(Buy,Sell);
- Sell=ExRem(Sell,Buy);
- if (Buy[BarCount-1]==True)
- {
- NowDateTime=Now(0);
- NowPosition = 1;
- NowClose=LastValue(Close);
- OMComAPI.GoOrder("FTX","","NowDateTime",Nowposition,Nowclose);
- }
- if (Sell[BarCount-1]==True)
- {
- NowDateTime=Now(0);
- NowPosition = 0;
- NowClose=LastValue(Close);
- OMComAPI.GoOrder("FTX","","NowDateTime",NowPosition,NowClose);
- }
- Plot(MA(C,20),"MA20",colorRed,styleLine);
- Plot(MA(C,50),"MA50",colorBlue,styleLine);
- PlotShapes(IIf(Buy , shapeSmallUpTriangle, shapeNone) ,colorYellow, 0,L,-
- 50);
- PlotShapes(IIf( Sell, shapeSmallDownTriangle, shapeNone) ,colorBlue, 0,H,-
- 45);
- _SECTION_BEGIN("Price");
- SetChartOptions(0,chartShowArrows|chartShowDates);
- _N(Title = StrFormat("{{NAME}} - {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo
- %g, Close %g (%.1f%%) {{VALUES}}", O, H, L, C, SelectedValue( ROC( C, 1 ) )
- ));
- Plot( C, "Close", IIf( C > O, ParamColor("Up Color", colorRed ),
- ParamColor("Down Color", colorGreen ) )
- , styleNoTitle | ParamStyle("Style") | GetPriceStyle() );
- _SECTION_END();
複製代碼 |