魔改BOLL公式

让BOLL公式更加直观

公式源码

N:=20;
BOLL:MA(CLOSE,N),COLORGREEN,LINETHICK1;
IF(BOLL>REF(BOLL,1),BOLL,DRAWNULL),COLORRED,LINETHICK1;
UPPER:BOLL+2*STD(CLOSE,N),COLORCYAN,LINETHICK1;
LOWER:BOLL-2*STD(CLOSE,N),COLOR0088FF,LINETHICK1;


VAR1:=C=HHV(C,4) AND REF(C,1)=LLV(C,4);
VAR2:=C=LLV(C,4) AND (REF(C,1)<REF(C,2) OR REF(C,1)<REF(C,3)) OR REF(C,1)=LLV(C,4) AND C<REF(C,2) OR REF(C,2)=LLV(C,4) AND REF(C,1)=HHV(C,4) AND C<REF(C,1) OR REF(C,3)=LLV(C,4) AND C<REF(C,1) AND C<REF(C,2);
VAR3:=REF(C,1)=LLV(C,4) AND C>=REF(C,2) OR REF(C,2)=LLV(C,4) AND REF(C,1)<=REF(C,3) AND REF(C,2)<REF(C,4) AND C>=REF(C,1);
A:=(3*C+L+O+H)/6;
VAR4:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+14*REF(A,6)+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12)+7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+REF(A,20))/210;
MTM:=C-REF(C,1);
DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);
CB:=EMA(VAR4,13);

N1:=9;
M1:=3;
M2:=3;

RSV:=(CLOSE-LLV(LOW,N1))/(HHV(HIGH,N1)-LLV(LOW,N1))*100;

{
RSV:=(CLOSE-LLV(C,N1))/(HHV(C,N1)-LLV(C,N1))*100;
}
K:=SMA(RSV,M1,1);
D:=SMA(K,M2,1);
J:=3*K-2*D;

SHORT:=5;
LONG:=10;
MID:=5;
DIF:=EMA(CLOSE,SHORT)-EMA(CLOSE,LONG);
DEA:=EMA(DIF,MID);
MACD:=(DIF-DEA)*2;

开口:=UPPER-LOWER > REF(UPPER,1)-REF(LOWER,1);

MA20:=MA(CLOSE,20);

中轨角度:=ATAN((MA(BOLL,5)/REF(MA(BOLL,5),1)-1)*100)*57.3;

SZK:=(K-REF(K,1))/REF(K,1)*100;
SZJ:=J-REF(J,1);
SZ:=(SZK>3.5 OR SZJ>5) AND (开口 OR BOLL>REF(BOLL,1)) AND 中轨角度>-10;


STICKLINE(VAR3 AND SZ,O,(O+C)/2,0.5,0),COLOR00FF00;
DRAWICON(VAR3 AND SZ AND 开口=1,LOW*0.99,23);
DRAWICON(VAR3 AND SZ AND 开口=0,LOW*0.99,27);
卖:=HHV(DX,2)=HHV(DX,7) AND COUNT(DX>50,2) AND CROSS(MA(DX,2),DX);
卖点:=FILTER(卖=1,1);
DRAWICON(卖点,HIGH*1.05,2);
买:=LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2));
买点:=FILTER(买=1,5) AND SZ;
DRAWICON(买点,LOW*0.99,1);
加仓:=SMA(EMA((C-REF(C,1))/REF(C,1),5)*100,3,1)*10 AND SZ;
DRAWTEXT(FILTER((CROSS(加仓,0) OR CROSS(CLOSE,CB)) AND 买=1,3),LOW-0.03,'加'),COLORWHITE;


爆:=BOLL-REF(BOLL,1)>0.001 AND MACD>REF(MACD,1) AND CROSS(J,K) AND 开口 AND MA20 >REF(MA20,1) AND SZK>3.5;
爆点:=FILTER(爆=1,5);
DRAWICON(爆点,LOW*0.99,29);

{
XG:BARSLASTCOUNT(C>REF(C,4)AND KDJ.K=HHV(K,5) AND C>MA(C,20))=1;
};
{
会:=HHV(FORCAST(CLOSE,7),7),COLORWHITE;
用:=HHV(FORCAST(CLOSE,7),14),COLORBLUE;
会用:=HHV(FORCAST(CLOSE,7),21),COLORYELLOW;
}
X_1:=HHV(FORCAST(CLOSE,7),28);
IF(X_1,X_1,DRAWNULL),DOTLINE,COLORYELLOW;
IF(X_1=REF(X_1,1) AND BARSLAST(X_1>REF(X_1,1) OR X_1<REF(X_1,1))>3,X_1,DRAWNULL),COLORYELLOW;

ABS, ATAN, BARSLAST, COUNT, CROSS, DRAWICON, DRAWTEXT, EMA, FILTER, FORCAST, HHV, IF, LLV, MA, REF, SMA, STD, STICKLINE