|
以下是通达信操盘线生命线持股线洗盘杀入线均线缠绕选股（无源码的请下载附件导入）
操盘线，生命线，持股线，洗盘杀入线，均线缠绕选股，明天大涨，拼命买。组合线主图冰糖编辑 等3个指标公式
{拼命买}
VOLUME:=VOL;
主力启动线:=MA(VOL,5);
主力洗盘线:=MA(VOL,35);
资金异动线:=MA(VOL,135);
V1:=CLOSE/REF(CLOSE,3)>=1.1;
V2:=BACKSET(V1,2);
V3:=REF(CLOSE,3)*1.1;
V4:=CROSS(C,V3);
拼命买:IF(V2 AND COUNT(V2,2)=1,1,0);
STICKLINE(拼命买>0,0,1,3,0),COLORMAGENTA;
DRAWTEXT(拼命买>0.35,3.5,'明天大涨，拼命买'),COLOR0000FF,LINETHICK2;
{决策生命线+均线粘合选股+抓牛主图 自带趋势线+拼命买（主力启动线、主力洗盘线+三均线粘合选股 冰糖编辑}
VAR2:=LLV(LOW,10);
VAR3:=HHV(HIGH,25);
小心: 3.2,COLORYELLOW;
风险: 3.5,COLORBLUE;
动力线:= EMA((CLOSE-VAR2)/(VAR3-VAR2)*4,4);
STICKLINE(动力线>REF(动力线,1) ,动力线 ,REF(动力线,1),0,0),COLORRED;
STICKLINE(动力线<=REF(动力线,1) ,动力线 ,REF(动力线,1),0,0),COLOR00FF00;
底部:0.2,COLORC6C600;
关注:0.5,COLORFF75FF;
DRAWICON( FILTER(CROSS(动力线,关注),20),动力线+0.02 ,3);
DRAWICON( FILTER(CROSS(动力线,底部),20),动力线+0.02 ,3);
强弱分界:1.75,COLORRED,DOTLINE;
趋势:MA(动力线,3);
IF(趋势>REF(趋势,1),趋势,DRAWNULL),LINETHICK2,COLORRED;
IF(趋势<REF(趋势,1),趋势,DRAWNULL),LINETHICK2,COLORGREEN;
出击:IF((趋势>REF(趋势,1)) AND (REF(趋势,1)<REF(趋势,2)) AND (趋势<1),0.3,0);
{抓牛主图 自带趋势线}
快线:EMA(EMA(EMA(EMA(CLOSE,2),2),2),2),LINETHICK2,COLOR0000FF;
慢线:EMA(REF(快线,1),2),LINETHICK2,COLOR00FFFF;
总趋势:EMA(EMA(EMA(EMA(EMA(CLOSE,55),2),2),2),2),LINETHICK2,COLORFF00FF;
HIGHN:=10;LOWN:=10;HIGHDISPLAY:=0;LOWDISPLAY:=0;ZGDISPLAY:=0;MADISPLAY:=0;
AA:=REF(H,HIGHN)=HHV(H,2*HIGHN+1);
QY:=BACKSET(AA,HIGHN+1);
CC:=FILTER(QY,HIGHN) AND H=HHV(H,HIGHN+1);
DDD:=BARSLAST(CC);
GDTS:=IF(CC,CURRBARSCOUNT,0);
DINGBU:=IF(DDD,REF(H,DDD),H);{顶部}
DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS);
DINGBU1:=REF(DINGBU,DDD+1);
GDCS1:=CONST(DINGBUTS);
DINGBUTS1:=REF(DINGBUTS,DDD+1);
GDCS2:=CONST(DINGBUTS1);
DINGBU2:=REF(DINGBU1,DDD+1);
MM:=IF(CURRBARSCOUNT>GDCS2,0,1);
高点压力:DRAWLINE(CURRBARSCOUNT=GDCS2,H,CURRBARSCOUNT=GDCS1,H,1) COLORGREEN,LINETHICK2;
DRAWLINE(CURRBARSCOUNT=GDCS2,H,ISLASTBAR,REF(H,GDCS2-1),1),COLOR0055FF,POINTDOT;
DRAWLINE(CURRBARSCOUNT=GDCS1,H,ISLASTBAR,REF(H,GDCS1-1),1),COLORYELLOW,POINTDOT;
AA1:=REF(L,LOWN)=LLV(L,2*LOWN+1);
QY1:=BACKSET(AA1,LOWN+1);
CC1:=FILTER(QY1,LOWN) AND L=LLV(L,LOWN+1);
DD1:=BARSLAST(CC1);
DDTS:=IF(CC1,CURRBARSCOUNT,0);
YDB:=IF(DD1,REF(L,DD1),L);
DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS);
DDCS1:=CONST(DDTS1);
ZDB:=REF(YDB,DD1+1);
DDTS2:=REF(DDTS1,DD1+1);
DDCS2:=CONST(DDTS2);
低点支撑:DRAWLINE(CURRBARSCOUNT=DDCS2,L,CURRBARSCOUNT=DDCS1,L,1) COLORRED,LINETHICK2;
ZGSTAR:=(高点压力+低点支撑)/2;
ZGEND:=CONST((高点压力+低点支撑)/2);
STARDAY:=IF(DDCS2<GDCS2,DDCS2,GDCS2);
中轨:DRAWLINE(CURRBARSCOUNT=STARDAY,ZGSTAR,ISLASTBAR,ZGEND,1),COLORFF55BB,LINETHICK2;
DRAWLINE(CURRBARSCOUNT=DDCS1,L,ISLASTBAR,REF(L,DDCS1-1),1),COLORMAGENTA,POINTDOT,;
DRAWLINE(CURRBARSCOUNT=DDCS2,L,ISLASTBAR,REF(L,DDCS2-1),1),COLORCYAN,POINTDOT;
{均线粘合选股}
N:=10;
MA5:=MA(CLOSE,5);
MA10:=MA(CLOSE,10);
MA20:=MA(CLOSE,20);
MA30:=MA(CLOSE,30);
MA60:=MA(CLOSE,60);
MA90:=MA(CLOSE,90);
MA120:=MA(CLOSE,120);
MA250:=MA(CLOSE,250);
DTPL:=MA10>MA30 AND MA30>REF(MA30,1);
DG:=MAX(MAX(MA5,MA10),MAX(MA20,MA30));
ZG:=MAX(MAX(DG,MA60),MAX(MA90,MA120));
DD:=MIN(MIN(MA5,MA10),MIN(MA20,MA30));
ZD:=MIN(MIN(DD,MA60),MIN(MA90,MA120));
粘合:=(ZG/ZD-1)*100<N,POINTDOT,LINETHICK0;
高粘:=(ZG/ZD-1)*100<N AND ZD>MA250,POINTDOT,LINETHICK0;
穿5:(粘合 AND CROSS(C,MA5))*0.5;
穿10:(粘合 AND CROSS(C,MA10))*1;
穿20:(粘合 AND CROSS(C,MA20))*2;
穿30:(粘合 AND CROSS(C,MA30))*3;
FLSZ:=(C/REF(C,1)-1)*100>=2 AND V>REF(V,1);
DXTP:=((穿5/0.5)+穿10+(穿20/2)+(穿30/3))>=2;
优选:(FLSZ AND DXTP AND MA30>REF(MA30,1))*3,COLOR00FFFF,LINETHICK2;
选优:(FLSZ AND DXTP AND MA30>REF(MA30,1) AND COUNT(高粘,20)>=15)*3,COLOR0000FF,LINETHICK2;
JXDT:=MA5>MA10 AND MA10>MA20 AND MA20>MA30;
发散:(JXDT AND NOT(REF(JXDT,1)))*1,COLOR00FF00,LINETHICK2;
起飞:(NOT(粘合) AND REF(粘合,1) AND COUNT(粘合,20)>=15 AND DTPL)*3,COLORFF00FF,LINETHICK2;
{以下设置副图显示方式}
STICKLINE(粘合,-0.2,0,4,0),COLOR00FF00;
STICKLINE(高粘,0.2,0,4,0),COLORFF00FF;
DRAWTEXT(优选,3,'优●选'),COLOR00FFFF;
DRAWTEXT(发散,2,'发●散'),COLOR00FF00;
DRAWTEXT(起飞,3,'起●飞'),COLOR00FFFF;
DRAWICON(选优,0.3,1);
DRAWICON(起飞,3,1);
{拼命买（主力启动线、主力洗盘线）}
VOLUME:=VOL;
主力启动线:=MA(VOL,5);
主力洗盘线:=MA(VOL,35);
资金异动线:=MA(VOL,135);
V1:=CLOSE/REF(CLOSE,3)>=1.1;
V2:=BACKSET(V1,2);
V3:=REF(CLOSE,3)*1.1;
V4:=CROSS(C,V3);
拼命买:IF(V2 AND COUNT(V2,2)=1,1,0);
STICKLINE(拼命买>0,0,1,3,0),COLORMAGENTA;
DRAWTEXT(拼命买>0.35,3.5,'明天大涨，拼命买'),COLOR0000FF,LINETHICK2;
{三均线粘合选股}
X1:=ABS(MA(C,10)/MA(C,20)-1)<0.01;{取1%振幅内粘合}
X2:=ABS(MA(C,5)/MA(C,10)-1)<0.01;
X3:=ABS(MA(C,5)/MA(C,20)-1)<0.01;
AA8:=MA(C,5)>REF(MA(C,5),1);BB:=MA(C,10)>REF(MA(C,10),1);
CC8:=MA(C,5)>MA(C,10);{均线勾头向上}
CDJZ:=ABS(MA(C,20)-MA(C,90))/MA(C,60);{长短均线距离绝对值越小越好}
MA(C,5)>REF(MA(C,5),1) AND X1 AND X2 AND X3
AND CDJZ AND AA8 AND BB AND CC8;
{X4:=ABS(MA(C,5)/MA(C,30)-1)<0.01;
MA(C,5)>REF(MA(C,5),1) AND X1 AND X2 AND X3 AND X4;}{也可以再加：四线粘合};
{洗盘杀入5线}
{洗盘杀入线主图+组合生命线主图+均线缠绕选股+操盘线优化版+钻石主图（生命线、持股线+明天大涨，拼命买 冰糖编辑}
T11:=CONST(LLVBARS(LOW,10));
T11HIGH:=CONST(REF(HIGH,T11));
CC1:=CONST(CURRBARSCOUNT);
T22:=CONST(BARSLAST(CURRBARSCOUNT>CC1+T11 AND H>T11HIGH));
T22HIGH:=CONST(REF(HIGH,T22));
T33:=CONST(BARSLAST(CURRBARSCOUNT>CC1+T22 AND HIGH>T22HIGH));
T33HIGH:=CONST(REF(HIGH,T33));
C>=T33HIGH AND REF(C,1)<T33HIGH
AND DYNAINFO(17)>2;
N:=10;
T1:=CONST(LLVBARS(LOW,N));
T1HIGH:=CONST(REF(HIGH,T1));
CC:=CONST(CURRBARSCOUNT);
T2:=CONST(BARSLAST((CURRBARSCOUNT >(CC+T1)) AND (HIGH>T1HIGH)));
T2HIGH:=CONST(REF(HIGH,T2));
T3:=CONST(BARSLAST((CURRBARSCOUNT >(CC+T2)) AND (HIGH>T2HIGH)));
T3HIGH:=CONST(REF(HIGH,T3));
洗盘杀入线:DRAWLINE(CURRBARSCOUNT=T3+1, T3HIGH, ISLASTBAR, T3HIGH, 1),LINETHICK3,COLOR0000FF;
DRAWTEXT(ISLASTBAR, T3HIGH, ' 洗盘杀入线')LINETHICK1,COLORYELLOW;
{均线缠绕选股}
MA5:=MA(C,5);
MA10:=MA(C,10);
A:=BARSLAST(CROSS(MA5,MA10))+1;
G1:=HHV(H,A);
D1:=LLV(L,A);
G2:=REF(G1,A);
D2:=REF(D1,A);
G3:=REF(G2,A);
D3:=REF(D2,A);
均线缠绕选股:(G2-G1)/G1>0.05 AND (G3-G2)/G2>0.05 AND G1<D3 AND D1=LLV(L,60);
{组合生命线主图}
日均价:=(C*3+H+L+O)/6;
SA1:=MA(C,5);
SA:=IF(C>SA1,L,H);
JUNJ:=SA;
ED1:=(-2*REF(JUNJ,2)+REF(JUNJ,1)+2*JUNJ),COLORBLUE;
ED2:=(-0.4*REF(JUNJ,4)-0.4*REF(JUNJ,3)-1.1*REF(JUNJ,2)+0.9*REF(JUNJ,1)+2*JUNJ),COLORBLUE;
ED3:=(-0.8*REF(JUNJ,4)-0.8*REF(JUNJ,3)-0.2*REF(JUNJ,2)+0.8*REF(JUNJ,1)+2*JUNJ),COLORBLUE;
JF1:=SMA(SMA(ED1,3,1),3,1),COLOR999900;
BIAS1 :=(JF1-MA(JF1,5))/MA(JF1,5)*100;
XAM1:=FLOOR(((JF1-MA(JF1,5))/MA(JF1,5)*100)/5);
生命线:SMA(SMA((EMA(日均价,ABS(5- XAM1))),3,1),3,1),COLORCYAN;
T10:=CONST(HHVBARS(V,10));
EP10:IF(CURRBARSCOUNT<=10+3,CONST(IF(T10=0,C,REF(C,T10))),DRAWNULL),COLORFEFEFE;
IF(CURRBARSCOUNT=T10+1,EP10,DRAWNULL),CIRCLEDOT,COLORFEFEFE;
T20→10:=CONST(REF(HHVBARS(V,10),10)+10);
EP20→10:IF(CURRBARSCOUNT<=20+3 AND CURRBARSCOUNT>=5,CONST(REF(C,T20→10)),DRAWNULL),COLOR009900;
IF(CURRBARSCOUNT=T20→10+1,EP20→10,DRAWNULL),CIRCLEDOT,COLOR00CC00;
T30→20:=CONST(REF(HHVBARS(V,10),20)+20);
EP30→20:IF(CURRBARSCOUNT<=30+3 AND CURRBARSCOUNT>=5,CONST(REF(C,T30→20)),DRAWNULL),COLOR009900;
IF(CURRBARSCOUNT=T30→20+1,EP30→20,DRAWNULL),CIRCLEDOT,COLOR00CC00;
T45→30:=CONST(REF(HHVBARS(V,15),30)+30);
EP45→30:IF(CURRBARSCOUNT<=45+3 AND CURRBARSCOUNT>=5,CONST(REF(C,T45→30)),DRAWNULL),COLOR009900;
IF(CURRBARSCOUNT=T45→30+1,EP45→30,DRAWNULL),CIRCLEDOT,COLOR00CC00;
T65→45:=CONST(REF(HHVBARS(V,20),45)+45);
EP65→45:IF(CURRBARSCOUNT<=65+3 AND CURRBARSCOUNT>=5,CONST(REF(C,T65→45)),DRAWNULL),COLOR009900;
IF(CURRBARSCOUNT=T65→45+1,EP65→45,DRAWNULL),CIRCLEDOT,COLOR00CC00;
涨家数:INDEXADV,NODRAW, ;
跌家数:INDEXDEC,NODRAW,COLORGREEN;
C3:=REF(C,1);
涨停:=IF((C-C3)*100/C3>=(10-0.01*100/C3),1,0);
STICKLINE(涨停,OPEN,CLOSE,2.5,0),COLORRED;
跌停:=IF((C3-C)*100/C3>=(10-0.01*100/C3),1,0);
STICKLINE(跌停,OPEN,CLOSE,2.5,0),COLORGREEN;
VAR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
K:=(C+H+L)/3;
D:=MA(K,4);
DRAWTEXT(REF(C,1)>D AND C<D AND D>REF(D,1),H*0.95, 'S'),COLORGREEN;
DRAWTEXT(REF(C,1)<D AND C>D AND D<REF(D,1),L*0.98 ,'B'),COLORRED;
{多空生命线横空出世主图}
生命线1:MA(CLOSE,26),COLORRED,LINETHICK2;STICKLINE(C>=生命线1 AND C>=O,C,O,7,0),COLORRED;STICKLINE(C>=生命线1 AND C>=O,H,L,0,0),COLORRED;DP:=IF(C=INDEXC,0,1);GJ:=AMOUNT/V/100 ;
多头线:EMA(C,1.5),COLORYELLOW;
空头线:EMA(C,5),COLOR00FF00;
均衡线:EMA(空头线,5),COLORWHITE;
VARF1:=COUNT(CROSS(多头线,均衡线),2)=1;
VARF2:=COUNT(CROSS(空头线,均衡线),2)=1;
ZAI:=FILTER(VARF1 AND VARF2,2);
DRAWTEXT(ZAI,均衡线*0.98,' 主力拉升'),COLOR00FF00;
MTM:=CLOSE-REF(CLOSE,1);
DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);
DY:=HHV(DX,2)=HHV(DX,7) AND COUNT(DX>50,2) AND CROSS(MA(DX,2),DX);
LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
ZDF:=(C-REF(C,1))/REF(C,1)*100;
STICKLINE(ZDF>9.8,O,C,6,0),COLORRED;
STICKLINE(ZDF<-9.8,O,C,6,0),COLORBLUE;
白买进:0,COLORWHITE,LINETHICK0;
黄加仓:0,COLORYELLOW,LINETHICK0 ;
蓝跌:0,COLORBLUE,LINETHICK0;
绿见顶:0,COLORGREEN,LINETHICK0;
粗红强势:0,COLORRED,LINETHICK0;
红蓝调整:0,COLORRED,LINETHICK0;
VAR19:=(100 - ((90 * (HHV(HIGH,21) - CLOSE)) / (HHV(HIGH,21) - LLV(LOW,21))));
VAR2:=(100 - ((90 * (HHV(HIGH,21) - CLOSE)) / (HHV(HIGH,21) - LLV(LOW,21))));VAR3:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34));DRAWICON(CROSS(VAR2,MA(VAR3,6)),(LOW * 0.998),8);DRAWICON(CROSS(MA(VAR3,6),VAR1),(HIGH * 1.013),9);DRAWTEXT(CROSS(VAR2,MA(VAR3,6)),(LOW * 0.984),'买 '),COLOR4440FF;DRAWTEXT(CROSS(MA(VAR3,6),VAR1),(HIGH * 1.035),'卖 '),COLORFFFF34;
VARE1:=EMA(C,3);VARE2:=EMA(C,5);VARE3:=EMA(C,10);
VAR4:=EMA(C,20);VAR5:=EMA(C,30);VAR6:=(VAR2+VAR3+VAR4+VAR5)/4;VAR7:=(VAR6-REF(VAR6,15))/REF(VAR6,15)*100;
VAR8:=(VAR6-REF(VAR6,15))/REF(VAR6, 15)*100;VAR9:=EMA(VAR7,8);STICKLINE(VAR7<1*REF(VAR7,1),H,L,0.5,0),COLORBLUE;STICKLINE(VAR7<1*REF(VAR7,1),O,C,5,1),COLORBLUE;STICKLINE(VAR7>1*REF(VAR7,1),H,L,0.5,0),COLORRED;STICKLINE(VAR7>1*REF(VAR7,1),O,C,5, 1),COLORRED;STICKLINE(VAR7<1*REF(VAR7,1) AND VAR9>1*REF(VAR9,1),H,L,0.5,0),COLORGREEN;STICKLINE(VAR7<1*REF(VAR7,1) AND VAR9>1*REF(VAR9,1),O,C,5, 1),COLORGREEN;买进价:=((C-REF(MA(C,6),1))/6+MA(C,6))*1.004;买进条件:=CROSS(C,买进价) AND 买进价>REF(买进价,1);STICKLINE(买进条件,H,L,0.5,1),COLORWHITE,LINETHICK2;STICKLINE(买进条件,O,C,6,0),COLORWHITE,LINETHICK2;加码价:=((C-REF(MA(C,18),1))/18+MA(C,18))*1.004;加码条件:=CROSS(C,加码价) AND 加码价>REF(加码价,1);STICKLINE(加码条件,H,L,0.5,1),COLORYELLOW,LINETHICK2;STICKLINE(加码条件,O,C,6,0),COLORYELLOW,LINETHICK2;
{钻石主图（生命线、持股线}
AMV0:=VOL*(O+C)/2;
生命线2:SUM(AMV0,88)/SUM(VOL,88),COLORFF00FF,LINETHICK2;
CG:MA(C,17),COLORFFCC66,LINETHICK2;
FL:=HHV(CG,2);
持股线:HHV(CG,2),COLOR00FF00;
FS:CG-(FL-CG),COLORYELLOW,LINETHICK2;
MA3:MA(C,3),COLORGRAY;
MA13:MA(C,13),COLORRED;
信号:=COUNT(REF(EMA(C,3),1)<REF(EMA(C,3),2),5)=5
AND EMA(C,3)>REF(EMA(C,3),1);
DRAWICON(信号,L*0.98,25);
{操盘线优化版}
工作线:=EMA(C,14);
止盈线:EMA(C,7),LINETHICK1,COLORGRAY;
工作区:IF(C>=工作线 AND EMA(C,14)>=EMA(C,25),工作线,DRAWNULL), COLORRED, LINETHICK2;
准备区:IF(C>=工作线 AND EMA(C,14)<EMA(C,25),工作线,DRAWNULL), COLORMAGENTA, LINETHICK2;
休息区:IF(C<工作线,工作线,DRAWNULL), COLORGREEN, LINETHICK2;
生命线3:EMA(C,25),COLORYELLOW,LINETHICK2;
DRAWICON(CROSS(工作线,生命线3),工作线*0.95,5);
DRAWICON(CROSS(C,生命线3) AND C>EMA(C,14),L*0.96,1);
DRAWICON(COUNT(C<EMA(C,7),2)=2 AND EMA(C,7)>EMA(C,14) AND COUNT(C>止盈线,6)>=3,H*1.08,2);
DRAWTEXT(CROSS(工作线,C) AND EMA(C,14)>EMA(C,25),H*1.05,'止损'),COLORYELLOW;
DRAWICON(CROSS(生命线3,工作线),HIGH*1.04,4);
{拼命买}
VOLUME:=VOL;
主力启动线:=MA(VOL,5);
主力洗盘线:=MA(VOL,35);
资金异动线:=MA(VOL,135);
V1:=CLOSE/REF(CLOSE,3)>=1.1;
V2:=BACKSET(V1,2);
V3:=REF(CLOSE,3)*1.1;
V4:=CROSS(C,V3);
拼命买:IF(V2 AND COUNT(V2,2)=1,1,0);
STICKLINE(拼命买>0,0,1,3,0),COLORMAGENTA;
DRAWTEXT(拼命买>0.35,3.5,'明天大涨，拼命买'),COLOR0000FF,LINETHICK2;
651122797.png
|
