收口布林主图指标 (源码)

KMA:MA(CLOSE,1),POINTDOT;
MID:MA(CLOSE,20);
UPPER:MID+2*STD(CLOSE,20);
LOWER:MID-2*STD(CLOSE,20);
{STICKLINE(CLOSE,HIGH,LOW,0.1,1),COLOR0000FF;
STICKLINE(CLOSE,CLOSE,CLOSE,4,1),COLOR0000FF;}
BB:(C-LOWER)/(UPPER-LOWER),COLORWHITE,NODRAW;
BWIDTH:(UPPER-LOWER)/MID,COLORWHITE,NODRAW;
A1:=MA(C,5);
A2:=MA(C,15);
A3:=MA(C,30);
A4:=CROSS(A1,A2);
A5:=CROSS(A2,A3);
A6:=CROSS(A1,A3);
FD1:=A1>=MA(C,120) AND A2>=MA(C,120);
Q6:=ATAN((MA(C,120)/REF(MA(C,120),1)-1)*100)*57.3;
Q7:=ATAN((MA(C,250)/REF(MA(C,250),1)-1)*100)*57.3;
麻花:A6 AND COUNT(A4,3)>=1 AND COUNT(A5,3)>=1 AND FD1 AND Q6>0 AND Q7>0,NODRAW;
DRAWTEXT(麻花,MID,'A');
中轨:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
上轨:=中轨+3*STD(中轨,13);
下轨:=中轨-3*STD(中轨,13);
收口大小:=(上轨-中轨)/中轨*100;
XD:=上轨>=REF(上轨,1) AND 下轨>=REF(下轨,1);
XE:=FILTER(XD=1 AND EXIST(收口大小<2.1,2) AND C>=REF(C,1)*0.981,7);
XF:=XD=1 AND EXIST(收口大小<2.1,2) AND C>=REF(C,1)*0.981;
XF2:=EXIST(XD=1,3) AND 收口大小<2 AND C>=中轨 AND C>=REF(C,1)*0.981;
收口:XF OR XF2,NODRAW;
DRAWTEXT(收口,LOWER,'I');
XV:CROSS(收口,0.1) AND REF(C,1)<=MID AND REF(C,2)<=MID,NODRAW;
DRAWTEXT(XV,MID,'I');
XO:CROSS(收口,0.1) AND CROSS(MID*1.001,REF(L,1)),NODRAW;
DRAWTEXT(XO,UPPER,'I');