通达信布林135主图源码 说明

把135均线结合到布林线，增加了箱体顶底和趋势线
 

BOLL:EMA(C,25)COLORMAGENTA,LINETHICK2;
UPPER:=BOLL+2*STD(CLOSE,25)COLORYELLOW,CROSSDOT;
LOWER:=BOLL-2*STD(CLOSE,25)COLORLICYAN,CROSSDOT;
{DRAWBAND(BOLL,RGB(139,0,139),REF(BOLL,1),RGB(65,105,225));}
DRAWBAND(UPPER,RGB(139,0,139),BOLL,DRAWNULL);
DRAWBAND(BOLL,RGB(65,105,225),LOWER,DRAWNULL);
EMA13:EMA(CLOSE,13)COLORWHITE,LINETHICK1;
EMA34:EMA(CLOSE,34)COLORGREEN,LINETHICK1;
EMA55:EMA(CLOSE,55)COLORCYAN,LINETHICK1;
{阳K线}
STICKLINE(CLOSE>=OPEN,C,O,4.7,0),COLOR000033;
STICKLINE(CLOSE>=OPEN,C,O,3.9,0),COLOR000055;
STICKLINE(CLOSE>=OPEN,C,O,3,0),COLOR000077;
STICKLINE(CLOSE>=OPEN,C,O,2.1,0),COLOR000099;
STICKLINE(CLOSE>=OPEN,C,O,1,0),COLOR0000DD;
{阳线上下影}
STICKLINE(CLOSE>=OPEN,L,H,0,0), COLORRED;
{阴K线}
STICKLINE(CLOSE<OPEN,C,O,4.7,0),COLOR003300;
STICKLINE(CLOSE<OPEN,C,O,3.9,0),COLOR005500;
STICKLINE(CLOSE<OPEN,C,O,3,0),COLOR007700;
STICKLINE(CLOSE<OPEN,C,O,2.1,0),COLOR009900;
STICKLINE(CLOSE<OPEN,C,O,1,0),COLOR00DD00;
{阴线上下影}
STICKLINE(CLOSE<OPEN,L,H,0,0),COLOR00EC00;
XU:PEAK(C,IF(PERIOD<5,5,10),1)*0.999,COLORFFCC99,LINETHICK2;{箱顶}
XD:TROUGH(C,IF(PERIOD<5,5,10),1)*0.998,COLORFF99CC,LINETHICK2;{箱底}
XH:=(XU-XD)/XD*100,NODRAW,COLORYELLOW;
XDU:=IF(EMA(EMA(EMA(C,2),2),2)>REF(EMA(EMA(EMA(C,2),2),2),1),XD,XU);
XR:=(C-XDU)/XDU*100,COLORRED,NODRAW;
XTB:=XD!=REF(XD,2) && XD=REF(XD,1);
XTS:=XU!=REF(XU,2) && XU=REF(XU,1);
DRAWICON(XTB,MIN(XD,L)*0.991,1);
DRAWTEXT(XTB,MIN(XD,L)*0.988,'[下跌终点,上升起点!满仓]'),COLOR0000DD;
DRAWICON(XTS,MAX(XU,H)*1.001,2);
DRAWTEXT(XTS,MIN(XU,H)*1.004,'[上升终点,下跌起点!清仓]')COLOR00DD00;
上升段:DRAWLINE(XTB,MIN(LLV(L,1),XD),XTS,MAX(HHV(H,1),XU),0)
COLOR000099,LINETHICK2;{XTBL}
下跌段:DRAWLINE(XTS,MAX(HHV(H,1),XU),XTB,MIN(LLV(L,1),XD),0)
COLOR009900,LINETHICK2;{XTSL}

