MACD资金流向布林趋势K线（源码 通达信 主图 贴图）

MA5:MA(CLOSE,5);
AA:=MA((2*CLOSE+HIGH+LOW)/4,5);
DIF:=EMA(CLOSE,5)-EMA(CLOSE,34);
DEA:=EMA(DIF,5);
MA10:MA(CLOSE,10);
MA20:MA(CLOSE,20);
MA30:MA(CLOSE,30);
MA60:MA(C,60);MA120:MA(C,120);
通1:=AA*102/100;
通2:=AA*(200-102)/100;
量＿价:=1;
CTKG:=1;
W:=量＿价;
EPSL:=0.0001;
ZZ:=(C+H+L)/3;
STICKLINE(DIF<=DEA,CLOSE,OPEN,3,0),COLOR009900;
STICKLINE(DIF<=DEA,CLOSE,OPEN,2.2,0),COLOR00BB00;
STICKLINE(DIF<=DEA,CLOSE,OPEN,1.5,0),COLOR00DD00;
STICKLINE(DIF<=DEA,CLOSE,OPEN,0.5,0),COLOR00FF00;
STICKLINE(DIF>=DEA,CLOSE,OPEN,3,0),COLOR000099;
STICKLINE(DIF>=DEA,CLOSE,OPEN,2.2,0),COLOR0000CC;
STICKLINE(DIF>=DEA,CLOSE,OPEN,1.5,0),COLOR0000FF;
STICKLINE(DIF>=DEA,CLOSE,OPEN,0.5,0),COLORCC66FF;
V2V:=V/REF(V,1)>=1.9 AND C>REF(C,1);
TJA:=ZZ>=MAX(C,O) AND CTKG=1;
TJB:=ZZ<=MIN(C,O) AND CTKG=1;
ZF:=IF(TJA,1,IF(TJB,-1,0));
TJ0:=TJA OR TJB;
TJ1:=H=L AND C>REF(C,1);
TJ2:=H=L AND C TJ3:=H=L AND C=REF(C,1);
CC:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20);
DD:=DMA(CLOSE,CC);
STICKLINE(V2V,OPEN,CLOSE,0.5,0),COLORYELLOW;
ZT:=C/REF(C,1)>1.097;
量_价:=IF(W=1,VOL,AMOUNT),STICK,COLOREEFFEE;
EE:=IF(TJ1,EPSL,IF(TJ2,-EPSL,0));
ZL:=2*(H-L)+ABS(C-O)+3*IF(TJ3,EPSL,ABS(EE));
JGL_DX:=(IF(TJ0,2/3*(2*C-H-L)+ZF*ABS(C-O),(C-O))+EE)/ZL;
差:=(JGL_DX*量_价)/20000,COLOR13AADD,NODRAW;
DX:=JGL_DX*10