麻烦看一下下面的代码 这是我为了测试金字塔写的,在飞狐上可以按我的想法实现,但是在金字塔中无法实现。
LC := REF(CLOSE,1);
RSI14:=SMA(MAX(CLOSE-LC,0),14,1)/SMA(ABS(CLOSE-LC),14,1)*100;
//rsi的公式,取参数为14.
cc:=c;
aa:0*c;
//IF NOT(ISLASTBAR) THEN EXIT; //测试过用和不用结果一样,只是速度区别?
for i = 20 to datacount-1 do
begin
if cc[i]>cc[i-1] and cc[i]>cc[i+1] then //首先找一个收盘价高点
begin
for k=2 to 9 do
begin
if rsi14[i-k]>rsi14[i] then
begin
break;
end;
if cc[i-k]>cc[i-k-1] and cc[i-k]>cc[i-k+1] and cc[i-k] > cc[i] then
//然后再往前找最近的一个高点,如果当天的收盘价比第一次找到的高点的收盘价高,同时由于上面的语句保证rsi低,那么对第一个高点的aa进行赋值。
//如果不满足收盘价高的条件则继续往前找,直到满足条件赋值,或者达到9停止为止。
begin
aa[i]:=k;
break;
end;
end;
end;
end;
这个问题是我第一个帖子中提出的问题的一个案例,请指出错误的地方,或者帮忙改成金字塔中可以实现的代码,谢谢