類似這種數組循環處理的功能TB無法處理嗎？
作者：開拓者 TB 來源：cxh99.com 發布時間：2013年01月08日
- 咨詢內容： For i=2 To 7
{
If((Q_Last >= BuyPrice[i-1] + 0.5*N)&&(SendOrderBuy[i]==False)) // 如果超過設定的1/2N,循環加倉。
{
A_SendOrder(Enum_Buy,Enum_Entry,Units,Q_AskPrice+nOffSet*MinPoint);
BuyPrice[i]=Q_AskPrice+nOffSet*MinPoint;
SetGlobalVar(i,BuyPrice[i]);
SendOrderBuy[i] = True;
}
BuyPrice[i]=GetGlobalVar(i);
BuyStopLoss[i] = BuyPrice[i] - ATR[1] * InitialStopNumATR;
If(ChangeBuyStopLoss[i]==true) //判斷追蹤止損是否已啟動
{
BuyStopLoss[i]=GetGlobalVar(20+i);
}
If ((Q_Last-BuyStopLoss[i])>(ATR[1] * 2*TrailStopNumATR))
{
BuyStopLoss[i] = BuyStopLoss[i]+ATR[1] * TrailStopNumATR;
SetGlobalVar(20+i,BuyStopLoss[i]);
ChangeBuyStopLoss[i]=true;
}
If(Q_Last <= BuyStopLoss[i])
{
A_SendOrder(Enum_Sell,Enum_Exit,Units,Q_BidPrice-nOffSet*MinPoint);
BuyStoped[i] = True; // 止損后設置標志
}
}
- TB技術人員： 是不是只能把每一次的過程都要寫出來，循環5次寫5個過程代碼，循環十次要寫十個過程代碼？累死啦
打印本文
關閉窗口