类似这种数组循环处理的功能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个过程代码，循环十次要写十个过程代码？累死啦