N:=21;
0,DOTLINE,COLORLIGRAY;
XO:=REF(O,(N+1)/2);
AO:=((HHV(REF(C,1),N)+HHV(O,N))/2-((LLV(REF(C,1),N)+LLV(O,N)))/2)/2;
KCO:=10*(ATAN((O-XO)/AO)/3.14+0.5);
KMO:=((KCO-EMA(KCO,7))*KCO+KCO);
XL:=REF(L,(N+1)/2);
AL:=(HHV(L,N)-LLV(L,N))/2;
KCL:=10*(ATAN((L-XL)/AL)/3.14+0.5);
KML:=((KCL-EMA(KCL,7))*KCL+KCL);
STICKLINE(KML>KMO,KMO,KML,2.5,0),COLORRED;
STICKLINE(KML>KMO,KMO,KML,0.6,0),COLORCC66FF;
STICKLINE(KML<KMO,KMO,KML,2.5,0),COLORFF6600;
STICKLINE(KML<KMO,KMO,KML,0.6,0),COLORFF9900;
A_M0:EMA(KML,1.57);
A_M1:EMA(A_M0,3.14),COLORGREEN;
A_M2:EMA(A_M1,6.89);
A_M3:EMA(A_M2,9.42);
变盘线:EMA(A_M3,12.56),COLORYELLOW,LINETHICK2;
压力线:MA(KML,20)+2*STD(KML,20),DOTLINE,COLORLIRED;
支撑线:MA(KML,21)-2.2*STD(KML,21),DOTLINE,COLORCYAN;
DRAWTEXT(CROSS(KML,0) AND A_M1<变盘线 AND KML<变盘线,0-0.8,'↖★'),COLORWHITE;
{
选股公式:
XL:=REF(L,(21+1)/2);
AL:=(HHV(L,21)-LLV(L,21))/2;
KCL:=10*(ATAN((L-XL)/AL)/3.14+0.5);
KML:=((KCL-EMA(KCL,7))*KCL+KCL);
A_M0:=EMA(KML,1.57);
A_M1:=EMA(A_M0,3.14);
A_M2:=EMA(A_M1,6.89);
A_M3:=EMA(A_M2,9.42);
变盘线:=EMA(A_M3,12.56);
XG:DRAWTEXT(CROSS(KML,0) AND A_M1<变盘线 AND KML<变盘线,0-0.8,'↖★');
}
爱 查股网 www.a ichagu.com