以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://222.73.7.161/bbs/index.asp)
--  公式模型编写问题提交  (http://222.73.7.161/bbs/list.asp?boardid=4)
----  请版主看下 南客的过滤指标金字塔怎么通过  (http://222.73.7.161/bbs/dispbbs.asp?boardid=4&id=3181)
--  作者：tj1abcd
--  发布时间：2010/10/10 17:10:15
--  请版主看下 南客的过滤指标金字塔怎么通过

//南客的过滤指标金字塔试验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的下界(最小下标)

 

 

 

请版主解决下 如何解决多个信号的过滤问题 谢谢

 
--  作者：wattwei
--  发布时间：2010/10/10 17:25:22
--  
lbound，setlbound目前金字塔不支持

你的指标没有使用setlbound，所以lbound的值应该缺省是0。将公式中的max({lbound}(tjb166),{lbound}(tjs166))直接用0替换，看看是否可行。
--  作者：tj1abcd
--  发布时间：2010/10/10 17:30:34
--  

直接用0替换 不能解决问题呀

 

现在是用 lbound 因无此函数而不行

省略这个函数 就出现 测试可以通过 却显示 :第13行，错误，数组越界操作 "

 

希望尽快增加 lbound函数

 

以上的过滤程序  是软件中 经常要用到的。。 

 
--  作者：admin
--  发布时间：2010/10/10 19:54:04
--  

http://www.weistock.com/bbs/dispbbs.asp?boardid=2&Id=2882&page=2

升级到最新版试试
--  作者：tj1abcd
--  发布时间：2010/10/11 15:02:51
--  
谢谢版主 在软件中增加了lbound函数