软件名称：[B]布林画线【主图】（源码）[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/
软件语言：简体中文
授权方式：免费版
软件大小：31.0 KB
官方主页：Home Page
更新时间：2010-11-06 15:36:14
软件简介:
{布林画线【主图】}
input: k(2,0,2),n(10,1,255);
BBI:(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4,POINTDOT,COLORFFFFFF;
BBI2:BBI+3*STD(BBI,10),COLOR0000AA,POINTDOT;
BBI3:BBI-3*STD(BBI,10),COLOR00FF00,POINTDOT;
XX2:=EMA(EMA((CLOSE+LOW+HIGH)/3,3),23);
XX3:=REF(XX2,1);
PARTLINE(XX2,XX2>XX3,RGB(255,0,0),XX2<XX3,RGB(0,255,0)),LINETHICK2;
B1:=MA(CLOSE,1);
B2:=SMA(SMA(SMA(B1,2,1),2,1),2,1) ;
SMA2:=MA(B2,3) ;
FILLRGN(b2,sma2,b2>sma2,RGB(255,0,0),b2<sma2,RGB(0,255,0));
VAR9Q:=CLOSE=HHV(CLOSE,4) AND (REF(CLOSE,1)>=REF(CLOSE,2) OR REF(CLOSE,1)>=REF(CLOSE,3)) OR REF(CLOSE,1)=HHV(CLOSE,4) AND CLOSE>=REF(CLOSE,2) OR REF(CLOSE,2)=HHV(CLOSE,4) AND REF(CLOSE,3)=LLV(CLOSE,4) AND CLOSE>=REF(CLOSE,1) OR REF(CLOSE,3)=HHV(CLOSE,4) AND CLOSE>=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
红持:VAR9Q,LINETHICK0,color0000FF;
VARAQ:=CLOSE=HHV(CLOSE,4) AND REF(CLOSE,1)=LLV(CLOSE,4);
粉变:VARAQ,LINETHICK0,colorFF99FF;
VARBQ:=CLOSE=LLV(CLOSE,4) AND (REF(CLOSE,1)<REF(CLOSE,2) OR REF(CLOSE,1)<REF(CLOSE,3)) OR REF(CLOSE,1)=LLV(CLOSE,4) AND CLOSE<REF(CLOSE,2) OR REF(CLOSE,2)=LLV(CLOSE,4) AND REF(CLOSE,1)<>HHV(CLOSE,4) AND CLOSE<REF(CLOSE,1) OR REF(CLOSE,3)=LLV(CLOSE,4) AND CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);
灰跌:VARBQ,LINETHICK0,color888888;
VARCQ:=REF(CLOSE,1)=LLV(CLOSE,4) AND CLOSE>=REF(CLOSE,2) OR REF(CLOSE,2)=LLV(CLOSE,4) AND REF(CLOSE,1)<=REF(CLOSE,3) AND REF(CLOSE,2)<REF(CLOSE,4) AND CLOSE>=REF(CLOSE,1);
绿买:VARCQ,LINETHICK0,color00FF00;
VARDQ:=REF(CLOSE,1)=HHV(CLOSE,4) AND CLOSE<REF(CLOSE,2) OR (REF(CLOSE,2)=HHV(CLOSE,4) AND REF(CLOSE,1)>REF(CLOSE,3) OR REF(CLOSE,3)=HHV(CLOSE,4) AND REF(CLOSE,1)>REF(CLOSE,2)) AND REF(CLOSE,2)>=REF(CLOSE,4) AND CLOSE<REF(CLOSE,1);
蓝抛:VARDQ,LINETHICK0,colorFF9900;
STICKLINE(CLOSE>OPEN,OPEN,LOW,0.5,0),color0000FF;
STICKLINE(CLOSE>OPEN,CLOSE,HIGH,0.5,0),color0000FF;
STICKLINE(OPEN>=CLOSE,CLOSE,LOW,0.5,0),color00FF00;
STICKLINE(OPEN>=CLOSE,OPEN,HIGH,0.5,0),color00FF00;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,8,0),colorFF7700;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,6,0),colorFF9900;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,5,0),colorFFBB00;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,4,0),colorFFCC00;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,3,0),colorFFDD00;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,2,0),colorFFEE00;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,1,0),colorFFFF00;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,8,0),color000055;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6,0),color000066;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0),color000077;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,4,0),color000099;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0),color0000BB;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0),color0000DD;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0),color0000FF;
STICKLINE(VAR9Q,CLOSE,(OPEN+CLOSE)/2,8,0),color000077;
STICKLINE(VAR9Q,CLOSE,(OPEN+CLOSE)/2,6,0),color000088;
STICKLINE(VAR9Q,CLOSE,(OPEN+CLOSE)/2,5,0),color0000AA;
STICKLINE(VAR9Q,CLOSE,(OPEN+CLOSE)/2,4,0),color0000CC;
STICKLINE(VAR9Q,CLOSE,(OPEN+CLOSE)/2,2,0),color0000FF;
STICKLINE(VAR9Q,CLOSE,(OPEN+CLOSE)/2,0,0),colorFFFFFF;
STICKLINE(VARAQ,CLOSE,(OPEN+CLOSE)/2,8,0),colorFF11FF;
STICKLINE(VARAQ,CLOSE,(OPEN+CLOSE)/2,6,0),colorFF33FF;
STICKLINE(VARAQ,CLOSE,(OPEN+CLOSE)/2,5,0),colorFF55FF;
STICKLINE(VARAQ,CLOSE,(OPEN+CLOSE)/2,4,0),colorFF77FF;
STICKLINE(VARAQ,CLOSE,(OPEN+CLOSE)/2,3,0),colorFF99FF;
STICKLINE(VARAQ,CLOSE,(OPEN+CLOSE)/2,2,0),colorFFBBFF;
STICKLINE(VARAQ,CLOSE,(OPEN+CLOSE)/2,1,0),colorFFDDFF;
STICKLINE(VARBQ,CLOSE,(OPEN+CLOSE)/2,8,0),color333333;
STICKLINE(VARBQ,CLOSE,(OPEN+CLOSE)/2,6,0),color555555;
STICKLINE(VARBQ,CLOSE,(OPEN+CLOSE)/2,5,0),color777777;
STICKLINE(VARBQ,CLOSE,(OPEN+CLOSE)/2,4,0),color999999;
STICKLINE(VARBQ,CLOSE,(OPEN+CLOSE)/2,3,0),colorBBBBBB;
STICKLINE(VARBQ,CLOSE,(OPEN+CLOSE)/2,2,0),colorDDDDDD;
STICKLINE(VARBQ,CLOSE,(OPEN+CLOSE)/2,1,0),colorFFFFFF;
STICKLINE(VARCQ,OPEN,(OPEN+CLOSE)/2,8,0),color003300;
STICKLINE(VARCQ,OPEN,(OPEN+CLOSE)/2,6,0),color005500;
STICKLINE(VARCQ,OPEN,(OPEN+CLOSE)/2,5,0),color007700;
STICKLINE(VARCQ,OPEN,(OPEN+CLOSE)/2,4,0),color009900;
STICKLINE(VARCQ,OPEN,(OPEN+CLOSE)/2,3,0),color00BB00;
STICKLINE(VARCQ,OPEN,(OPEN+CLOSE)/2,2,0),color00DD00;
STICKLINE(VARCQ,OPEN,(OPEN+CLOSE)/2,1,0),color00FF00;
STICKLINE(VARDQ,OPEN,(OPEN+CLOSE)/2,8,0),colorFF1100;
STICKLINE(VARDQ,OPEN,(OPEN+CLOSE)/2,6,0),colorFF3300;
STICKLINE(VARDQ,OPEN,(OPEN+CLOSE)/2,5,0),colorFF5500;
STICKLINE(VARDQ,OPEN,(OPEN+CLOSE)/2,4,0),colorFF7700;
STICKLINE(VARDQ,OPEN,(OPEN+CLOSE)/2,3,0),colorFF9900;
STICKLINE(VARDQ,OPEN,(OPEN+CLOSE)/2,2,0),colorFFBB00;
STICKLINE(VARDQ,OPEN,(OPEN+CLOSE)/2,1,0),colorFFDD00;
wN:=3;{原码 N:=3;}
wA1:=REF(H,wN)=HHV(H,2*wN+1); wB1:=FILTER(wA1,wN); wC1:=BACKSET(wB1,wN+1); wD1:=FILTER(wC1,wN);{高点}
wA2:=REF(L,wN)=LLV(L,2*wN+1); wB2:=FILTER(wA2,wN); wC2:=BACKSET(wB2,wN+1); wD2:=FILTER(wC2,wN);{低点}
wE1:=(REF(LLV(L,2*wN),1)+REF(HHV(H,2*wN),1))/2; wE2:=(H+L)/2;{高低点出现在同一K线上时可作取舍}
wH1:=(wD1 AND NOT(wD2 AND wE1>=wE2)) OR DISPSTATUS=2 OR BARSCOUNT(C)=1;
wL1:=(wD2 AND NOT(wD1 AND wE1<wE2)); wH2:=wD1 AND NOT(wD2 AND wE1>=wE2);
wX1:=REF(BARSLAST(wH1),1)+1; wF1:=BACKSET(wH1 AND COUNT(wL1,wX1)>0,LLVBARS(IF(wL1,L,10000),wX1));
wG1:=wF1>REF(wF1,1); wI1:=BACKSET(wG1,2); wLD:=wI1>REF(wI1,1);{过滤后低点}
wL2:=wLD OR DISPSTATUS=2 OR BARSCOUNT(C)=1;
wX2:=REF(BARSLAST(wL2),1)+1; wF2:=BACKSET(wL2 AND COUNT(wH2,wX2)>0,HHVBARS(IF(wH2,H,0),wX2));
wG2:=wF2>REF(wF2,1); wI2:=BACKSET(wG2,2); wHD:=wI2>REF(wI2,1);{过滤后高点}
wR1:=BACKSET(DISPSTATUS=2,BARSLAST(wHD)+1); wS1:=wR1>REF(wR1,1); {前一高}
wT1:=BACKSET(DISPSTATUS=2,BARSLAST(wLD)+1); wU1:=wT1>REF(wT1,1); {前一低}
wR2:=BACKSET(wS1,REF(BARSLAST(wHD),1)+2); wS2:=wR2>REF(wR2,1); {前二高}
wT2:=BACKSET(wU1,REF(BARSLAST(wLD),1)+2); wU2:=wT2>REF(wT2,1); {前二低}
wT3:=BACKSET(wU2,REF(BARSLAST(wLD),1)+2); wU3:=wT3>REF(wT3,1); {前三低}
wT4:=BACKSET(wU3,REF(BARSLAST(wLD),1)+2); wU4:=wT4>REF(wT4,1); {前四低}
wR3:=BACKSET(wS2,REF(BARSLAST(wHD),1)+2); wS3:=wR3>REF(wR3,1); {前三高}
wR4:=BACKSET(wS3,REF(BARSLAST(wHD),1)+2); wS4:=wR4>REF(wR4,1); {前四高}
DRAWLINE(K=2 AND wS2,H,K=2 AND wS1,H,1),Color008888; {★压力１:}
DRAWLINE(K=2 AND wU2,L,K=2 AND wU1,L,1),POINTDOT,Color008888;{★支撑１:}
DRAWLINE(K=2 AND wS3,H,K=2 AND wS2,H,1),Color888000; {★压力２:}
DRAWLINE(K=2 AND wU3,L,K=2 AND wU2,L,1),POINTDOT,Color888000;{★支撑２:}
DRAWLINE(K=2 AND wS4,H,K=2 AND wS3,H,1),Color0000CC;{★压力３:}
DRAWLINE(K=2 AND wU4,L,K=2 AND wU3,L,1),POINTDOT,Color0000CC;{★支撑３:};
底:=SUM(MA(CLOSE,10),9)/11.114;
DRAWTEXT(CROSS(LOW,底) AND REF(底,1)>REF(HIGH,1) OR CROSS(HIGH,底),0.85*CLOSE,'---铁底'),color00FF00;
X1:=(3*CLOSE+HIGH+LOW+OPEN)/6;
X2:=EMA(X1,10);
X3:=REF(X2,1);
X4:=(REF(HIGH,1)+REF(LOW,1))/2;
X5:=MA(CLOSE,21)+2*STD(CLOSE,21);
X6:=REF(CLOSE,1);
X7:=(SMA(MAX(CLOSE-X6,0),7,1))/(SMA(ABS(CLOSE-X6),7,1))*100;
X8:=CROSS(79,X7);
X9:=FILTER(X8,4);
WZ1:=POW(MA(CLOSE,5),2)+MA(CLOSE,5);
WZ2:=POW(MA(LOW,5),2)+MA(LOW,5);
WZ3:=POW(MA(HIGH,5),2)+MA(HIGH,5);
WZ4:=(WZ1-LLV(WZ2,9))/(HHV(WZ3,9)-LLV(WZ2,9))*150+65;
DK:=SMA(WZ4,3,1)*1.5;
DD:=SMA(DK,3,1);