通达信〖成交量异动〗按K线实体、影线、涨跌幅计算波动强度公式源码

低位:1.56,COLORYELLOW;
启动:3,COLORRED;
爆发:6,DOTLINE,COLORMAGENTA;
VAR4:=IF(CLOSE<=OPEN,CLOSE,OPEN);
VAR5:=(VAR4-LOW)/LOW*100;
VAR6:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100;
VAR7:=(OPEN-REF(CLOSE,1))/REF(CLOSE,1)*100;
VAR8:=(CLOSE-OPEN)/OPEN*100;
VAR9:=IF(CLOSE>=OPEN,CLOSE,OPEN);
VAR10:=(HIGH-VAR9)/VAR9*100;
VAR13:=VAR8+VAR10;
VAR14:=VAR8+VAR5;
VAR15:=VAR10+VAR5;
VAR18:=MAX(MAX(MAX(MAX(MAX(MAX(VAR15,VAR6),VAR14),VAR13),VAR5),VAR10),VAR7)*1.2;
STICKLINE(VAR18>=3,VAR18, 3,2,0),COLORYELLOW;
STICKLINE(VAR18>=3,3,0,2,0),COLORRED;
STICKLINE(VAR18>=1.56 AND VAR18< 3 AND VAR8>=0,VAR18,0,2,1),COLORRED;
STICKLINE(VAR18>=1.56 AND VAR18< 3 AND VAR8< 0,VAR18,0,2,1),COLORGREEN;
STICKLINE(VAR18< 1.56 AND VAR8>=0,0,VAR18,2,1),COLORWHITE;
STICKLINE(VAR18< 1.56 AND VAR8< 0,0,VAR18,2,0),COLORGREEN;
涨幅:=(C-REF(C,1))/REF(C,1)*100;
五涨:=(C-REF(C,5))/REF(C,5)*100;
四涨:=(C-REF(C,4))/REF(C,4)*100;
四高:=(H-REF(C,4))/REF(C,4)*100;
三高:=(H-REF(C,3))/REF(C,3)*100;
牛势1:=(五涨>=25 OR 四涨>=23 OR 三高>=23) AND COUNT(C=H AND 涨幅>=9.9 AND H>L*1.03,3)>=2;
牛势:=COUNT(牛势1>0,10)==1 AND 牛势1>0;
DRAWTEXT(牛势,5,'↖牛'),COLORMAGENTA;