主题：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;