【通达信源码分享】精品指标公式－控盘力度源码

公式源码：

 

 VAR1:=AMOUNT/VOL/100;

 

 VAR2:=(3*HIGH+LOW+OPEN+2*CLOSE)/7;

 

 VAR3:=SUM(AMOUNT,40)/VAR1/100;

 

 VAR4:=SUM(AMOUNT,80)/VAR1/100;

 

 CYC40:=DMA(VAR2,VOL/VAR3);

 

 CYC80:=DMA(VAR2,VOL/VAR4);

 

 CYS40:=(CLOSE-CYC40)/CYC40*100;

 

 CYS80:=(CLOSE-CYC80)/CYC80*100;

 

 控盘:4,COLORYELLOW;

 

 警戒:=21,COLORBLUE;

 

 河:-5,COLORGREEN;

 

 湖:=-15,COLORCCFF33;

 

 STICKLINE(CYS80>0,0,CYS80,1,0),COLORYELLOW;

 

 STICKLINE(CYS80<=0,0,CYS80,1,0),COLORGREEN;

 

 STICKLINE(CYS40>0,0,CYS40,1,0),COLORRED;

 

 STICKLINE(CYS40<=0,0,CYS40,1,0),COLORFF9966;

 

 STICKLINE(CYS80>4,4,CYS80,1,0),COLORMAGENTA;