布林喇叭口
漲停板:=(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國慶節(jié)禮物http://dl.vmall.com/c0ohb8cvsc http://pan.baidu.com/s/1o6uRfgI
作者:飛越彩泓
2014理想通達信5.87B國慶獻禮!
本版把主程序升級為最新官方通達信 V7.16 14091814_5.87B 機構(gòu)交易版,局部版面集成了短線極品等老師的精華,并融入了近些年本人自用的全部精品指標。股指期貨港股以及基金等一應(yīng)俱全。其余的依舊基本秉承了以往慣有的功能,希望大家喜歡。共慶國慶,獻禮給大家。歷史千古秀,中華萬年青!謹祝大家開心幸福健康投資,發(fā)大財!! 下載地址:http://pan.baidu.com/s/1qWDdKLI
文件名:以柔克莊優(yōu)化版.zip 文件大?。?7.1M 下載地址:http:///z39n
|