通达信四线抓牛主图选股指标公式源码

通达信四线抓牛主图选股指标公式源码

源码正文：

ma5:MA(CLOSE,5){XG51};
A:=ema((EMA(CLOSE,19)+EMA(CLOSE,20)+EMA(CLOSE,21))/3,3),COLORBLUE{XG51};
轴线:EMA(A,3)COLORRED{XG51};
AA:=EMA((EMA(C,1)+EMA(C,3)+EMA(C,5))/3,3),COLORRED{XG51};
AAA:EMA(EMA(EMA(AA,1),2),3){XG51};
BB:=EMA((EMA(C,19)+EMA(C,20)+EMA(C,21))/3,3){XG51};
CC:=BB-(AA-BB){XG51};
CCC:EMA(EMA(EMA(CC,1),2),3){XG51};
开口值1:=HHV(AA,1)/LLV(CC,1)*100-100,NODRAW{XG51};
起:EMA(开口值1,5),NODRAW{XG51};
DRAWBAND(MA5,RGB(200,10,20),AAA,RGB(100,100,200)){XG51};
MA5M:MA(CLOSE,5){XG51};
IF( AAA<轴线 AND AAA>REF(AAA,1),AAA,DRAWNULL),COLORLIMAGENTA,LINETHICK3{XG51};
IF(  AAA>轴线 AND AAA>REF(AAA,1),AAA,DRAWNULL),COLORWHITE,LINETHICK4{XG51};
IF(  AAA>轴线 AND AAA<REF(AAA,1),AAA,DRAWNULL),COLORBLUE,LINETHICK2{XG51};
IF(  AAA<轴线 AND AAA<REF(AAA,1),AAA,DRAWNULL),COLORLIGREEN,LINETHICK2{XG51};
IF(  CCC<轴线 AND CCC>REF(CCC,1),CCC,DRAWNULL),COLORLIGREEN,LINETHICK2{XG51};
IF(  CCC>轴线 AND CCC>REF(CCC,1),CCC,DRAWNULL),COLORBLUE,LINETHICK2{XG51};
IF(  CCC>轴线 AND CCC<REF(CCC,1),CCC,DRAWNULL),COLORWHITE,LINETHICK2{XG51};
IF(  CCC<轴线 AND CCC<REF(CCC,1),CCC,DRAWNULL),COLORLIMAGENTA,LINETHICK2{XG51};
撑压A:IF(crOSS(AAA,CCC),H,REF(H,BArslAst(CROSS(AAA,CCC)))),POINTDOT,COLORBLUE,LINETHICK2{XG51};
撑压B:IF(CROSS(CCC,AAA),H,REF(H,BARSLAST(CROSS(CCC,AAA)))),POINTDOT,COLORGREEN,LINETHICK2{XG51};
Ddif:=EMA(CLOSE,12)-EMA(CLOSE,26){XG51};
DRAWTEXT(CROSS(MA5,CCC) AND ddiF>0 AND DDIF>REF(DDIF,1),CCC-0.2,'〇'),COLORWHITE{XG51};
DRAWTEXT(CROSS(MA5,CCC) AND DDIF>0 AND DDIF>REF(DDIF,1),CCC-0.4,'〇'),COLORBLUE{XG51};
DRAWTEXT(CROSS(MA5,CCC) AND DDIF>0 AND DDIF>REF(DDIF,1),CCC-0.6,'〇'),COLORLIGREEN{XG51};
DRAWKLINE(HIGH,OPEN,LOW,CLOSE){X-G.5-1-C-N-{};