同花顺抄底逃顶副图 源码

当满足条件顶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;