通达信均线速度选股指标公式源码

通达信均线速度选股指标公式源码

源码正文：

P1:=5;P2:=30{XG51};
A1:=ma(CLOSE,P1);A2:=REF(A1,1);J1:(A1-A2)/A2*100;MJ1:MA(J1,3){XG51};
A3:=MA(CLOSE,P2);A4:=REF(A3,1);J2:(A3-A4)/A4*100;MJ2:=MA(J2,10){XG51};
A5:=MA(C,10);A6:=REF(A5,1){XG51};
J3:=(A5-A6)/A6*100;MJ3:=MA(J3,5){XG51};
向上拐点:IF(COUNT(crOSS(J1,0),3)>=1 AND MJ1>MJ3 AND MJ3>REF(MJ3,1) AND J3>=0 AND J1>REF(J1,1),5,0) ,COLORWHITE,LINETHICK2{XG51};
向下拐点:IF(CROSS(0,J1)>=1 AND MJ3<REF(MJ3,1) AND MJ2<REF(MJ2,2) AND MJ3<MJ2,-5,0),COLORCYAN,LINETHICK2{XG51};
0,COLORRED{XG51};
stICKLINE(J1>0 AND J2>0,J1,0,2,0),COLORWHITE{XG51};
STICKLINE(J1<0 AND J2>0,0,J1,2,0),COLORBLUE{XG51};
STICKLINE(J1>0 AND J2<0,J1,0,2,0),COLORLIMAGENTA{XG51};
STICKLINE(J1<0 AND J2<0,0,J1,2,0),COLORCYAN{XG51};
DRAWICON(CROSS(J1,MJ1) AND COUNT(MJ1<-3,3)>=1 ,J1*1.5,1){XG51};
DRAWICON(CROSS(MJ1,J1) AND COUNT(MJ1>3,3)>=1,J1*1.8,2){XG51};
选股:IF(CROSS(J1,MJ1) AND  COUNT(MJ1<-2,3)>=1,2,0),COLORBLUE,LINETHICK2{XG51};
B1:=BArslAST(REF(CROSS(J1,MJ1) AND MJ1<0,1)){XG51};
底背离:=REF(CLOSE,B1+1)>CLOSE AND J1>REF(J1,B1+1) AND CROSS(J1,MJ1){XG51};
DRAWLINE(B1=0,MJ1,底背离,MJ1,0),COLORWHITE,LINETHICK3{XG51};
B2:=BARSLAST(REF(CROSS(MJ1,J1) AND MJ2>0,1)){XG51};
顶背离:=REF(CLOSE,B2+1)<CLOSE AND REF(MJ1,B2+1)>J1 AND CROSS(MJ1,J1){XG51};
DRAWLINE(B2=0,MJ1,顶背离,MJ1,0),COLORRED,LINETHICK2{X~G~5=1~C~N~{};