搜索
目前见到的最准确的通达信缠论分笔公式参数：老笔＝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)ANDGD,FG01,IF(BARSLAST(FD01)BARSLAST(FG01),FG01,0));FD02:=IF(BARSLAST(FG01)=BARSLAST(FD01)ANDDG,FD01,IF(BARSLAST(FG01)BARSLAST(FD01),FD01,0));FG0:=FG02ANDH=HHV(H,BARSLAST(FD02));FD0:=FD02ANDL=LLV(L,BARSLAST(FG02));GP:IF(FG0,H,DRAWNULL),CIRCLEDOT,COLORCYAN;DP:IF(FD0,L,DRAWNULL),CIRCLEDOT,COLORCYAN;GQ:=LREF(H,1)ANDDAY!=REF(DAY,1);DQ:=HREF(L,1)ANDDAY!=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:=FGHFDZHANDFG0;FD1:=FDLFGZLANDFD0;FG:=FG1ANDFGHFDHANDFGLFDLANDFGL1FDL;FD:=FD1ANDFDLFGLANDFDHFGHANDFDH1FGH;BH0:=(H=REF(H,1)ANDL=REF(L,1))OR(H=REF(H,1)ANDL=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:=(FGANDBARSLAST(FD)BK);D1X:=(FDANDBARSLAST(FG)BK);G1:=(FG0ANDREF(H,BARSLAST(FG0))=REF(H,BARSLAST(G1X))ANDBARSLAST(D1X)BARSLAST(G1X))OR(FG1ANDCOUNT(GQ,BARSLAST(FD1))0ANDREF(H,BARSLAST(FG1))REF(H,BARSLAST(G1X)));D1:=(FD0ANDREF(L,BARSLAST(FD0))=REF(L,BARSLAST(D1X))ANDBARSLAST(G1X)BARSLAST(D1X))OR(FD1ANDCOUNT(DQ,BARSLAST(FG1))0ANDREF(L,BARSLAST(FD1))REF(H,BARSLAST(D1X)));G1H:=IF(BARSLAST(D1)BARSLAST(G1),REF(H,BARSLAST(G1)),REF(H,BARSLAST(D1))),;D1L:=IF(BARSLAST(G1)BARSLAST(D1),REF(L,BARSLAST(D1)),REF(L,BARSLAST(G1)));G2:=G1ANDH=HHV(G1H,BARSLAST(D1)+1)ANDHREF(H,1)ANDBARSLAST(D1)BARSLAST(G1);D2:=D1ANDL=LLV(D1L,BARSLAST(G1)+1)ANDLREF(L,1)ANDBARSLAST(G1)BARSLAST(D1);G3:=G2OR(FG0ANDREF(H,BARSLAST(FG0))REF(H,BARSLAST(G2))ANDBARSLAST(D2)BARSLAST(G2));D3:=D2OR(FD0ANDREF(L,BARSLAST(FD0))REF(L,BARSLAST(D2))ANDBARSLAST(G2)BARSLAST(D2));GPB:IF(G1X,H,DRAWNULL),CIRCLEDOT,COLORYELLOW;DPB:IF(D1X,L,DRAWNULL),CIRCLEDOT,COLORYELLOW;{画线}NN:=G3;UU:=D3;L1:DRAWLINE(UU,L,NN,H,0),COLORLIGREEN;L2:DRAWLINE(NN,H,UU,L,0),COLORLIGREEN;{标示端点数值}{DRAWNUMBER(L1ANDL2ANDNN,H,H),COLORLIRED;DRAWNUMBER(L1ANDL2ANDUU,L,L),COLORLIMAGENTA;};