|
布林喇叭口
涨停板:=(C-REF(C,1))/REF(C,1)*100>=8.48 AND C>O;
RN:=45; W:=1;
只有一个:=COUNT(涨停板,RN)>=W;
有涨板:=EXIST(只有一个,45)>=1;
放量连扳:=COUNT(EVERY(C/REF(C,1)>1.08,3),60)=1
AND COUNT(V/REF(V,1)>3,60)>=1;
RT:=60; WT:=1;
连扳:=COUNT(放量连扳,RT)>=WT;
有连扳:=EXIST(连扳,60)=1;
有扳:=有涨板 OR 有连扳;
MA03:=MA(C,3),LINETHICK2;
X:=(3*C+L+O+H)/6;
多空线:=(20*X+19*REF(X,1)+18*REF(X,2)+17*REF(X,3)+16*REF(X,4)+15*REF(X,5)+14*REF(X,6)
+13*REF(X,7)+12*REF(X,8)+11*REF(X,9)+10*REF(X,10)+9*REF(X,11)+8*REF(X,12)
+7*REF(X,13)+6*REF(X,14)+5*REF(X,15)+4*REF(X,16)+3*REF(X,17)+2*REF(X,18)+
REF(X,20))/210,COLORWHITE,LINETHICK2;
上穿多空线:=MA03>多空线 AND C/REF(C,1)>=1.017 AND C>0;
CB:=IF(CODELIKE('30') OR CODELIKE('6') OR CODELIKE('0') ,COST(50),MA(C,50));
S:=IF(PERIOD>5,5,12),LINETHICK0;
LL:=IF(PERIOD>5,12,26);
DI:=100*(EMA(CLOSE,S) - EMA(CLOSE,LL))/CB;
DE:=EMA(DI,IF(PERIOD>5,5,9));
MAC:=2*(DI-DE);
DIFF1:=DI;
DEA1:=DE;
跟庄:=CROSS(DIFF1,DEA1) OR CROSS( MAC ,0);
涨幅度:=8.7;涨幅度1:=1;
限制涨幅:=DYNAINFO(14)*100>涨幅度1 AND DYNAINFO(14)*100<涨幅度 AND CLOSE>MA(C,55);
TJJ:=30;
累计十天换手:=SUM(VOL/CAPITAL*100,10)>TJJ;
MACD0:=("MACD.MACD">REF("MACD.MACD",1))>=1;
收阳线:=DYNAINFO(23)<>DYNAINFO(22) ;
去新股:=IF(NAMELIKE('N'),0,1){刚上市不久的新股};
一字涨停:=C/REF(C,1)>1.0975 AND H=O;
停牌:=(DYNAINFO(4)=0);
MM:=NOT(停牌); D22:=IF(NAMELIKE('S'),0,1);
D33:=IF(NAMELIKE('*'),0,1);
ST:=D22 AND D33 AND MM AND NOT(一字涨停) AND MACD0 AND DYNAINFO(17)>0
AND C/REF(C,1)>=1.017 AND C>=5.58 AND C<20.60 AND CAPITAL/1000000<5.63 AND 有扳
AND C>0 AND IF(CODELIKE('300'),0,1) AND 跟庄 AND 去新股 AND 收阳线 AND 限制涨幅;
BOLL:=MA(CLOSE,20);
UPPER:=BOLL+2*STD(CLOSE,20);
LOWER:=BOLL-2*STD(CLOSE,20);
DD:=UPPER-LOWER;
KK:=UPPER/LOWER;
布林喇叭口:CROSS(0.5,DD=LLV(DD,30))
OR CROSS(KK>REF(KK,1),0.5) AND 上穿多空线 AND ST;
{今天的开口首次比昨天的大};
这个是第2个布林
涨停板:=(C-REF(C,1))/REF(C,1)*100>=8.48 AND C>O;
RN:=45; W:=1;
只有一个:=COUNT(涨停板,RN)>=W;
有涨板:=EXIST(只有一个,45)>=1;
放量连扳:=COUNT(EVERY(C/REF(C,1)>1.08,3),60)=1
AND COUNT(V/REF(V,1)>3,60)>=1;
RT:=60; WT:=1;
连扳:=COUNT(放量连扳,RT)>=WT;
有连扳:=EXIST(连扳,60)=1;
有扳:=有涨板 OR 有连扳;
MA03:=MA(C,3),LINETHICK2;
X:=(3*C+L+O+H)/6;
多空线:=(20*X+19*REF(X,1)+18*REF(X,2)+17*REF(X,3)+16*REF(X,4)+15*REF(X,5)+14*REF(X,6)
+13*REF(X,7)+12*REF(X,8)+11*REF(X,9)+10*REF(X,10)+9*REF(X,11)+8*REF(X,12)
+7*REF(X,13)+6*REF(X,14)+5*REF(X,15)+4*REF(X,16)+3*REF(X,17)+2*REF(X,18)+
REF(X,20))/210,COLORWHITE,LINETHICK2;
上穿多空线:=MA03>多空线 AND C/REF(C,1)>=1.017 AND C>0;
CB:=IF(CODELIKE('30') OR CODELIKE('6') OR CODELIKE('0') ,COST(50),MA(C,50));
S:=IF(PERIOD>5,5,12),LINETHICK0;
LL:=IF(PERIOD>5,12,26);
DI:=100*(EMA(CLOSE,S) - EMA(CLOSE,LL))/CB;
DE:=EMA(DI,IF(PERIOD>5,5,9));
MAC:=2*(DI-DE);
DIFF1:=DI;
DEA1:=DE;
跟庄:=CROSS(DIFF1,DEA1) OR CROSS( MAC ,0);
涨幅度:=8.7;涨幅度1:=1;
限制涨幅:=DYNAINFO(14)*100>涨幅度1 AND DYNAINFO(14)*100<涨幅度 AND CLOSE>MA(C,55);
TJJ:=30;
累计十天换手:=SUM(VOL/CAPITAL*100,10)>TJJ;
MACD0:=("MACD.MACD">REF("MACD.MACD",1))>=1;
收阳线:=DYNAINFO(23)<>DYNAINFO(22) ;
去新股:=IF(NAMELIKE('N'),0,1){刚上市不久的新股};
一字涨停:=C/REF(C,1)>1.0975 AND H=O;
停牌:=(DYNAINFO(4)=0);
MM:=NOT(停牌); D22:=IF(NAMELIKE('S'),0,1);
D33:=IF(NAMELIKE('*'),0,1);
ST:=D22 AND D33 AND MM AND NOT(一字涨停) AND MACD0 AND DYNAINFO(17)>0
AND C/REF(C,1)>=1.017 AND C>=5.58 AND C<20.60 AND CAPITAL/1000000<5.63
AND C>0 AND IF(CODELIKE('300'),0,1) AND 跟庄 AND 去新股 AND 收阳线 AND 限制涨幅;
N:=10;
M:=6;
CV:=CLOSE;
BBIBOLL:=(MA(CV,3)+MA(CV,6)+MA(CV,12)+MA(CV,24))/4;
UPR:=BBIBOLL+M*STD(BBIBOLL,N);
DWN:=BBIBOLL-M*STD(BBIBOLL,N);
布林:=(REF(C/MA(C,60)<0.9,20) AND (UPR/DWN-1)*100<8)
OR REF((UPR/DWN-1)*100<10,1);
布林 AND 上穿多空线 AND 有扳 AND ST;
另外送一个一条线主图公式
DRAWGBK(C>0,RGB(0,150,150),RGB(0,00,100),0,' ',0),LINETHICK2;
V1:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20);
V2:=(1-7/100)*(DMA(CLOSE,V1));
V3:=(1+7/100)*(DMA(CLOSE,V1));
V5:=MA((LOW+HIGH+CLOSE)/3,5);
支撑:REFDATE(V2,DATE),POINTDOT,LINETHICK3,COLORCC66FF;
阻力:REFDATE(V3,DATE),POINTDOT,LINETHICK3,COLORGREEN;
VAR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
VAR2:=REF(VAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR3:=REF(VAR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR4:=REF(VAR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR5:=REF(VAR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR6:=REF(VAR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR7:=REF(VAR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR8:=REF(VAR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR9:=REF(VAR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VARA:=REF(VAR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VARB:=REF(VARA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VARC:=REF(VARB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
涨停:=IF(REF(C,1)*1.095-C<0.01 ,1,0);
STICKLINE(涨停,OPEN,CLOSE,2.5,0),COLORYELLOW;
DRAWTEXT(涨停,L-0.1,'涨停'),COLORYELLOW;
M80:MA(C,80),LINETHICK0;
M200:MA(C,200);
DRAWBAND(M200,RGB(40,100,40),M80,RGB(100,100,0));
DRAWKLINE(H,O,L,C);
MA010:=MA(CLOSE,10),COLORYELLOW,LINETHICK0;
MA54:=MA(CLOSE,54),COLORFFCCCC,LINETHICK0;
PL1:=(((CLOSE - MA54) / MA54) < 0.1);
PL2:=(((CLOSE - MA010) / MA010) < 0.3);
偏离率:=(((PL1 = 1) AND (PL2 = 1)) * 0.2);
平台突破:=((((偏离率 = 0) AND (REF(偏离率,1) = 0.2)) AND (REF((COUNT((偏离率 = 0.2),10) = 10),1) = 1)) * 1);
DRAWTEXT(平台突破,L,'＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝'),COLORWHITE;
MA03:MA(C,3),COLORYELLOW,DOTLINE,LINETHICK0;
IF(MA03>=REF(MA03,1),MA03,DRAWNULL),COLOR0066FF,LINETHICK0;
IF(MA03< REF(MA03,1),MA03,DRAWNULL),,COLORGREEN,LINETHICK0;
X:=(3*C+L+O+H)/6;
多空线:(20*X+19*REF(X,1)+18*REF(X,2)+17*REF(X,3)+16*REF(X,4)+15*REF(X,5)+14*REF(X,6)
+13*REF(X,7)+12*REF(X,8)+11*REF(X,9)+10*REF(X,10)+9*REF(X,11)+8*REF(X,12)
+7*REF(X,13)+6*REF(X,14)+5*REF(X,15)+4*REF(X,16)+3*REF(X,17)+2*REF(X,18)+
REF(X,20))/210,COLORGREEN,LINETHICK2;
IF(多空线>=REF(多空线,1),多空线,DRAWNULL),COLORRED,LINETHICK2;
IF(多空线< REF(多空线,1),多空线,DRAWNULL),,COLORGREEN,LINETHICK2;
牛皮熊:DRAWICON(CROSS(MA03,多空线) AND CLOSE/REF(CLOSE,1)>1.03,LOW*0.96,25);
DRAWTEXT(FILTER(牛皮熊,8),多空线-0.05,'↖跟庄买进'),COLORGREEN;
DRAWTEXT(CROSS(MA03,多空线) AND MA03>0,多空线-0.23,'★←'),COLORYELLOW;
{买卖差:=MA03-多空线,LINETHICK2;
STICKLINE(买卖差>=0,(MA03-买卖差*0.05),(MA03-买卖差*0.15),1,0)COLOR00FFFF;
STICKLINE(买卖差>=0,(MA03-买卖差*0.2),(MA03-买卖差*0.35),1,0)COLOR00CCFF;
STICKLINE(买卖差>=0,(MA03-买卖差*0.4),(MA03-买卖差*0.55),1,0)COLOR0099FF;
STICKLINE(买卖差>=0,(MA03-买卖差*0.6),(MA03-买卖差*0.75),1,0)COLOR0066FF;
STICKLINE(买卖差>=0,(MA03-买卖差*0.8),(MA03-买卖差*0.95),1,0)COLOR0000CC;
STICKLINE(买卖差<0,(多空线+买卖差*0.05),(多空线+买卖差*0.15),1,0)COLOR006600;
STICKLINE(买卖差<0,(多空线+买卖差*0.2),(多空线+买卖差*0.35),1,0)COLOR009900;
STICKLINE(买卖差<0,(多空线+买卖差*0.4),(多空线+买卖差*0.55),1,0)COLOR00CC00;
STICKLINE(买卖差<0,(多空线+买卖差*0.6),(多空线+买卖差*0.75),1,0)COLOR00FF00;
STICKLINE(买卖差<0,(多空线+买卖差*0.8),(多空线+买卖差*0.95),1,0)COLOR66FF00;}
花:=SLOPE(EMA(C,3),3);
神:=SLOPE(EMA(C,7),7);
DRAWICON(CROSS(花,神) AND CLOSE/REF(CLOSE,1)>1.03,LOW*0.96,25);
DRAWTEXT(CROSS(花,神) AND CLOSE/REF(CLOSE,1)>1.03,LOW*0.96,'买'),COLORWHITE;
花2:=EMA(SLOPE(1,1)+C,3),COLORRED;
神2:=EMA(SLOPE(1,1)+C,7),COLORBLUE;
A2:=3*EMA((C-LLV(L,30))/(HHV(H,30)-LLV(L,30))*100,5)-2*EMA((C-LLV(L,30))/(HHV(H,30)-LLV(L,30))*100,5);
A4:=(HHV(H,34)-C)/(HHV(H,34)-LLV(L,34))*100;
A5:=EMA(CLOSE,12)-EMA(CLOSE,26);
A6:=EMA(A5,9);
A7:=(A5<-0.1 AND A5>A6);
财神:IF(A7,LLV(L,21),DRAWNULL)COLORRED,CIRCLEDOT;
DRAWTEXT_FIX(1,0.07,0,0,HYBLOCK)COLOR0080FF;
DRAWTEXT_FIX(1,0.01,0.08,0,'主题投资：')COLOR0000FF;
DRAWTEXT_FIX(1,0.09,0.08,0,EXTERNSTR(0,1))COLOR0000FF;
{跳空}
STICKLINE(REF(L,1)>H,H,REF(L,1),5,0),COLORGRAY;
STICKLINE(REF(H,1)<L,L,REF(H,1),5,0),COLORGRAY;
{彩色K线}
TYX3:=MA(REF(HHV((C+L+O+H)/4,30),1),3);
TYX4:=MA((C+L+O+H)/4,13);
TYX5:=EMA((C+L+O+H)/4,21);
{空心红}
STICKLINE(C<TYX5 AND C>O,H,L,0,0),COLORRED;
STICKLINE(C<TYX5 AND C>O,C,O,3,1),COLORRED;
{深绿}
STICKLINE(C<TYX5 AND C<O,H,L,0,0),COLOR007700;
STICKLINE(C<TYX5 AND C<O,C,O,3,0),COLOR005500;
STICKLINE(C<TYX5 AND C<O,C,O,2,0),COLOR006600;
STICKLINE(C<TYX5 AND C<O,C,O,1,0),COLOR007700;
{蓝}
STICKLINE(C>TYX5 AND C<O,H,L,0,0),COLORFFDD44;
STICKLINE(C>TYX5 AND C<O,C,O,3,0 ),COLORFF7700;
STICKLINE(C>TYX5 AND C<O,C,O,2,0 ),COLORFFAA22;
STICKLINE(C>TYX5 AND C<O,C,O,1 ,0 ),COLORFFDD44;
{黄}
STICKLINE(C>TYX5 AND C>O,H,L,0,0 ),COLOR00EEFF;
STICKLINE(C>TYX5 AND C>O,C,O,3,0 ),COLOR00AAFF;
STICKLINE(C>TYX5 AND C>O,C,O,2,0 ),COLOR00CCFF;
STICKLINE(C>TYX5 AND C>O,C,O,1,0 ),COLOR00EEFF;
{粉红}
STICKLINE(C>TYX4 AND C>O,H,L,0,0),COLORFF66AA;
STICKLINE(C>TYX4 AND C>O,C,O,3,0 ),COLORFF11FF;
STICKLINE(C>TYX4 AND C>O,C,O,2,0 ),COLORFF44FF;
STICKLINE(C>TYX4 AND C>O,C,O,1,0 ),COLORFF66FF;
{亮灰}
STICKLINE(C>TYX4 AND C<O,H,L,0,0),COLOR999999;
STICKLINE(C>TYX4 AND C<O,C,O,3,0),COLOR555555;
STICKLINE(C>TYX4 AND C<O,C,O,2,0),COLOR777777;
STICKLINE(C>TYX4 AND C<O,C,O,1,0),COLOR999999;
{深红}
STICKLINE(C>TYX3 AND C>O,H,L,0,0),COLOR0000DD;
STICKLINE(C>TYX3 AND C>O,C,O,3,0),COLOR000099;
STICKLINE(C>TYX3 AND C>O,C,O,2,0),COLOR0000BB;
STICKLINE(C>TYX3 AND C>O,C,O,1,0),COLOR0000DD;
{涨跌停K线}
STICKLINE((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(C,1)),OPEN,CLOSE,1,0),COLORYELLOW;
STICKLINE((REF(C,1)-C)*100/REF(C,1)>=(10-0.01*100/REF(C,1)),OPEN,CLOSE,1,0),COLORWHITE;
{突破}
STICKLINE(REF(COUNT(C<TYX3,5)=5,1) AND C>TYX3 AND C>O,C,O,1,0),COLOR00CCFF;
STICKLINE(REF(COUNT(C<TYX3,5)=5,1) AND C>TYX3 AND C>O,C,O,1,0),COLOR00CCFF;
{涨停}
STICKLINE(CLOSE>REF(CLOSE,1)*1.0985 AND CLOSE=HIGH,CLOSE,OPEN,4,-1),COLOR00FFFF;
{蓝}
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,3,0),COLORFF7700;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,2.2,0),COLORFF9900;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,1.5,0),COLORFFBB00;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,0.5,0),COLORCYAN;
{红}
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0),COLOR000099;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2.2,0),COLOR0000CC;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1.5,0),COLOR0000FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0.5,0),COLORCC66FF;
{绿}
STICKLINE(VAR3,OPEN,(OPEN+CLOSE)/2,3,0),COLORGREEN;
STICKLINE(VAR3,OPEN,(OPEN+CLOSE)/2,2.2,0),COLORGREEN;
STICKLINE(VAR3,OPEN,(OPEN+CLOSE)/2,1.5,0),COLORGREEN;
STICKLINE(VAR3,OPEN,(OPEN+CLOSE)/2,0.5,0),COLORGREEN;
{灰}
STICKLINE(VAR4,OPEN,(OPEN+CLOSE)/2,3,0),COLOR999999;
STICKLINE(VAR4,OPEN,(OPEN+CLOSE)/2,2.2,0),COLORBBBBBB;
STICKLINE(VAR4,OPEN,(OPEN+CLOSE)/2,1.5,0),COLORDDDDDD;
STICKLINE(VAR4,OPEN,(OPEN+CLOSE)/2,0.5,0),COLORFFFFFF;
DRAWICON(C<O AND C>REF(C,1),H,6);{假阴真阳}
均价:AMOUNT/VOL/100,NODRAW;
假阴0:=O>C AND 均价>REF(C,1);
DRAWTEXT(假阴0,L-0.2,'↖假阴真阳'),COLORE8E8E8;
STICKLINE(假阴0,O,C,1,0),COLORRED;
VVOL:=IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL);{模拟量}
H_L:=0.1*CONST(HHV(VOL,240));
长阴短柱:=C/REF(C,1)<=0.96 AND V<HHV(V,30)/1.9;
DRAWTEXT(长阴短柱 ,V+1.6*0.098,'长阴短柱↙'),COLORLICYAN;
MA05:=MA(C,5);
MA5角度: ATAN((MA05/REF(MA05,1)-1)*100)*180/3.1416,NODRAW;
T01:=CONST(LLVBARS(LOW,10));
T1HIGH:=CONST(REF(HIGH,T01));
MM:=CONST(CURRBARSCOUNT);
T02:=CONST(BARSLAST(CURRBARSCOUNT>MM+T01 AND H>T1HIGH));
T2HIGH:=CONST(REF(HIGH,T02));
T03:=CONST(BARSLAST(CURRBARSCOUNT>MM+T02 AND HIGH>T2HIGH));
T3HIGH:=CONST(REF(HIGH,T03));
攻击线:DRAWLINE(CURRBARSCOUNT=T03+1, T3HIGH, ISLASTBAR, T3HIGH,1),LINETHICK3,COLOR8080FF;
DRAWTEXT(ISLASTBAR, T3HIGH, '必杀攻击线')LINETHICK2,COLORCYAN;
2014理想通达信5.87B国庆献礼！
TDXW_7.16_2014国庆节礼物http://dl.vmall.com/c0ohb8cvsc
http://pan.baidu.com/s/1o6uRfgI
作者：飞越彩泓
2014理想通达信5.87B国庆献礼！
本版把主程序升级为最新官方通达信 V7.16 14091814_5.87B 机构交易版，局部版面集成了短线极品等老师的精华，并融入了近些年本人自用的全部精品指标。股指期货港股以及基金等一应俱全。其余的依旧基本秉承了以往惯有的功能，希望大家喜欢。共庆国庆，献礼给大家。历史千古秀，中华万年青！谨祝大家开心幸福健康投资，发大财！！
下载地址：http://pan.baidu.com/s/1qWDdKLI
文件名：以柔克庄优化版.zip
文件大小：57.1M
下载地址：http:///z39n
|
新建文本文档 (2).zip (221 Bytes) 
4个预警每天不超过20个票.rar (10.11 KB) 
