笔

TT:=(C/REF(C,1)-1)*100>=9.9 AND C=H;

STICKLINE(TT,O,C,2,0),COLORMAGENTA;

TT2:=C/REF(C,1)<=0.91 AND C=L;

STICKLINE(TT2,O,C,2,0),COLORGREEN;

TTT:=(H/REF(C,1)-1)*100>=9.9 AND C<H;

STICKLINE(TTT,O,C,0.2,0),COLORYELLOW;

CLG:=MA(C,5);

CLD:=MA(C,10);

CLHH:=REF(H,6)=HHV(H,11);

CLLL:=REF(L,6)=LLV(L,11);

CLFG01:=BACKSET(CLHH,7)>BACKSET(CLHH,6) ;

CLFD01:=BACKSET(CLLL,7)>BACKSET(CLLL,6) ;

CLFG02:=IF(BARSLAST(CLFG01)=BARSLAST(CLFD01) AND CLG>CLD,CLFG01,

IF(BARSLAST(CLFD01)>BARSLAST(CLFG01),CLFG01,0));

CLFD02:=IF(BARSLAST(CLFG01)=BARSLAST(CLFD01) AND CLD>CLG,CLFD01,

IF(BARSLAST(CLFG01)>BARSLAST(CLFD01),CLFD01,0));

CLFG0:=CLFG02 AND H=HHV(H,BARSLAST(CLFD02));

CLFD0:=CLFD02 AND L=LLV(L,BARSLAST(CLFG02));

CLGP:=IF(CLFG0,H,DRAWNULL),CIRCLEDOT,COLORCYAN;

CLDP:=IF(CLFD0,L,DRAWNULL),CIRCLEDOT,COLORCYAN;

CLGQ:=L>REF(H,1) AND DAY!=REF(DAY,1);

CLDQ:=H<REF(L,1) AND DAY!=REF(DAY,1);

CLGQL:=REF(L,BARSLAST(CLGQ));

CLDQH:=REF(H,BARSLAST(CLDQ));

CLFGH:=REF(H,BARSLAST(CLFG0));

CLFGL:=REF(L,BARSLAST(CLFG0));

CLFGH1:=REF(H,BARSLAST(CLFG0) 1);

CLFGL1:=REF(L,BARSLAST(CLFG0) 1);

CLFGH2:=REF(H,BARSLAST(CLFG0) 2);

CLFGL2:=REF(L,BARSLAST(CLFG0) 2);

CLFDH:=REF(H,BARSLAST(CLFD0));

CLFDL:=REF(L,BARSLAST(CLFD0));

CLFDH1:=REF(H,BARSLAST(CLFD0) 1);

CLFDL1:=REF(L,BARSLAST(CLFD0) 1);

CLFDH2:=REF(H,BARSLAST(CLFD0) 2);

CLFDL2:=REF(L,BARSLAST(CLFD0) 2);

CLFGZH:=IF(CLFGL<=CLFGL1,CLFGH2,CLFGH1);

CLFGZL:=IF(CLFGH1<CLFGL,CLFGL,IF(CLFGL<=CLFGL1,CLFGL2,CLFGL1));

CLFDZH:=IF(CLFDL1>CLFDH,CLFDH,IF(CLFDH>=CLFDH1,CLFDH2,CLFDH1));

CLFDZL:=IF(CLFDH>=CLFDH1,CLFDL2,CLFDL1);

CLFG1:=CLFGH>CLFDZH AND CLFG0;

CLFD1:=CLFDL<CLFGZL AND CLFD0;

CLFG:=CLFG1 AND CLFGH>CLFDH AND CLFGL>CLFDL AND CLFGL1>CLFDL;

CLFD:=CLFD1 AND CLFDL<CLFGL AND CLFDH<CLFGH AND CLFDH1<CLFGH;

CLBH0:=(H<=REF(H,1) AND L>=REF(L,1)) OR (H>=REF(H,1) AND L<=REF(L,1));

CLBHG:=COUNT(CLBH0,BARSLAST(CLFD0));

CLBHD:=COUNT(CLBH0,BARSLAST(CLFG0));

CLBGQ:=COUNT(CLGQ,BARSLAST(CLFD0));

CLBDQ:=COUNT(CLDQ,BARSLAST(CLFG0));

CLBK0:=IF(CLBHG>0,CLBHG 2 1,IF(CLBHD,CLBHD 2 1,3));

CLBK:=IF(CLBGQ,CLBK0-CLBGQ,IF(CLBDQ,CLBK0-CLBDQ,CLBK0));

CLG1X:=(CLFG AND BARSLAST(CLFD)>CLBK);

CLD1X:=(CLFD AND BARSLAST(CLFG)>CLBK);

CLG1:=(CLFG0 AND REF(H,BARSLAST(CLFG0))>=REF(H,BARSLAST(CLG1X)) AND BARSLAST(CLD1X)>BARSLAST(CLG1X)) OR (CLFG1 AND COUNT(CLGQ,BARSLAST(CLFD1))>0 AND REF(H,BARSLAST(CLFG1))>REF(H,BARSLAST(CLG1X)));

CLD1:=(CLFD0 AND REF(L,BARSLAST(CLFD0))<=REF(L,BARSLAST(CLD1X)) AND BARSLAST(CLG1X)>BARSLAST(CLD1X)) OR (CLFD1 AND COUNT(CLDQ,BARSLAST(CLFG1))>0 AND REF(L,BARSLAST(CLFD1))<REF(H,BARSLAST(CLD1X)));

CLG1H:=IF(BARSLAST(CLD1)>BARSLAST(CLG1),REF(H,BARSLAST(CLG1)),REF(H,BARSLAST(CLD1))),;

CLD1L:=IF(BARSLAST(CLG1)>BARSLAST(CLD1),REF(L,BARSLAST(CLD1)),REF(L,BARSLAST(CLG1)));

CLG2:=CLG1 AND H=HHV(CLG1H,BARSLAST(CLD1) 1) AND H>REF(H,1) AND BARSLAST(CLD1)>BARSLAST(CLG1);

CLD2:=CLD1 AND L=LLV(CLD1L,BARSLAST(CLG1) 1) AND L<REF(L,1) AND BARSLAST(CLG1)>BARSLAST(CLD1);

CLG3:=CLG2 OR (CLFG0 AND REF(H,BARSLAST(CLFG0))>REF(H,BARSLAST(CLG2)) AND BARSLAST(CLD2)>BARSLAST(CLG2));

CLD3:=CLD2 OR (CLFD0 AND REF(L,BARSLAST(CLFD0))<REF(L,BARSLAST(CLD2)) AND BARSLAST(CLG2)>BARSLAST(CLD2));

CLGPB:=IF(CLG1X,H,DRAWNULL),CIRCLEDOT,COLORYELLOW;

CLDPB:=IF(CLD1X,L,DRAWNULL),CIRCLEDOT,COLORYELLOW;

{画线WWW.70822.COM}

CLNN:=CLG3;

CLUU:=CLD3;

DRAWLINE(CLUU,L,CLNN, H,0),COLORYELLOW,DOTLINE;

DRAWLINE(CLNN,H,CLUU, L,0),COLORWHITE,DOTLINE;{缠论中枢};