通达信刀切买入法主图指标(源码)

AAN:=C =TO1N OR C =TO2N OR C REF(C,1);
ATJ1N:=BACKSET(REF(C O,2) AND REF(C O,1) AND REF(C REF(O,1),1)
AND C REF(O,2),3);
ATJ2N:=BACKSET(REF(C O,1) AND C REF(O,1),2);
A1N:=NOT(ATJ1N) AND NOT(ATJ2N) AND AAN AND REF(NOT(AAN),1);
NAN:=BARSLAST(A1N);
A2N:=REF(COUNT(AAN,NAN+1)=NAN+1,1) AND AAN AND H=HHV(H,NAN+1);
ABN:=DRAWLINE(A1N,LLV(L,3),A2N,H,0),COLORYELLOW;
A2TJN:=BACKSET(ABN REF(ABN,1) AND REF(NOT(ABN REF(ABN,1)),1),2);
A22N:=A2N AND A2TJN=1;
DIN:=REF(ABN,NAN),COLORRED;
NBN:=BARSLAST(A22N);
DINGN:=IF(NOT(REF(ABN,NBN) ABN),REF(ABN,NBN),REF(ABN,NBN)),LINETHICK4; {顶};
TC1N:=REF(O,SUMBARS(IF(C O,1,0),1));
TC2N:=REF(O,SUMBARS(IF(C O,1,0),2));
BBN:=C TC1N OR C TC2N OR C REF(C,1);
BTJ1N:=BACKSET(REF(C O,2) AND REF(C O,1) AND REF(C REF(O,1),1)
AND C REF(O,2),3);
BTJ2N:=BACKSET(REF(C O,1) AND C REF(O,1),2);
B1N:=NOT(BTJ1N) AND NOT(BTJ2N) AND BBN AND REF(NOT(BBN),1);
NBBN:=BARSLAST(B1N);
B2N:=REF(COUNT(BBN,NBBN+1)=NBBN+1,1) AND BBN AND L=LLV(L,NBBN+1);
BBBN:=DRAWLINE(B1N,HHV(H,3),B2N,L,0);
W2N:=H-BBBN=HHV(H-BBBN,BARSLAST(B1N)) AND NOT(BBBN=DRAWNULL);
DRAWLINE(B1N,H,W2N,H,1) COLORMAGENTA;