全局變量怎樣控制連續發單？
作者：開拓者 TB 來源：cxh99.com 發布時間：2016年04月07日
- 咨詢內容：
//------------------------------------------------------------------------
// 簡稱: 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聯機幫助的策略進階里的都有模板的，可以先參考一下。
打印本文
關閉窗口