Y:=(EMA(C,13)-EMA(C,55))/EMA(C,13)*100;
生命线:=EMA(CLOSE,34)COLORMAGENTA,POINTDOT,LINETHICK4;
 EMA120:=EMA(CLOSE,120);
{135均线战法}
{一、底部起涨}
{1.金屋藏娇}
JW1:=C<OPEN AND REF(C,1)<REF(OPEN,1);
JW2:=OPEN<REF(C,1) AND C>REF(L,1);
JW3:=O<EMA(C,13) AND O<EMA(C,34) AND O<EMA(C,55);
JW:=JW1 AND JW2 AND JW3;
DRAWTEXT(JW,LOW-0.2,'金屋藏娇'),COLORYELLOW;
{2.红杏出墙}
AR1:=EMA55>EMA34 AND EMA34>EMA13;
AR2:=BARSLAST((C-EMA13)/EMA13*100<-6);
AR3:=EMA13>=REF(EMA13,2);
AR4:=COUNT(CROSS(C,EMA13),AR2)=1;
AR5:=AR1 AND AR2 AND AR3 AND AR4;
AR6:=AR5 AND FILTER(AR5,10);
DRAWTEXT(AR6,L-0.09,'红杏出墙'),COLORYELLOW;
STICKLINE(AR6,H,L,0.5,1),COLORYELLOW;
STICKLINE(AR6,O,C,6,1),LINETHICK2,COLORYELLOW;
{3.投石问路}
TS1:=CROSS(EMA(C,13),EMA(C,34));{11线上穿34线}
TS2:=EMA(C,13)<EMA(C,55);
TS:=TS1 AND TS2;
DRAWTEXT(TS,H*1.001,'投石问路'),COLORF00FF0;
{二.上涨“拼命三郎”要及时满仓跟进}
{1.揭竿而起}
JG1:=ABS(EMA(C,13)-EMA(C,34))<C*0.02 AND ABS(EMA(C,13)-EMA(C,55))<C*0.02;
JG2:=O>EMA(C,13) OR O=EMA(C,13);
JG3:=C/OPEN>1.03 ; {阳线３％}
JG:=JG1 AND JG2 AND JG3;
DRAWTEXT(JG,LOW-0.2,'揭竿而起'),COLORYELLOW;
{2.一阳三线} 
YY1:=C>EMA(C,13) AND OPEN<EMA(C,13);
YY3:=C>EMA(C,34) AND OPEN<EMA(C,34);
YY5:=C>EMA(C,55) AND OPEN<EMA(C,55);
DRAWTEXT(YY1 AND YY5 AND YY3,LOW*0.998,'一阳三线'),COLORRED; 
{3.红衣侠女}
CR1:=(C-REF(C,1))/REF(C,1)*100>0.5;
CR2:=V>MA(V,5)*0.6;
CR3:=COUNT(CROSS(EMA13,EMA55),3)=1;
CR4:=ABS(EMA34-EMA55)/EMA55<0.03;
CR5:=EMA55<=EMA120 AND EMA55>=REF(EMA55,1);
CR6:=FILTER(CR1 AND CR2 AND CR3 AND CR4 AND CR5,2);
STICKLINE(CR6,H,L,0.5,1),COLORF00FF0;
STICKLINE(CR6,O,C,6,1),LINETHICK2,COLORF00FF0;
DRAWTEXT(CR6,L*0.996,'红衣侠女')COLORRED,{COLORF00FF0};
{黑客点击}
HK1:=CROSS(EMA(C,13),EMA(C,55));{11线上穿55线}
HK2:=C<O;{当日收阴}
HK3:=ABS(L-EMA(C,13))<C*0.03 OR ABS(C-EMA(C,13))<C*0.04;{收盘价或最低价在13线} HK:=HK1 AND HK2 AND HK3;
DRAWTEXT(HK,EMA13,'黑客点击'),COLORGREEN;
{三军集合}
SJ1:=ABS(EMA(CLOSE,13)-EMA(CLOSE,34))<C*0.01;{13线34线55线接近}  
SJ2:=ABS(EMA(CLOSE,34)-EMA(CLOSE,55))<C*0.01;
SJ3:=CROSS(EMA(CLOSE,13),EMA(CLOSE,55));{13线上穿55线}  
DRAWTEXT(SJ1 AND SJ2 AND SJ3,HIGH+0.1,'三军集合'),COLORRED;
{ 日月合璧}
RY1:=C/OPEN>1.04;{阳线４％} 
RY2:=REF(OPEN,1)/REF(CLOSE,1)>1.04;{阴线４％}
RY3:=ABS(OPEN-REF(C,1))<C*0.02 AND ABS(C-REF(OPEN,1))<C*0.02;{两线相等}
DRAWTEXT(RY1 AND RY2 AND RY3 ,LOW*0.996,'日月合璧'),COLORYELLOW;
{梅开二度}
MK1:=EMA(C,13)>EMA(C,55) AND EMA(C,34)>EMA(C,55);
MK:=TS1 AND MK1;
DRAWTEXT(MK,H*1.002,'梅开二度'),COLORADEAEA;
{蚂蚁上树}
BR1:=COUNT(BETWEEN((C-REF(C,1))/REF(C,1)*100,0,5) ,5)=5; BR2:=ABS
((EMA13-EMA34)+(EMA34-EMA55))/C<0.2;
BR3:=C>EMA55 AND (REF(C,1)<REF(EMA55,1) OR REF(C,2)<REF(EMA55,2)
OR REF(C,3)<REF(EMA55,3) OR REF(C,4)<REF(EMA55,4) OR REF(C,5)<REF(EMA55,5));
BR4:=BR1 AND BR2 AND BR3;
DRAWTEXT(BR4 AND FILTER(BR4,10),L*0.999,'蚂蚁上树'),COLOR00C5FF;
{STICKLINE(BR4 AND FILTER(BR4,10),H,L,0.5,1),COLOR00C5FF;
STICKLINE(BR4 AND FILTER(BR4,10),O,C,6,1),LINETHICK2,COLOR00C5FF;}
{ 均线互换}
ER:=BARSLAST(REF(CROSS(EMA55,EMA34),1)) AND CROSS(EMA34,EMA55);
DRAWTEXT(ER,EMA34*1.001,'均线互换'),COLOR0099FF;
{STICKLINE(ER,H,L,0.5,1),COLOR0099FF;
STICKLINE(ER,O,C,6,1),LINETHICK2,COLOR0099FF;
{见好就收}
GR1:=BARSLAST(BETWEEN("BIAS.BIAS2"(6,13,24),0,5) );
GR2:=EMA13>EMA34 AND EMA34>EMA55 AND EMA13>REF(EMA13,1);
GR3:=COUNT("BIAS.BIAS2"(6,13,24)>10 AND H=HHV(H,GR1),GR1);
GR4:=H=HHV(H,GR1);
GR5:="MACD.MACD"(12,26,9)<REF("MACD.MACD"(12,26,9),1);
GR6:=GR2 AND GR3 AND GR4;
GR7:=GR2 AND GR3 AND GR4 AND GR5;
DRAWTEXT(GR6 AND GR7,H+0.13,'见好就收'),COLOR00FF00;
STICKLINE(GR6 AND GR7,H,H+0.09,4,0),COLOR00FF00;
{三线推进}
HR2:=EMA13>=REF(EMA13,3) AND EMA34>=REF(EMA34,1) AND EMA55>=REF(EMA55,1)
 AND CROSS(C,EMA13) AND CROSS(C,EMA34) AND CROSS(C,EMA55);
DRAWTEXT(HR2 AND FILTER(HR2,10),H*1.002,'三线推进'),COLORFFC8FF;
{STICKLINE(HR2 AND FILTER(HR2,10),H,L,0,1),COLORFFC8FF;
STICKLINE(HR2 AND FILTER(HR2,10),O,C,3,1),LINETHICK2,COLORFFC8FF;}
{卖出形态}
{1.一枝独秀}
YZ1:=C/O>1.02 AND H/C>1.02 AND O/L<1.02;{收阳有上影}
YZ2:=REF(C,1)>REF(O,1) AND O>EMA(C,13);{昨收阳 今大于均线}
YZ:=YZ1 AND YZ2 AND Y>10;
DRAWTEXT(YZ,HIGH+0.2,'一枝独秀'),COLORF00FF0;
{2.独上高楼}
DS1:=OPEN/C>1.04 AND O/REF(C,1)>1.03;{高开收阴}
DS2:=V*100/FINANCE(7)>0.08 AND Y>8;{换手高涨幅大}
DS:=DS1 AND DS2;
DRAWTEXT(DS,HIGH+0.2,'独上高楼'),COLORGREEN;
{3.一剑封喉}
YJ1:=H/O>1.04;
YJ2:=ABS(C-O)<C*0.03;
YJ3:=C/EMA(C,13)>1.1;
YJ:=YJ1 AND YJ2 AND DS2 AND YJ3 AND YZ2;
DRAWTEXT(YJ,HIGH+0.3,'一剑封喉'),COLORRED;
{断头铡刀} 
T:=(MA(C,13)-MA(C,55))/MA(C,13)*100;
 TT1:=C<MA(C,13) AND OPEN>MA(C,13);
 TT3:=C<MA(C,34) AND OPEN>MA(C,34);
 TT5:=C<MA(C,55) AND OPEN>MA(C,55);
 X28:DRAWTEXT(TT1 AND TT5 AND TT3,LOW*0.99,'断头铡刀'),COLORWHITE;
X30:DRAWTEXT(CROSS(EMA55,EMA13),EMA55*0.997,'一剑穿心'), COLOR00FF00;
{ X39:DRAWTEXT(CROSS(EMA34,EMA13),EMA34*1.003,'分道扬镳'), COLOR00FF00;
 X31:DRAWTEXT(CROSS(EMA55,EMA34),EMA55*1.0,'各自为政'), COLOR00FF00;};