同花顺紫薇花开副图源码

吕线上穿蓝线，出现“紫薇花开”文字提示关注。

VAR1:=EMA(EMA(CLOSE,13),13);
 KP:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;
 D:=CROSS(KP,0);
 KSKP:=KP>REF(KP,1) AND KP>0;
 A:=(C*2+H+L+O)/5;
 B:=(A+REF(A,1))/2;
 D:=(A+REF(A,1)+REF(A,2))/3;
紫薇现世:EMA(B,6),COLOR00FF00;
紫薇送福:EMA(D,28),COLORFF0000;
 STICKLINE(紫薇送福,紫薇现世,紫薇送福,5,1),colormagenta;
 STICKLINE(紫薇送福>紫薇现世,紫薇现世,紫薇送福,5,1),coloryellow;
 DRAWTEXT(CROSS(紫薇现世,紫薇送福) AND KSKP,LOW*1.095,'紫薇花开'),colorred,Linethick3;
 VAR3:=PEAKBARS(3,15,1)<10;
 VAR5:=IF(VAR3=1,2,0);
顶:= IF(VAR5=2,2,0);
顶A:=顶>REF(顶,1);
 DRAWTEXT(顶A,LOW*1.095,'★'),coloreeff99;