通达信牛起身进入主图指标公式源码上/[万物公式]

A6:EMA(CLOSE,5),COLORGREEN;

A10:EMA(CLOSE,10),COLORGREEN;

RJ:(C+O)*1/2;

STICKLINE(A6>REF(A6,3),A6,REF(A6,1),1,1),COLORRED;

STICKLINE(A6

IF(C>A6,A6,DRAWNULL),COLORWHITE,LINETHICK2;

IF(C>A10,A10,DRAWNULL),COLORRED,LINETHICK2;

JJJ:=IF(DYNAINFO(8)>0.01,0.01*DYNAINFO(10)/DYNAINFO(8),DYNAINFO(3));

DDD:=(DYNAINFO(5)<0.01 || DYNAINFO(6)<0.01);

JJJT:=IF(DDD,1,(JJJ<(DYNAINFO(5)+0.01) && JJJ>(DYNAINFO(6)-0.01)));

cyc1:IF(JJJT,0.01*expma(AMOUNT,6)/EXPMA(vol,6),EMA((HIGH+LOW+CLOSE)/3,6)),COLORGREEN;

CYC2:IF(JJJT,0.01*EXPMA(AMOUNT,8)/EXPMA(VOL,8),EMA((HIGH+LOW+CLOSE)/3,8)),COLORGREEN;

CYC3:IF(JJJT,0.01*EXPMA(AMOUNT,34)/EXPMA(VOL,34),EMA((HIGH+LOW+CLOSE)/3,34));

CYC∞:IF(JJJT,DMA(AMOUNT/(100*VOL),100*VOL/FINANCE(7)),EMA((HIGH+LOW+CLOSE)/3,120));

IF(CYC1>REF(CYC1,1) OR C>CYC1,CYC1,DRAWNULL),COLORWHITE,LINETHICK2;

IF(C>CYC2,CYC2,DRAWNULL),COLORRED,LINETHICK2;

B:=crOSS(CYC1>REF(CYC1,1) AND CYC2>REF(CYC2,1) AND CYC3>REF(CYC3,1) AND CYC∞>REF(CYC∞,1) AND C>CYC∞ AND RJ>REF(RJ,1) AND A6>REF(A6,1),0.2);

牛起身:= CROSS(C,CYC∞) AND CYC∞>REF(CYC∞,1) AND CYC1>REF(CYC1,1) AND CYC2>REF(CYC2,1) AND CYC3>REF(CYC3,1);

DRAWTEXT(B,LOW-(H-L)*0.6,上/);

DRAWTEXT(牛起身,LOW-(H-L)*0.96,牛起身);