VARIABLE:holdate[38]:=0;
holdate[1]:=1110201;
holdate[2]:=1110209;
holdate[3]:=1110930;
....
dcutcon4:=0;
hold:=holding;
for j=1 to 38 do
begin
if holdate[j]=date and hold[barpos]>1 then
begin
dcutcon4[barpos]=1;
BREAK;
end;
end;
x1:dcutcon4,NODRAW;
x1始终等于0,无法满足条件
这种写法等同于在序列变量方向上增加纵向维度计算。在金字塔的序列变量处理上,除了影响执行效率外,没有一点实际意义。
dcutcon4[barpos]:=1;