[通达信指标]趋势通道线主图公式

{画线部分使用未来函数}

EM01:=EMA(C,10);

EM:=EMA(C,21);

UP:=EMA(EM,13);

DOWN:=EMA(EM,17);

MIDD:(UP+DOWN)/2,POINTDOT;

DRAWKLINE(H,O,L,C);

STICKLINE(MIDD>REF(MIDD,1),UP,DOWN,1,0),COLORMAGENTA;

STICKLINE(MIDD<REF(MIDD,1),UP,DOWN,1,0),COLORGREEN;

STICKLINE(MIDD=REF(MIDD,1),UP,DOWN,1,0),COLORGRAY;

PJMA:EMA(EMA(C,10),10),COLOR0000FF,LINETHICK2;

TTZZ1:=PJMA>REF(PJMA,1);

IF(TTZZ1-1,PJMA,DRAWNULL),COLOR00FF00,LINETHICK3;

DRAWICON(REF(MIDD,1)<=REF(MIDD,2) AND MIDD>REF(MIDD,1),DOWN,7);

DRAWICON(REF(MIDD,1)>=REF(MIDD,2) AND MIDD<REF(MIDD,1),UP,8);

UR:=15;

LR:=15;

TC1:=IF(C=HHV(C,5*UR),C,DRAWNULL);

TC2:=CONST(BARSLAST(TC1=C))+1;

BC1:=IF(L=LLV(L,5*LR),L,DRAWNULL);

BC2:=CONST(BARSLAST(BC1=L))+1;

NOD:=(IF(TC2>BC2,TC2,BC2)-IF(TC2>BC2,BC2,TC2));

LR1:=FORCAST(C,NOD+1);

NP:=IF(CURRBARSCOUNT<=MAX(BC2,TC2),CONST(IF(MIN(TC2,BC2)=1,LR1,REF(LR1,MIN(TC2,BC2)-1))),DRAWNULL),POINTDOT,COLOR93BDA8;

LR2:=SLOPE(C,NOD+1);

LR3:=CONST(IF(MIN(TC2,BC2)=1,LR2,REF(LR2,MIN(TC2,BC2)-1)));

FP:=NP-LR3*(NOD),POINTDOT,COLOR93BDA8;

AD:=ABS(NP-FP);

DBL:=BARSLAST(BC1!=DRAWNULL)+1;

DBH:=BARSLAST(TC1!=DRAWNULL)+1;

BSP:=IF(BC2>TC2,DBL,DBH)-1;

LRL:=IF(NP>FP,FP+AD/NOD*BSP,FP-AD/NOD*BSP);

RRS1:=IF(BETWEEN(CURRBARSCOUNT,BC2,TC2) AND C>LRL,C,LRL);

RRS2:=HHV(RRS1-LRL,MAX(BC2,TC2));

RRS3:=CONST(BARSLAST(RRS1-LRL=RRS2));

RRS5:=CONST(IF(RRS3=0,RRS1-LRL,REF(RRS1-LRL,RRS3)));

RRSL:=LRL+RRS5;

RES1:=IF(BETWEEN(CURRBARSCOUNT,BC2,TC2) AND L<LRL,L,LRL);

RES2:=HHV(LRL-RES1,MAX(BC2,TC2));

RES3:=CONST(BARSLAST(LRL-RES1=RES2));

RES5:=CONST(IF(RES3=0,LRL-RES1,REF(LRL-RES1,RES3)));

RESL:=LRL-RES5;

RH:=IF(CURRBARSCOUNT>=MIN(BC2,TC2)-10,RRSL,CONST(REF(RRSL,MIN(BC2,TC2)-11)));

RL:=IF(CURRBARSCOUNT>=MIN(BC2,TC2)-10,RESL,CONST(REF(RESL,MIN(BC2,TC2)-11)));

ZHONGUI:=IF(NP>FP,IF(LRL<=RH,LRL,DRAWNULL),IF(LRL>=RL,LRL,DRAWNULL)),COLORYELLOW;

HHHH:IF(NP>FP,IF(RRSL<=RH,RRSL,DRAWNULL),IF(RRSL>=RL,RRSL,DRAWNULL)),COLORYELLOW;

LLLL:IF(NP>FP,IF(RESL<=RH,RESL,DRAWNULL),IF(RESL>=RL,RESL,DRAWNULL)),COLORYELLOW;

