通达信牛叉的布林主图公式

源码

P:=9;
 MA6:MA(C,6);
 MID中轨:MA(CLOSE,20),COLORFF00FF,LINETHICK2;
 UPPER上轨:MID中轨 + 2*STD(CLOSE,20),COLORWHITE,LINETHICK1;
 LOWER下轨:MID中轨 - 2*STD(CLOSE,20),COLORGREEN,LINETHICK1;
 WH1:=IF(L=LLV(L,P),L,DRAWNULL);
 WH2:=CONST(BARSLAST(WH1!=DRAWNULL));
 WH3:=CONST(IF(WH2=0,H,REF(H,WH2)));
 WH4:=CONST(REF(BARSLAST(H>WH3),WH2+1)+WH2+1);
 WH5:=CONST(IF(WH4=0,H,REF(H,WH4)));
 WH6:=CONST(REF(BARSLAST(H>WH5),WH4+1)+WH4+1);
 WH7:IF(CURRBARSCOUNT<=WH2+10,CONST(IF(WH6=0,H,REF(H,WH6))),DRAWNULL);
 STICKLINE(CURRBARSCOUNT<=WH2+1 AND L=LLV(L,P),O,C,3,0),COLORRED;
 DRAWTEXT(CURRBARSCOUNT=WH2+10,WH7,'LINE'),COLORRED;
 DRAWTEXT(ISLASTBAR,WH7,'进场线'),COLORRED;
 WH8:IF(CURRBARSCOUNT<=WH2+1,IF(L=LLV(L,P),L,DRAWNULL),DRAWNULL),CIRCLEDOT;
 H1:=IF(H=HHV(H,P),H,DRAWNULL);
 H2:=CONST(BARSLAST(H1!=DRAWNULL));
 H3:=CONST(IF(H2=0,L,REF(L,H2)));
 H4:=CONST(REF(BARSLAST(L  H5:=CONST(IF(H4=0,L,REF(L,H4)));
 H6:=CONST(REF(BARSLAST(L  H7:IF(CURRBARSCOUNT<=H2+10,CONST(IF(H6=0,L,REF(L,H6))),DRAWNULL);
 H8:IF(CURRBARSCOUNT<=H2+1,IF(H=HHV(H,P),H,DRAWNULL),DRAWNULL),CIRCLEDOT;
 DRAWTEXT(C