三红进场（通达信公式 主图 选股 源码 测试图）

 三红进场

 

M3:MA(CLOSE,3),COLORRED,LINETHICK;

M13:MA(CLOSE,13),COLORRED,LINETHICK;

M34:MA(CLOSE,34),COLORRED,LINETHICK;

X:=BARSLAST(REF(CROSS(C,MA(C,120)),1)) AND CROSS(MA(C,20),MA(C,120));

IF(M34<REF(M34,1),M34,DRAWNULL),COLORGREEN,LINETHICK;

STICKLINE(M3>=M13 AND M34>=REF(M34,1) ,H ,L ,0 ,0 ),COLORRED;

STICKLINE(M3>=M13 AND M34>=REF(M34,1) AND C>=O ,O ,C ,3 ,1 ),COLORRED;

STICKLINE(M3>=M13 AND M34>=REF(M34,1) AND C<O ,O ,C ,3 ,0 ),COLORRED;

STICKLINE(M3<M13 AND M34>=REF(M34,1) ,H ,L ,0 ,0 ),COLORYELLOW;

STICKLINE(M3<M13 AND M34>=REF(M34,1) AND C>=O ,O ,C ,3 ,1 ),COLORYELLOW;

STICKLINE(M3<M13 AND M34>=REF(M34,1) AND C<O ,O ,C ,3 ,0 ),COLORYELLOW;

STICKLINE(M3<M13 AND M34<REF(M34,1) ,H ,L ,0 ,0 ),COLORGREEN;

STICKLINE(M3<M13 AND M34<REF(M34,1) AND C>=O ,O ,C ,3 ,1 ),COLORGREEN;

STICKLINE(M3<M13 AND M34<REF(M34,1) AND C<O ,O ,C ,3 ,0 ),COLORGREEN;

STICKLINE(M3>=M13 AND M34<REF(M34,1) ,H ,L ,0 ,0 ),COLORMAGENTA;

STICKLINE(M3>=M13 AND M34<REF(M34,1) AND C>=O ,O ,C ,3 ,1 ),COLORMAGENTA;

STICKLINE(M3>=M13 AND M34<REF(M34,1) AND C<O ,O ,C ,3 ,0 ),COLORMAGENTA;

DRAWTEXT(X,MA(C,120)-0.13,'牛股'),COLORRED,LINETHICK3;

MA50:MA(CLOSE,50),COLORYELLOW,LINETHICK2;

MA13:MA(CLOSE,13),COLORWHITE,LINETHICK2;

TY:=C;

HD:=FILTER(BACKSET(FILTER(REF(TY,10)=HHV(TY,2*10+1),10),10+1),10);

LD:=FILTER(BACKSET(FILTER(REF(TY,10)=LLV(TY,2*10+1),10),10+1),10); 

A:=REF(C,BARSLAST(HD));

B:=REF(C,BARSLAST(LD));

T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ;

T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);

一号线:IF(T1,A,A),COLORYELLOW,POINTDOT,LINETHICK4;

 STICKLINE(T1,A,A,9,0),COLORFF00FF;

二号线:IF(T2,B,B),COLOR80FF00,POINTDOT,LINETHICK4;

买线:=ZIG(3,10);

卖线:=MA(买线,2);

BU:=CROSS(买线,卖线);

SEL:=CROSS(卖线,买线);

DRAWTEXT(BU,L*0.99,'←进场'),LINETHICK2,COLOR00FFFF;

DRAWTEXT(SEL,H*1.0,'←清仓'),LINETHICK1,COLOR00FF00;

DRAWTEXT_FIX(CURRBARSCOUNT=1,0,0,0,DYBLOCK),COLORYELLOW;

DRAWTEXT_FIX(CURRBARSCOUNT=1,0,0.08,0,GNBLOCK),COLORYELLOW;

DRAWTEXT_FIX(CURRBARSCOUNT=1,0,0.14,0,FGBLOCK),COLORYELLOW;

20225241212799104.png