机构能量线

源码：

{机构能量线}
VAR22:=(HHV(HIGH,21)-CLOSE)/(HHV(HIGH,21)-LLV(LOW,21))*100;
做空线: SMA(VAR22,3,1),LINETHICK1,COLORGREEN;
 VAR23:=(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100;
做多线: SMA(VAR23,5,1)-8,LINETHICK1,COLORRED;
安全:15,COLORBLUE;
 VAR1:=1;
 VAR3:=MA(CLOSE,13);
 VAR4:=100-ABS((CLOSE-VAR3)/VAR3*100);
 VAR5:=LLV(LOW,75);
 VAR6:=HHV(HIGH,75);
 VAR7:=(VAR6-VAR5)/100;
 VAR8:=SMA((CLOSE-VAR5)/VAR7,20,1);
 VAR9:=SMA((OPEN-VAR5)/VAR7,20,1);
 VARA:=3*VAR8-2*SMA(VAR8,15,1);
 VARB:=3*VAR9-2*SMA(VAR9,15,1);
 VARC:=100-VARB;
主力趋势: (100-VARA)*VAR1,COLOR0099FF,NODRAW;
 VARD:=主力趋势>VAR4;
 VARE:=REF(LOW,1)*0.9;
 VARF:=LOW*0.9;
 VAR11:=EMA(VARF,30);
 VAR12:=CLOSE-REF(CLOSE,1);
 VAR13:=MAX(VAR12,0);
 VAR14:=ABS(VAR12);
 VAR15:=SMA(VAR13,7,1)/SMA(VAR14,7,1)*100;
 VAR16:=SMA(VAR13,13,1)/SMA(VAR14,13,1)*100;
 VAR17:=BARSCOUNT(CLOSE);
 VAR18:=SMA(MAX(VAR12,0),6,1)/SMA(ABS(VAR12),6,1)*100;
 VAR19:=(-200)*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60))+100;
 VAR1A:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;
 VAR1B:=SMA((SMA(VAR1A,4,1)-50)*2,3,1);
 VAR1C:=(INDEXC-LLV(INDEXL,14))/(HHV(INDEXH,14)-LLV(INDEXL,14))*100;
 VAR1D:=SMA(VAR1C,4,1);
 VAR1E:=SMA(VAR1D,3,1);
 VAR1F:=(HHV(HIGH,30)-CLOSE)/CLOSE*100;
 VAR20:=VAR18<=25 AND VAR19<-95 AND VAR1F>20 AND VAR1B<-30 AND VAR1E<30 AND VAR11-CLOSE>=-0.25 AND VAR15<22 AND VAR16<28 AND VAR17>50;
 STICKLINE(VARD,VAR4,主力趋势,1,0),COLOR0099FF,NODRAW;
 STICKLINE(VAR20,0,80,1,0),COLORRED,LINETHICK3 ;
主力做顶轴线:0,COLORCYAN ,LINETHICK2,NODRAW ;
中线轴: 15,COLORWHITE ,LINETHICK2,NODRAW ;
买:=IF("KDJ.J"<0,10,0);
条件1:=CROSS(9.5,买);
VVAR1:=(2*CLOSE+HIGH+LOW)/4;
 VVAR2:=LLV(LOW,7);
 VVAR3:=HHV(HIGH,7);
 VVAR4:=EMA((VVAR1-VVAR2)/(VVAR3-VVAR2)*100,5);
 MA1:=MA(VVAR4,2);
 AA:STICKLINE(VVAR4>MA1,VVAR4,MA1,6,1),COLORRED,NODRAW;
 BBB:STICKLINE(VVAR4>MA1 AND REF(VVAR4,1)<30,VVAR4,MA1,6,1),COLORRED,NODRAW;
 STICKLINE(VVAR4<=MA1,VVAR4,MA1,6,1),COLORLIBLUE,NODRAW;
 DRAWICON(CROSS(9.9,买),VVAR4-12,17);
 STICKLINE(CROSS(9.9,买),VVAR4+5,MA1-4,6,1),COLORLIBLUE,NODRAW;
 DRAWICON(CROSS(9.9,买),VVAR4-12,17);
 XXX:STICKLINE(VVAR4>MA1 AND REF(VVAR4,1)<30,VVAR4+5,MA1-4,6,1),COLORLIRED,NODRAW;