通达信自用量能副图指标公式副图源码

X_1:=30;
 X_2:=10;
 X_3:=VOL/10000*CLOSE/100;
 X_4:=REF(CLOSE,1);
 X_5:=SUM(VOL,2)/((HHV(HIGH,2)-LLV(LOW,2))*100);
 X_6:=(CLOSE-X_4)*X_5;
 X_7:=SUM(X_6,0);
 X_8:=X_7;
 X_9:=MA(X_8,X_1);
 DRAWBAND(X_9,RGB(0,0,80),X_8,RGB(160,0,0));
 X_10:=REF(X_8,X_2)=HHV(X_8,2*X_2+1);
 X_11:=FILTER(X_10,X_2);
 X_12:=BACKSET(X_11,X_2+1);
 X_13:=FILTER(X_12,X_2);
 T线:REF(X_8,BARSLAST(X_13)),COLORWHITE,NODRAW;
 STICKLINE(CLOSE>0,T线,T线,6,0),COLORMAGENTA;
 JZOBV:X_8,COLORWHITE;
 MA30:MA(JZOBV,X_1),COLORYELLOW;
量线:HHV(X_7,0),LINETHICK2,COLORRED;

获利筹码:=CONST(WINNER(C)*100);
 SAT:=(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20));
量能饱和:=(IF(SAT>1,1,SAT)*100);
 LC1:=REF(CLOSE,1);
 WRSI:=SMA(MAX(CLOSE-LC1,0),5,1)/SMA(ABS(CLOSE-LC1),5,1)*100;
 WR10:=(HHV(HIGH,3)-CLOSE)/(HHV(HIGH,3)-LLV(LOW,3))*100;
活跃:=(WRSI-WR10);
活跃度比:=IF(活跃>=0,(活跃+100)/2,100-ABS((活跃-100)/2));
 DRAWTEXT_FIX(1,0.84,0.35,1,STRCAT(STRCAT('活跃度比： ',CON2STR(活跃度比,2)),'％')),COLORYELLOW;
 DRAWTEXT_FIX(1,0.94,0.15,1,STRCAT(STRCAT('量能饱和： ',CON2STR(量能饱和,2)),'％')),COLORYELLOW;
 DRAWTEXT_FIX(1,0.94,0.35,1,STRCAT(STRCAT('获利筹码： ',CON2STR(获利筹码,2)),'％')),COLORYELLOW;