主题：DMA日线上显示周线的代码错在哪里呢[求助]

DMA源码如下:

DMA(C,VOL/CAPITAL);

以下为自已写的想在日线上无引用显示周线的代码

不知错在哪里 请朋友指教 谢谢先

wtj1:=datediff(ref(date,1),date)<>weekday-ref(weekday,1) or barpos=1;
wtj:=refx(wtj1,1) or weekday=5;  //周末标记

Y:=O*CLOSE;

FC:=CLOSE;

start:=barpos-barssince(wtj);

 WY:=0;

Y1:=fc[start[datacount]];

 for i=start[datacount]+1 to datacount do begin

     zts:=barslast(wtj1)+1;

 if wtj[i] then begin

     Y1:=(1-sum(vol,zts)/capital)*Y1+sum(vol,zts)/capital*FC[i];

     WY:=Y1;

     Y[i]=WY;

end else begin

     Y1:=(1-sum(vol,zts)/capital)*WY+sum(vol,zts)/capital*FC[i];

     Y[i]=Y1;

 end

end

ZX:Y;

前面两句,一周第一天和周末的判断,没什么问题.

 

楼主直接说说想要达到什么效果,看看能否实现

无引用日线上显示周线....谢谢先

不是回答过一次类似的问题了？方法类似呀

没有见过叠代咋个处理

又看了下南客老师的周线无引用KDJ 更改了下 OK了 谢谢朋友们 wtj1:=datediff(ref(date,1),date)<>weekday-ref(weekday,1) or barpos=1; wtj:=refx(wtj1,1) or weekday=5; //周末标记 zts:=barslast(wtj1)+1; Y:=O*CLOSE; FC:=CLOSE; start:=barpos-barssince(wtj); Y1:=fc[start[datacount]]; WY:=Y1; VS:=SUM(VOL,ZTS)/CAPITAL; for i=start[datacount]+1 to datacount do begin if wtj[i] then begin Y1:=(1-VS[i])*Y1+VS[i]*FC[i]; WY:=Y1; Y[i]:=WY; end else begin Y[i]:=(1-VS[i])*WY+VS[i]*FC[i]; end end ZX:Y;

论坛不能发贴 有点不好......