//南客的过滤指标金字塔试验1
日买开66:=c>ma(c,10) ;
日卖开66:=c<ma(c,10) ;
variable:b66=0;
tjb166:=(日卖开66 ); //初始买入条件
tjs166:=(日买开66 ) ; //初始卖出条件
tjb66:=0*close; //买入条件
tjs66:=tjb66; //卖出条件
for i=max({lbound}(tjb166),{lbound}(tjs166)) to datacount do begin
if b66=0 and tjb166[i] then begin
b66:=1;
tjb66[i]:=1;
end else
if b66=1 and tjs166[i] then begin
b66:=0; tjs66[i]:=1;
end;
end;
variable:bb66=0;
tjb1b66:=(日买开66); //开卖点
tjs1b66:=(日卖开66 ) ; //初始买平条件
tjbb66:=0*close; //买入条件
tjsb66:=tjbb66; //卖出条件
for i=max({lbound}(tjb1b66),{lbound}(tjs1b66)) to datacount do begin
if bb66=0 and tjb1b66[i] then begin
bb66:=1;
tjbb66[i]:=1;
end else
if bb66=1 and tjs1b66[i] then begin
bb66:=0; tjsb66[i]:=1;
end;
end;
dd5买:tjb66;
cc5买:tjs66;
dd5卖b:tjbb66;
cc5卖b:tjsb66;
以上指标过滤指标 很有作用
但金字塔测试可以通过 却显示 :第13行，错误，数组越界操作 " 导致暂不能通过
查了下 预估是 没有以下函数的原因
lbound
别名: 序列下界
所属类别: 常数函数 参数数量: 1
序列最小下标。
用法:
LBOUND(X)，返回序列X的下界(最小下标),即为第一个有效数据下标,若无有效数据返回0
可通过SETLBOUND(X,N)函数设置序列变量X的下界(最小下标)
请版主解决下 如何解决多个信号的过滤问题 谢谢
直接用0替换 不能解决问题呀
现在是用 lbound 因无此函数而不行
省略这个函数 就出现 测试可以通过 却显示 :第13行，错误，数组越界操作 "
希望尽快增加 lbound函数
以上的过滤程序 是软件中 经常要用到的。。