麻烦帮我改一下这段for循环的代码

Storm

目的是统计最近10笔多头交易中的亏损笔数

VARIABLE:dkcp=0,dpcp=0;
maS:=ma(c,5);
ma20:=ma(c,20);

if cross(maS,ma20) and holding=0 then
begin
        buy(1,1,marketr);
        dkcp:=c;
END

if cross(ma20,maS) and holding>0 then
begin
        sell(1,1,marketr);
        dpcp:=c;
END


hold:=holding;
dcount:=0;
dsumLoss:=0;//统计最近10笔多头交易中的亏损笔数
for i=barpos downto 2 do
begin
        if hold[i]=0 and hold[i-1]>0 and dcount<10 then
        begin
                dcount:=dcount+1;
                if dpcp[i]<dkcp[i] then
                        dsumLoss:=dsumLoss+1;
        end
        else if dcount>=10 then
                break;               
END

x1:dcount,NODRAW;
x2:dsumLoss,NODRAW;//错误: 输出值始终为0

技术009

r1:dkcp;
r2:dpcp;
hold:=holding;
dcount:=0;
dsumloss:=0;//统计最近10笔多头交易中的亏损笔数
for i=barpos downto 2 do
begin
        if hold=0 and hold[i-1]>0 and dcount<10 then
        begin
                dcount:=dcount+1;
                if r2<r1 then
                        dsumloss:=dsumloss+1;
        end
        else if dcount>=10 then
                break;               
end

x1:dcount,nodraw;
x2:dsumloss,nodraw;//错误: 输出值始终为0


我们通常建议客户能不使用循环 就不使用循环。