同花顺抄底逃顶副图 源码
当满足条件顶A=50时，在45位置书写文字，画红色
当满足条件抄底=20时，在30位置书写文字，画红色
P1:=10;
P2 :=3;
80, POINTDOT,LINETHICK2;
20, POINTDOT,LINETHICK2;
VAR1:=LLV(LOW,P1);
VAR2:=HHV(HIGH,P1);
K: EMA((CLOSE-VAR1)/(VAR2-VAR1)*100,P2),colorred,LINETHICK2 , ;
D: EMA(0.667*REF(K,1)+0.333*K,3),COLORFFFF00,LINETHICK2 ,;
VARC:=SMA(ABS(L-REF(L,1)),3,1)/SMA(MAX(L-REF(L,1),0),3,1);
VARD:=EMA(IF(C< EMA(C,250),VARC*1000,VARC*10),3);
火焰山:EMA(IF(L<=LLV(L,30),VARD/2+HHV(VARD,30),0),3)/618;
STICKLINE(火焰山>100,0,火焰山*1.2,8,0);
STICKLINE(火焰山>100,0,火焰山,4,1);
抄底: IF(TROUGHBARS(2,5,1)=0 AND HIGH>LOW+0.01,20,0),coloryellow ,LINETHICK2 ;
VAR3:=PEAKBARS(3,15,1)<10;
VAR5:=IF(VAR3=1,2,0);
顶:= IF(VAR5=2,2,0);
顶A:IF(顶>REF(顶,1),45,0),colorblue,LINETHICK2;
DRAWTEXT(顶A=50,45,'逃顶'),colorred;
DRAWTEXT(抄底=20,30,'抄底'),colorred;
