数组的公式

我编了个公式想实时统计上涨家数。如下：
引用公式，{日线涨}

A:C>O;

统计用公式
BKNAME:='A股板块';
STKC:=STKCOUNT(BKNAME);
VARIABLE:S=0,ZFSZ[STKC]=0;
FOR P=1 TO STKC DO BEGIN
TY1:=STKFROMBLK(BKNAME,P);
TY2:=STKINDI(ty1,'日线涨.a',0,6);
END;
FOR P=1 TO STKC DO BEGIN
if ty2[p]>0 then
s:s+1;
END;

按照道理S的数字应该是上涨的家数，为什么显示指标组下标越界或者超出有效数字范围。
麻烦老师帮忙修改，能够实现该功能，谢谢了
 

 

上涨:0;
STKC:=STKCOUNT(BKNAME);
FOR P=1 TO STKC DO BEGIN
TY1:=STKFROMBLK(BKNAME,P);
TY2:=STKINDI(ty1,'日线涨.a',0,6);
TMP:=COUNT(ty2,1);
TMP:=TMP[datacount];
if TMP=1 then 上涨:=上涨+1;
END;
总家数:stkc;