通达信刀切买入法主图选股指标公式源码

通达信刀切买入法主图选股指标公式源码

源码正文：

TO1N:=REF(O,SUMBARS(IF(C>=O,1,0),1)){XG51};
TO2N:=REF(O,SUMBARS(IF(C>=O,1,0),2)){XG51};
AAN:=C>=TO1N OR C>=TO2N OR C>REF(C,1){XG51};
ATJ1N:=BacKSET(REF(C>O,2) AND REF(C<O,1) AND REF(C>REF(O,1),1)
AND C<REF(O,2),3){XG51};
ATJ2N:=BACKSET(REF(C>O,1) AND C<REF(O,1),2){XG51};
A1N:=NOT(ATJ1N) AND NOT(ATJ2N) AND AAN AND REF(NOT(AAN),1){XG51};
NAN:=BArslAst(A1N){XG51};
A2N:=REF(COUNT(AAN,NAN+1)=NAN+1,1) AND AAN AND H=HHV(H,NAN+1){XG51};
ABN:=DRAWLINE(A1N,LLV(L,3),A2N,H,0),COLORBLUE{XG51};
A2TJN:=BACKSET(ABN>REF(ABN,1) AND REF(NOT(ABN>REF(ABN,1)),1),2){XG51};
A22N:=A2N AND A2TJN=1{XG51};
DIN:=REF(ABN,NAN),COLORWHITE{XG51};
NBN:=BARSLAST(A22N){XG51};
DINGN:=IF(NOT(REF(ABN,NBN)<ABN),REF(ABN,NBN),REF(ABN,NBN)),LINETHICK4; {XG51};
TC1N:=REF(O,SUMBARS(IF(C<O,1,0),1)){XG51};
TC2N:=REF(O,SUMBARS(IF(C<O,1,0),2)){XG51};
BBN:=C<TC1N OR C<TC2N OR C<REF(C,1){XG51};
BTJ1N:=BACKSET(REF(C<O,2) AND REF(C>O,1) AND REF(C<REF(O,1),1)
AND C>REF(O,2),3){XG51};
BTJ2N:=BACKSET(REF(C<O,1) AND C>REF(O,1),2){XG51};
B1N:=NOT(BTJ1N) AND NOT(BTJ2N) AND BBN AND REF(NOT(BBN),1){XG51};
NBBN:=BARSLAST(B1N){XG51};
B2N:=REF(COUNT(BBN,NBBN+1)=NBBN+1,1) AND BBN AND L=LLV(L,NBBN+1){XG51};
BBBN:=DRAWLINE(B1N,HHV(H,3),B2N,L,0){XG51};
W2N:=H-BBBN=HHV(H-BBBN,BARSLAST(B1N)) AND NOT(BBBN=DRAWNULL){XG51};
DRAWLINE(B1N,H,W2N,H,1) COLORmaGENTA{X^G^5?1^C^N^{};