通达信龙头底部副图指标 源码 贴图

VAR0:=IF((HHV(ABS(((HHV(CLOSE,6)/LLV(CLOSE,6))-1)),6)>(10/100)),3,6);
VAR1:=IF((MINUTE=5),(VAR0*48),IF((MINUTE=15),(VAR0*16),IF((MINUTE=30),(VAR0*8),IF((MINUTE=60),(VAR0*4),VAR0))));
VAR2:=IF( VOL=0,MA(CLOSE,VAR1),((SUM(AMOUNT,VAR1)/SUM(VOL,VAR1))/100));
VAR3:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
VAR4:=3*EMA(VAR3,30)-2*EMA(EMA(VAR3,30),30);{公式网WWW.GPXIAZAI.COM}
VAR5:=EMA(VAR4,5)< 10 AND REF(C>O,1) AND H/C< 1.01 AND REF(C< O,2);
VAR6:=REF(C< O AND O/C>1.05,2) AND REF(C>O AND C/O< 1.03,1);
VAR7:=C>O AND C/REF(C,1)>1.03 AND REF(C< MA(C,5),1) AND C>MA(C,5) AND H=C;
VAR8:=CROSS(CLOSE,REF(VAR2,1)) AND VAR5 AND C/REF(C,1)>1.03;
VAR9:=REF(EVERY(OPEN>CLOSE,3),1) AND C>MA(C,5) AND C>MA(C,10) AND REF(O/C>1.05,1);
VAR10:=C>MA(C,20) AND REF(C< MA(C,5) AND C< MA(C,10) AND C< MA(C,20),1) AND REF(C=O,20);
龙头底部:=(VAR6 AND VAR7) OR VAR8 OR (VAR9 AND VAR10);
STICKLINE(龙头底部,0,90,3,0),COLORMAGENTA;
DRAWTEXT(龙头底部,80,' 龙头★底'),COLORYELLOW;