目前最准确的通达信缠论分笔公式.docx

目前见到的最准确的通达信缠论分笔公式参数：老笔＝1，使用老笔定义，默认为0，使用新笔定义G:=MA(C,5);D:=MA(C,10);HH:=REF(H,5)=HHV(H,11);LL:=REF(L,5)=LLV(L,11);FG01:=BACKSET(HH,6)BACKSET(HH,5) ;FD01:=BACKSET(LL,6)BACKSET(LL,5) ;FG02:=IF(BARSLAST(FG01)=BARSLAST(FD01) AND GD,FG01,IF(BARSLAST(FD01)BARSLAST(FG01),FG01,0));FD02:=IF(BARSLAST(FG01)=BARSLAST(FD01) AND DG,FD01,IF(BARSLAST(FG01)BARSLAST(FD01),FD01,0));FG0:=FG02 AND H=HHV(H,BARSLAST(FD02));FD0:=FD02 AND L=LLV(L,BARSLAST(FG02));GP:IF(FG0,H,DRAWNULL),CIRCLEDOT,COLORCYAN;DP:IF(FD0,L,DRAWNULL),CIRCLEDOT,COLORCYAN;GQ:=LREF(H,1) AND DAY!=REF(DAY,1);DQ:=HREF(L,1) AND DAY!=REF(DAY,1);GQL:=REF(L,BARSLAST(GQ));DQH:=REF(H,BARSLAST(DQ));FGH:=REF(H,BARSLAST(FG0));FGL:=REF(L,BARSLAST(FG0));FGH1:=REF(H,BARSLAST(FG0)+1);FGL1:=REF(L,BARSLAST(FG0)+1);FGH2:=REF(H,BARSLAST(FG0)+2);FGL2:=REF(L,BARSLAST(FG0)+2);FDH:=REF(H,BARSLAST(FD0));FDL:=REF(L,BARSLAST(FD0));FDH1:=REF(H,BARSLAST(FD0)+1);FDL1:=REF(L,BARSLAST(FD0)+1);FDH2:=REF(H,BARSLAST(FD0)+2);FDL2:=REF(L,BARSLAST(FD0)+2);FGZH:=IF(FGL=FGL1,FGH2,FGH1);FGZL:=IF(FGH1FGL,FGL,IF(FGL=FGL1,FGL2,FGL1));FDZH:=IF(FDL1FDH,FDH,IF(FDH=FDH1,FDH2,FDH1));FDZL:=IF(FDH=FDH1,FDL2,FDL1);FG1:=FGHFDZH AND FG0;FD1:=FDLFGZL AND FD0;FG:=FG1 AND FGHFDH AND FGLFDL AND FGL1FDL;FD:=FD1 AND FDLFGL AND FDHFGH AND FDH1FGH;BH0:=(H=REF(H,1) AND L=REF(L,1)) OR (H=REF(H,1) AND L=REF(L,1));BHG:=COUNT(BH0,BARSLAST(FD0));BHD:=COUNT(BH0,BARSLAST(FG0));BGQ:=COUNT(GQ,BARSLAST(FD0));BDQ:=COUNT(DQ,BARSLAST(FG0));BK0:=IF(BHG0,BHG+2+老笔,IF(BHD,BHD+2+老笔,3));BK:=IF(BGQ,BK0-BGQ,IF(BDQ,BK0-BDQ,BK0));G1X:=(FG AND BARSLAST(FD)BK);D1X:=(FD AND BARSLAST(FG)BK);G1:=(FG0 AND REF(H,BARSLAST(FG0))=REF(H,BARSLAST(G1X)) AND BARSLAST(D1X)BARSLAST(G1X))OR (FG1 AND COUNT(GQ,BARSLAST(FD1))0 AND REF(H,BARSLAST(FG1))REF(H,BARSLAST(G1X)));D1:=(FD0 AND REF(L,BARSLAST(FD0))=REF(L,BARSLAST(D1X)) AND BARSLAST(G1X)BARSLAST(D1X))OR (FD1 AND COUNT(DQ,BARSLAST(FG1))0 AND REF(L,BARSLAST(FD1))REF(H,BARSLAST(D1X)));G1H:=IF(BARSLAST(D1)BARSLAST(G1),REF(H,BARSLAST(G1)),REF(H,BARSLAST(D1))),;D1L:=IF(BARS