|
以下是通达信六区DK副图源码贴图（无源码的请下载附件导入）
N:=9;
重心:=IF(C>(H+L+C)/3,(H*0.618+L*0.382)*0.382,(H*0.382+L*0.618)*0.382)+(O+C)/2*0.618;
均价:=AMOUNT/(VOL*100);
折价:=if(INDEXC=C,(重心+2*c)/3,(重心+均价+C)/3);
MA8:=ema(Dma(折价,(sum(VOL,n/5)/(SUM(AMOUNT,n)/(MA(均价,n)*100)))),n/3);
MB8:=ema(Dma(折价,(sum(VOL,n/4)/(SUM(AMOUNT,n)/(MA(均价,n)*100)))),n/3);
MC8:=ema(Dma(折价,(sum(v,n/3)/(SUM(AMOUNT,n)/(MA(均价,n)*100)))),n/3);
MD8:=ema(Dma(折价,(sum(v,n/2)/(SUM(AMOUNT,n)/(MA(均价,n)*100)))),n/3);
M8:=(MA8+MB8+MC8+MD8)/4;
lA8:=ema(Dma(l,(sum(VOL,n/5)/(SUM(AMOUNT,n)/(MA(均价,n)*100)))),n);
lB8:=ema(Dma(l,(sum(VOL,n/4)/(SUM(AMOUNT,n)/(MA(均价,n)*100)))),n);
lC8:=ema(Dma(l,(sum(v,n/3)/(SUM(AMOUNT,n)/(MA(均价,n)*100)))),n);
lD8:=ema(Dma(l,(sum(v,n/2)/(SUM(AMOUNT,n)/(MA(均价,n)*100)))),n);
l8:=(lA8+lB8+lC8+lD8)/4;
hA8:=ema(Dma(H,(sum(VOL,n/5)/(SUM(AMOUNT,n)/(MA(均价,n)*100)))),n);
HB8:=ema(Dma(H,(sum(VOL,n/4)/(SUM(AMOUNT,n)/(MA(均价,n)*100)))),n);
HC8:=ema(Dma(H,(sum(v,n/3)/(SUM(AMOUNT,n)/(MA(均价,n)*100)))),n);
HD8:=ema(Dma(H,(sum(v,n/2)/(SUM(AMOUNT,n)/(MA(均价,n)*100)))),n);
H8:=(HA8+HB8+HC8+HD8)/4;
D:(M8-L8)/(H8-L8)*100,COLOR00CCCC;
M3:EMA(D,3),COLORFF0080;
K:(H8-M8)/(H8-L8)*100,COLORAAAA00;
界:50,COLORWHITE;加仓:90,COLORRED,DOTLINE;超买:135,COLORGRAY,DOTLINE;顶:180,COLORRED;清仓:10,COLOR00bb00,DOTLINE;超卖:-35,COLORGRAY,DOTLINE;底:-80,COLOR00bb00;
626588147.jpg
|
