TDXW_7.16_2014国庆节礼物http://pan.baidu.com/s/1o6uRfgI看很多人喜欢布林公式就发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)=1AND 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)>0AND 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)=1AND 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)>0AND 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;M80:MA(C,80),LINETHICK0;M200:MA(C,200),LINETHICK0;DRAWBAND(M200,RGB(40,100,40),M80,RGB(100,100,0)),LINETHICK0;DRAWKLINE(H,O,L,C);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,LINETHICK3;IF(多空线< REF(多空线,1),多空线,DRAWNULL),,COLORGREEN,LINETHICK3;牛皮熊: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;花:=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;A02:=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;窗口显示:=C>REF(C,1)*1.095 AND C=H;T:=BARSLAST(窗口显示),LINETHICK0;涨停价:REF(C,T)NODRAW,LINETHICK0;涨停日期:REF(DATE-1000000,T)NODRAW,LINETHICK0;STICKLINE(L>REF(H,1),L,REF(H,1),20,1001), COLORYELLOW ,LINETHICK0;STICKLINE(REF(L,1)>H,REF(L,1),H,20,1001), COLORGREEN ,LINETHICK0;TJ01:=C<O AND REFX(C<O,1) AND REFX(C>O,2);DRAWLINE(TJ01,REFX(LLV(L,2),1),REF(TJ01,1),REF(REFX(LLV(L,2),1),1),1)COLORYELLOW,LINETHICK0;DRAWLINE(TJ01,REFX(HHV(C,2),1),REF(TJ01,1),REF(REFX(HHV(C,2),1),1),1)COLORYELLOW,LINETHICK0;{波峰}TY:=H;A1:=REF(TY,10)=HHV(TY,2*10+1); B1:=FILTER(A1,10); C1:=BACKSET(B1,10+1);HD:=FILTER(C1,10);A2:=REF(TY,10)=LLV(TY,2*10+1); B2:=FILTER(A2,10); C002:=BACKSET(B2,10+1);LD:=FILTER(C002,10);波峰:REF(H,BARSLAST(HD)),COLOR00808F,POINTDOT,LINETHICK4;STICKLINE(H,波峰,波峰,8,0),COLOR00808F,LINETHICK4;BDGD:=C=HHV(C,13);GDSJ:=BARSLAST(FILTER(CROSS(0.8,BDGD),2))+1;高点:REF(C,GDSJ),COLORGREEN,LINETHICK4,POINTDOT;突破:CROSS(C,REF(高点,1)),COLOR00FFFF,POINTDOT,LINETHICK0;STICKLINE(GDSJ<=6,高点,高点,8,0),COLORGREEN,LINETHICK2;BDDD:=C=LLV(C,13);DDSJ:=BARSLAST(FILTER(CROSS(0.8,BDDD),2))+1;低点:REF(C,DDSJ),COLOR0055FF,POINTDOT,LINETHICK4;STICKLINE(DDSJ<=6,低点,低点,8,0),COLOR0055FF,LINETHICK4;AAA:=(REF(CLOSE,1)+REF(CLOSE,2)+OPEN)/3;前高:DRAWLINE(CURRBARSCOUNT=3,H,REF(CURRBARSCOUNT=3,1),REF(H,1),1),LINETHICK2;昨收:DRAWLINE(CURRBARSCOUNT=2,C,REF(CURRBARSCOUNT=2,1),REF(C,1),1),LINETHICK2;压力线:DRAWLINE(HIGH>=HHV(HIGH,10),HIGH,LOW<=LLV(LOW,3),HHV(HIGH,3),1),COLORYELLOW,LINETHICK2;DRAWTEXT(压力线,L-0.2,'压力↙'),COLORYELLOW;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;DRAWTEXT(平台突破,L-0.05,'平台突破'),COLORGREEN;三日最低:=EMA((REF(L,4)+REF(L,3)+REF(L,2))/3,3);三日最高:=EMA((REF(H,4)+REF(H,3)+REF(H,2))/3,3);EXITLONG:CROSS(CROSS(三日最高,C),0.6);ENTERLONG:CROSS(CROSS(C,三日最低),0.5);STICKLINE(C/REF(C,1)>1.095,C,O,2,0),COLORYELLOW;涨停:=IF(REF(C,1)*1.095-C<0.01 ,1,0);STICKLINE(涨停,OPEN,CLOSE,2.5,0),COLORYELLOW;DRAWTEXT(涨停,L-0.1,'涨停'),COLORYELLOW;C3:=REF(C,1);跌停:=IF((C3-C)*100/C3>=(10-0.01*100/C3),1,0);STICKLINE(跌停,OPEN,CLOSE,2.5,0),COLORBLUE;DRAWTEXT(跌停,H+0.3,'跌停'),COLORBLUE;NN:=120;{跳空}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;{红绿三角【副图】}A10304:=REF(HIGH,3)=HHV(HIGH,2*3+1);B10304:=FILTER(A10304,3);C10304:=BACKSET(B10304,3+1);D10304:=FILTER(C10304,3);{高点}A20304:=REF(LOW,3)=LLV(LOW,2*3+1);B20304:=FILTER(A20304,3);C20304:=BACKSET(B20304,3+1);D20304:=FILTER(C20304,3);{低点}E10304:=(REF(LLV(LOW,2*3),1)+REF(HHV(HIGH,2*3),1))/2;E20304:=(HIGH+LOW)/2;{高低点出现在同一K线上时可作取舍}H10304:=(D10304 AND NOT(D20304 AND E10304>=E20304)) OR BARSTATUS=2 OR BARSCOUNT(CLOSE)=1;L10304:=(D20304 AND NOT(D10304 AND E10304=E20304));X10304:=REF(BARSLAST(H10304),1)+1;F10304:=BACKSET(H10304 AND COUNT(L10304,X10304)>0,LLVBARS(IF(L10304,LOW,10000),X10304));G10304:=F10304>REF(F10304,1);I10304:=BACKSET(G10304,2);LD0304:=I10304>REF(I10304,1);{过滤后低点}L20304:=LD0304 OR BARSTATUS=2 OR BARSCOUNT(CLOSE)=1;X20304:=REF(BARSLAST(L20304),1)+1;F20304:=BACKSET(L20304 AND COUNT(H10304,X20304)>0,HHVBARS(IF(H10304,HIGH,0),X20304));G20304:=F20304>REF(F20304,1);I20304:=BACKSET(G20304,2);HD0304:=I20304>REF(I20304,1);{过滤后高点}UU0304:=BACKSET(BARSTATUS=2,BARSLAST(LD0304)+1);VV0304:=UU0304>REF(UU0304,1);UU20304:=BACKSET(BARSTATUS=2,BARSLAST(HD0304)+1);VV20304:=UU20304>REF(UU20304,1);{以下语句为三角形部分}底:REF(L,BARSLAST(VV0304)),COLORYELLOW,LINETHICK0;顶:REF(H,BARSLAST(VV20304)),COLORYELLOW,LINETHICK0;{下跌三角形：绿色三角形画完介入}STICKLINE(VV0304,顶,底,0,0),COLORGREEN,LINETHICK2;DRAWLINE(VV20304,H,VV0304,L,0),COLORGREEN,LINETHICK2;{斜}DRAWLINE(VV20304,H,VV0304,顶,0),COLORGREEN,LINETHICK2;{上涨三角形：红色三角形画完出局}STICKLINE(VV20304 ,顶,底,0,0),COLORBLUE,LINETHICK2;DRAWLINE(VV0304,L,VV20304,H,0),COLORBLUE,LINETHICK2;{斜}DRAWLINE(VV0304,L,VV20304,底,0),COLORBLUE,LINETHICK2;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;    |