IF(NP>FP,IF(LRL-RESL<RRSL-LRL,LRL*2-RESL,IF(RRSL-LRL<LRL-RESL,LRL-(RRSL-LRL),DRAWNULL)),IF(LRL-RESL<RRSL-LRL,LRL*2-RESL,IF(RRSL-LRL<LRL-RESL,LRL-(RRSL-LRL),DRAWNULL))),DOTLINE,COLORYELLOW;

URA:=5;

LRA:=5;

TC1A:=IF(C=HHV(C,5*URA),C,DRAWNULL);

TC2A:=CONST(BARSLAST(TC1A=C))+1;

BC1A:=IF(L=LLV(L,5*LRA),L,DRAWNULL);

BC2A:=CONST(BARSLAST(BC1A=L))+1;

NODA:=(IF(TC2A>BC2A,TC2A,BC2A)-IF(TC2A>BC2A,BC2A,TC2A));

LR1A:=FORCAST(C,NODA+1);

NPA:=IF(CURRBARSCOUNT<=MAX(BC2A,TC2A),CONST(IF(MIN(TC2A,BC2A)=1,LR1A,REF(LR1A,MIN(TC2A,BC2A)-1))),DRAWNULL),POINTDOT,COLOR93BDA8;

LR2A:=SLOPE(C,NODA+1);

LR3A:=CONST(IF(MIN(TC2A,BC2A)=1,LR2A,REF(LR2A,MIN(TC2A,BC2A)-1)));

FPA:=NPA-LR3A*(NODA),POINTDOT,COLOR93BDA8;

ADA:=ABS(NPA-FPA);

DBLA:=BARSLAST(BC1A!=DRAWNULL)+1;

DBHA:=BARSLAST(TC1A!=DRAWNULL)+1;

BSPA:=IF(BC2A>TC2A,DBLA,DBHA)-1;

LRLA:=IF(NPA>FPA,FPA+ADA/NODA*BSPA,FPA-ADA/NODA*BSPA);

RRS1A:=IF(BETWEEN(CURRBARSCOUNT,BC2A,TC2A) AND C>LRLA,C,LRLA);

RRS2A:=HHV(RRS1A-LRLA,MAX(BC2A,TC2A));

RRS3A:=CONST(BARSLAST(RRS1A-LRLA=RRS2A));

RRS5A:=CONST(IF(RRS3A=0,RRS1A-LRLA,REF(RRS1A-LRLA,RRS3A)));

RRSLA:=LRLA+RRS5A;

RES1A:=IF(BETWEEN(CURRBARSCOUNT,BC2A,TC2A) AND L<LRLA,L,LRLA);

RES2A:=HHV(LRLA-RES1A,MAX(BC2A,TC2A));

RES3A:=CONST(BARSLAST(LRLA-RES1A=RES2A));

RES5A:=CONST(IF(RES3A=0,LRLA-RES1A,REF(LRLA-RES1A,RES3A)));

RESLA:=LRLA-RES5A;

RHA:=IF(CURRBARSCOUNT>=MIN(BC2A,TC2A)-10,RRSLA,CONST(REF(RRSLA,MIN(BC2A,TC2A)-11)));

RLA:=IF(CURRBARSCOUNT>=MIN(BC2A,TC2A)-10,RESLA,CONST(REF(RESLA,MIN(BC2A,TC2)-11)));

ZHONGUIA:=IF(NPA>FPA,IF(LRLA<=RHA,LRLA,DRAWNULL),IF(LRLA>=RLA,LRLA,DRAWNULL)),COLOR628962;

HHHHA:IF(NPA>FPA,IF(RRSLA<=RHA,RRSLA,DRAWNULL),IF(RRSLA>=RLA,RRSLA,DRAWNULL)),COLORWHITE;

LLLLA:IF(NPA>FPA,IF(RESLA<=RHA,RESLA,DRAWNULL),IF(RESLA>=RLA,RESLA,DRAWNULL)),COLORWHITE;

IF(NPA>FPA,IF(LRLA-RESLA<RRSLA-LRLA,LRLA*2-RESLA,IF(RRSLA-LRLA<LRLA-RESLA,LRLA-(RRSLA-LRLA),DRAWNULL)),IF(LRLA-RESLA<RRSLA-LRLA,LRLA*2-RESLA,IF(RRSLA-LRLA<LRLA-RESLA,LRLA-(RRSLA-LRLA),DRAWNULL))),DOTLINE,COLORWHITE;