全局變量怎樣控制連續發單? [開拓者 TB]
- 咨詢內容:
//------------------------------------------------------------------------
// 簡稱: 1spgpA0118b1to2kx
// 名稱:
// 類別: 公式應用
// 類型: 用戶應用
// 輸出:
//------------------------------------------------------------------------
Params
Numeric offSet(1); // 委托價格偏移,為了保證成交
Numeric BeforeMins(5); // 收盤前幾分鐘開始操作
Vars
Numeric HasSendOrderk1(0);//開倉1標志,初始值為0
Numeric HasSendOrderp11(0);//平倉1標志,初始值為0
Numeric HasSendOrderp12(0);//平倉2標志,初始值為0
Begin
bcon2=Time>=0.0902&&Time<=0.1456
;
If(date<20161230 )
{
{
If(BarStatus == 0)
{
HasSendOrderp11 = 0;
SetGlobalVar(11,HasSendOrderp11);
}Else
{
HasSendOrderp11 = GetGlobalVar(11);
}
If
( bcon1 &&
BarStatus == 2 &&
HasSendOrderk1 == 0&&
A_BuyPosition==0 )
{
A_SendOrder(Enum_Buy,Enum_Entry,2,Q_AskPrice+MinMove*PriceScale*2);
HasSendOrderk1 = 1;
SetGlobalVar(1,HasSendOrderk1);
}
If
(A_BuyPosition > 0&&
BarStatus == 2 &&
HasSendOrderp11 == 0&&
Q_BidPrice>=A_BuyAvgPrice+MinMove*PriceScale*2) //首次平多單
{
A_SendOrder(Enum_Sell,Enum_Exit,1,Q_BidPrice-MinMove*PriceScale*2);
HasSendOrderp11 = 1;
SetGlobalVar(11,HasSendOrderp11);
}
If
(A_BuyPosition > 0&&
BarStatus == 2 &&
HasSendOrderp12 == 0&&
Q_BidPrice>=A_BuyAvgPrice+MinMove*PriceScale*5) //二次平多單
{
A_SendOrder(Enum_Sell,Enum_Exit,1,Q_BidPrice-MinMove*PriceScale*2);
HasSendOrderp12 = 1;
SetGlobalVar(12,HasSendOrderp12);
HasSendOrderk1 = 0;
SetGlobalVar(1,HasSendOrderk1);
}
}
}
End
首次平倉仍然是連續發單,應該怎樣寫?請教老師 - TB技術人員: TB公式指南以及F1聯機幫助的策略進階里的都有模板的,可以先參考一下。
有思路,想編寫各種指標公式,程序化交易模型,選股公式,預警公式的朋友
可聯系技術人員 QQ: 511411198 進行 有償 編寫!(不貴!點擊查看價格!)
相關文章
-
沒有相關內容