通达信六区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;