请教这个飞狐月MACD如何改成易得

whckin

ytj2:=month<>ref(month,1) or barpos=1;
VERTLINE(ytj2)POINTDOT,color666666;//////标记


ytj3:=refx(ytj2,1);
sp:=CLOSE;
start2:=BARPOS-BARSSINCE(ytj3);
Ydiff[start2[DATACOUNT]]:0;
Ydea[start2[DATACOUNT]]:0;
E1:=sp[start2[DATACOUNT]];
E2:=E1;
Mdiff:=E1-E2;
mdea:=0;
for i=start2[DATACOUNT]+1 to DATACOUNT do begin
IF ytj3[i] then begin
E1:=(2*sp[i]+11*E1)/13;
E2:=(2*sp[i]+25*E2)/27;
Mdiff:=E1-E2;
Mdea:=(2*Mdiff+8*Mdea)/10;
Ydiff[i]:=Mdiff ;
Ydea[i]:=Mdea ;
end else begin
Ydiff[i]:=(2*sp[i]+11*E1)/13-(2*sp[i]+25*E2)/27;
Ydea[i]:=(2*Ydiff[i]+8*Mdea)/10;
end;
end;//月MACD
macd:2*(ydiff-ydea),colorstick;
EMA(macd,200),colorblue;
PARTLINE(c>0,ydiff)colorffffff;
PARTLINE(c>0,ydea)color00ffff;

cheetor

代码看不懂 要不你配个图吧？兴许有人会呢？

whckin

cheetor 发表于 2025-2-21 16:44
代码看不懂 要不你配个图吧？兴许有人会呢？