通达信最牛攻击分时主图源码分亨修正版

得中 2024-11-14 13:32:34

经过重新优化建议使用这个版本

{任何指标都是参考,没有完美的公式,市场是动态运行,公式是设定死静态跟据市场量价不断变化,不要做为卖买的依据,据此操作后果自负。

一、指标说明:

监控资金流,根据资金流入流出,实时提示,资金攻击量,买卖时机,可能涨停的节点

二、分时主图公式如下:}

分析效果图

HS:=100*DYNAINFO(8)/CAPITAL;

ZHWS:=STRCAT(VAR2STR(DYNAINFO(8)/10000,2),'万手');

JHS:=STRCAT('今换手:',STRCAT(VAR2STR(HS,2),'%'));

JHS1:=STRCAT(JHS,' ≈ ');

DRAWTEXT_FIX(1,0.20,0.99,0,STRCAT(JHS1,ZHWS))COLORYELLOW;

LTPDW:=IF((FINANCE(46))/1000000>1,'亿股','万股');

LTP:=IF((FINANCE(46))/1000000>1,CON2STR((FINANCE(46))/100000000,2),CON2STR((FINANCE(46))/10000,0));

LTP1:=STRCAT(STRCAT('自由流通盘:',LTP),LTPDW);

LTPWS:=STRCAT(VAR2STR(FINANCE(46)/1000000,2),'万手');

LTP2:=STRCAT(LTP1,' ≈ ');

DRAWTEXT_FIX(1,0.37,0.99,0,STRCAT(LTP2,LTPWS))COLORMAGENTA;

DRAWTEXT_FIX(1,0.37,0.92,0,STRCAT(STRCAT('自由流通市值:',CON2STR(FINANCE(46)*C/100000000,2)),'亿元'))COLORMAGENTA;

KP:=(DYNAINFO(4)-DYNAINFO(3))/DYNAINFO(3)*100;

DRAWTEXT_FIX(1,0.2,0.65,0,STRCAT('开盘:',STRCAT(VAR2STR(KP,2),'%')))COLORYELLOW;

DRAWTEXT_FIX(1,0.2,0.85,0,STRCAT('最高价:',CON2STR(DYNAINFO(5),2)))COLORYELLOW;

DRAWTEXT_FIX(1,0.2,0.90,0,STRCAT('最低价:',CON2STR(DYNAINFO(6),2)))COLORYELLOW;资金流入:=SUM(IF(C>REF(C,1),V,0),FROMOPEN),STICK,COLORRED;

资金流出:=-SUM(IF(C<REF(C,1),V,0),FROMOPEN),STICK,COLOR00FF00;

资金出入:=资金流入+资金流出,COLORSTICK;

资金流量:=资金出入,COLORFFFFFF,LINETHICK1;

资金比:=资金出入/SUM(V,FROMOPEN)*100,COLOR00FFFF,LINETHICK1;

资金流量比:=IF(资金比>=0,(资金比+100)/2,100-ABS((资金比-100)/2));

增强流量比:=IF(资金流量比>50,资金流量比,50);

攻击量:=((HSL*0.50+(REF(HSL,1)*0.33))+(REF(HSL,2)*0.17))*SUM(C,FROMOPEN)/FROMOPEN;

攻击量A:=SUM(IF(C>REF(C,1),攻击量*V,0),FROMOPEN),COLOR0000FF,LINETHICK0;

攻击量B:=-SUM(IF(C<REF(C,1),攻击量*V,0),FROMOPEN),COLOR00FF00,LINETHICK0;

攻击流量:=攻击量A+攻击量B,COLORSTICK;

NOTEXT攻击线:=攻击流量,COLORYELLOW,LINETHICK1;

攻击比:=攻击流量/SUM(V,FROMOPEN)*100,COLORRED,LINETHICK1;

资金攻击度:=IF(攻击比>0,(攻击比+50),100-ABS((攻击比-50)));

攻击度限制:=IF(资金攻击度>100,100,IF(资金攻击度<0,0,资金攻击度));

增强攻击度:=IF(资金攻击度>50,资金攻击度,50);

开始攻击:=CROSS(攻击流量,0) AND (C>REF(C,2) OR (资金流量>0 AND 资金流量>攻击流量));

开始攻击量:=CROSS(攻击流量,0) AND C>REF(C,2) AND V>LLV(V,3)*3;

高点:=HHV(C,250);

低点:=LLV(C,250);

最高:=CONST(高点),NODRAW;

最低:=CONST(低点),NODRAW;

轴差:=最高-最低;

中价轴:=(最高+最低)/2;

HL3:=(100-0)/2*1.3;

HL4:=(100-0)/1*1.3;

中间价轴:=(50-HL3)*轴差/HL4+中价轴;

平安轴:=(中价轴+中间价轴)/2;

BGTYU:=1;

GHYJKU:=BETWEEN((CLOSE*BGTYU)/(SUM(AMOUNT,BARSCOUNT((CLOSE*BGTYU)))/SUM(VOL*100,BARSCOUNT((CLOSE*BGTYU)))),1.05,0.95);

VBNH:=IF(GHYJKU=0,MA((CLOSE*BGTYU),BARSCOUNT((CLOSE*BGTYU))),(SUM(AMOUNT,BARSCOUNT((CLOSE*BGTYU)))/SUM(VOL*100,BARSCOUNT((CLOSE*BGTYU)))));

起动线:=EXPMA((CLOSE/VBNH),20)*1,COLORYELLOW,POINTDOT;

主力线:=EXPMA((CLOSE/VBNH),60)*1,COLORMAGENTA,LINETHICK2;

散户线:=EXPMA((CLOSE/VBNH),120)*1,COLORGREEN,LINETHICK2;

限制起动线:=起动线*中间价轴;

限制主力线:=主力线*中间价轴;

限制散户线:=散户线*中间价轴;

主散MIN:=MIN(限制主力线,限制散户线);

主力:限制主力线,DOTLINE,COLORFF00FF,LINETHICK1;

分时均价线:=SUM(C*V,240)/SUM(V,240),DOTLINE,COLORFFFFFF,LINETHICK1;

追击涨停:=限制散户线>分时均价线 AND CROSS(C,限制散户线);

拉升量:=IF(C>REF(C,1),VOL,0);

昨拉升最高值:=CONST(FINDHIGH(拉升量,FROMOPEN,240,1)),LINETHICK1,COLORMAGENTA;

今拉升最高值:=CONST(REF(HHV(拉升量,FROMOPEN),0)),COLORYELLOW,NODRAW;

攻击力度:=今拉升最高值/昨拉升最高值,NODRAW;

TT:=BARSCOUNT(C);{取得有效收盘价}

均价黄:=SUM(C*V,TT)/SUM(V,TT);{分时均线的取值}

量两步:=MA(V,5)>REF(MA(V,5),1) AND REF(MA(V,5),1)>REF(MA(V,5),2);

价两步:= C>=REF(C,1) AND REF(C,1)>REF(C,2);

价上岗量破5:=C>均价黄 AND V>MA(V,5);

量起爆:=V>=REF(V,1)*1 ;

价创新高:=C>=HHV(C,0);

量创新高:=V>=HHV(V,0);

对昨日涨幅:=(C/DYNAINFO(3)-1)*100<=2.50;{涨幅控制2个点以内}

每日一点:=量两步 AND 价两步 AND 价上岗量破5 AND 量起爆 AND 价创新高 AND 量创新高 AND 对昨日涨幅;

TA:=BARSLAST(TIME=100000);

TC:=REF(HHV(C,0),TA+1);

TV:=REF(HHV(V,0),TA+1);

ZF:=C/DYNAINFO(3)<1.05;

XG1:=CROSS(C,TC) AND V>TV AND ZF,COLORWHITE;

TA1:=BARSLAST(TIME=110000);

CC1:=REF(HHV(C,0),TA1+1);

VV1:=REF(HHV(V,0),TA1+1);

ZF1:=CC1/DYNAINFO(3)<1.05;

XG2:=CROSS(C,CC1) AND V>VV1 AND ZF1,COLORYELLOW;

突破:=XG1 OR XG2,COLORRED;

STICKLINE(FILTER(突破=1,15),最低+轴差*0.60,最低,1,0),COLORWHITE;

DRAWTEXT(FILTER(突破=1,15),最低+轴差*0.60,'←分时突破'),COLORWHITE;

STICKLINE(FILTER(开始攻击量=1,15),最低+轴差*0.45,最低,1,0),COLORMAGENTA;

STICKLINE(FILTER(开始攻击=1,30),最低+轴差*0.30,最低,1,0),COLORYELLOW;

STICKLINE(CROSS(EXPMA((CLOSE/VBNH),60),EXPMA((CLOSE/VBNH),120)),最低+轴差*0.15,最低,1,0),COLORCYAN;

DRAWTEXT(FILTER(开始攻击量=1,15),最低+轴差*0.45,'←攻击量'),COLORMAGENTA;

DRAWTEXT(FILTER(开始攻击,30),最低+轴差*0.30,'←冲观量'),COLORYELLOW;

DRAWICON(FILTER(CROSS(起动线,1.01),30),限制散户线,17);

DRAWTEXT(FILTER(CROSS(起动线,1.01),30),最低,'可能大涨看量'),COLORMAGENTA;

DRAWTEXT(FILTER(追击涨停,30),分时均价线+(限制散户线-分时均价线)/2,'←追击'),COLORRED;

H1:=MAX(DYNAINFO(3),DYNAINFO(5));

L1:=MIN(DYNAINFO(3),DYNAINFO(6));

P1:=H1-L1;

阻力:=L1+P1*7/8,COLORGREEN;

支撑:=L1+P1*0.5/8,COLORMAGENTA;

XX:=SUM(AMOUNT,BARSCOUNT(CLOSE))/SUM(V*100,BARSCOUNT(CLOSE));

主攻:=EXPMA(CLOSE/XX,20);

大户:=EXPMA(CLOSE/XX,60);

散户:=EXPMA(CLOSE/XX,120);

底:=1;1.02,NODRAW;

高:=1.03;

AA:=主攻>大户 AND 主攻>1.003 AND 大户>散户 AND C>EXPMA(C,20) AND EXPMA(C,10)>EXPMA(C,20) AND EXPMA(C,20)>EXPMA(C,60);

DRAWTEXT(主攻>大户 AND 大户>散户 AND C>EXPMA(C,20) AND EXPMA(C,10)>EXPMA(C,20) AND EXPMA(C,20)>EXPMA(C,60) AND 主攻=HHV(主攻,30) AND CROSS(主攻,1.003),C*0.999,'←主攻'),COLORYELLOW;

{DRAWTEXT(CROSS(主攻,1.02),C*0.999,'←拉升'),COLORCYAN;

DRAWTEXT(CROSS(主攻,1.04),C*0.999,'←冲涨停'),COLORLIMAGENTA;个人感觉意义不大}

DRAWTEXT(CROSS(散户,主攻),C*0.9995,'←小心'),COLORGREEN;

DRAWTEXT(CROSS(散户,大户),C*0.9995,'←走弱'),COLORGREEN;

成交额:=V*C/100,NODRAW;{万元}

A2:=SUM((IF(((成交额/8>20) AND (CLOSE>(REF(CLOSE,1)))),成交额,0)),0);

A3:=SUM((IF(((成交额/8>20) AND (CLOSE<(REF(CLOSE,1)))),成交额,0)),0);

A6:=(A2+A3);

A7:=IF((ISLASTBAR),((100*A2)/A6),0);

A8:=IF((ISLASTBAR),((100*A3)/A6),0);

DD1:=1;

AAA1:=STRCAT(STRCAT('大单买 = ',CON2STR((100*A2)/A6,0)),'%');

AAA2:=STRCAT(STRCAT('大单卖 = ',CON2STR((100*A3)/A6,0)),'%');

AAA3:=STRCAT(STRCAT('大单总买 = ',CON2STR((100*(A2-A3))/A6,0)),'%');

DRAWTEXT_FIX(DD1=1,0,0.89,0,AAA1),COLOR00FFFF;

DRAWTEXT_FIX(DD1=1,0,0.945,0,AAA2),COLOR00FF00;

现手买:=BUYVOL*DYNAINFO(7)*100/10000 COLOR0000FF,NODRAW;

现手卖:=SELLVOL*DYNAINFO(7)*100/10000 COLOR00FF00,NODRAW;

合:=ABS(现手买)+ABS(现手卖)COLOR80FFFF,NODRAW;

差:=ABS(现手买)-ABS(现手卖)COLOR80FFFF,NODRAW;

MPB1:=ABS(现手买)/合*100;

MPB2:=ABS(现手卖)/合*100;

TESTSKIP(NOT(现手买 OR 现手卖 OR 合 OR 差 OR MPB1 OR MPB2)!=0);

DRAWRECTREL(640,1000,940,940,RGB(190,190,190));

DRAWRECTREL(640,995,940,945,RGB(200,200,200));

DRAWRECTREL(640,990,940,950,RGB(210,210,210));

DRAWRECTREL(640,985,940,955,RGB(220,220,220));

DRAWRECTREL(640,980,940,960,RGB(230,230,230));

DRAWRECTREL(640,975,940,965,RGB(240,240,240));

DRAWRECTREL(640,970,940,970,RGB(250,250,250));

DRAWRECTREL(790-现手卖*210/合,1000,790,940,RGB(0,128,0));

DRAWRECTREL(790-现手卖*210/合,995,790,945,RGB(0,148,0));

DRAWRECTREL(790-现手卖*210/合,990,790,950,RGB(0,168,0));

DRAWRECTREL(790-现手卖*210/合,985,790,955,RGB(0,188,0));

DRAWRECTREL(790-现手卖*210/合,980,790,960,RGB(0,208,0));

DRAWRECTREL(790-现手卖*210/合,975,790,965,RGB(0,228,0));

DRAWRECTREL(790-现手卖*210/合,970,790,970,RGB(0,248,0));

DRAWRECTREL(790-现手卖*210/合,940,790-现手卖*210/合,1000,RGB(0,128,0));

DRAWRECTREL(790,1000,790+现手买*210/合,940,RGB(128,0,0));

DRAWRECTREL(790,995,790+现手买*210/合,945,RGB(148,0,0));

DRAWRECTREL(790,990,790+现手买*210/合,950,RGB(168,0,0));

DRAWRECTREL(790,985,790+现手买*210/合,955,RGB(188,0,0));

DRAWRECTREL(790,980,790+现手买*210/合,960,RGB(208,0,0));

DRAWRECTREL(790,975,790+现手买*210/合,965,RGB(228,0,0));

DRAWRECTREL(790,970,790+现手买*210/合,970,RGB(248,0,0));

DRAWRECTREL(790+现手买*210/合,940,790+现手买*210/合,1000,RGB(128,0,0));

DRAWRECTREL(789.8,940,790.2,1000,RGB(0,0.0,10));

DRAWRECTREL(639.8,940,640.2,1000,RGB(0,0,10));

DRAWRECTREL(939.8,940,940.2,1000,RGB(0,0,10));

DRAWRECTREL(0,940,1000,940.2,RGB(0,0,10));

DRAWTEXT_FIX(1,0.8,0.88,0,STRCAT(STRCAT('',CON2STR(现手买,2)),'万')),COLOR0000FF;

DRAWTEXT_FIX(1,0.68,0.88,0,STRCAT(STRCAT('',CON2STR(现手卖,2)),'万')),COLOR00FF00;

DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(差)>0,0.755,1.88,0,STRCAT(' ',STRCAT(CON2STR(差,2),'万'))) COLOR00FFFF;

DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(差)<0,0.755,1.88,0,STRCAT(' ',STRCAT(CON2STR(差,2),'万'))) COLOR00FF00;

DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(差)=0,0.755,1.88,0,STRCAT(' ',STRCAT(CON2STR(差,2),'万'))) COLOR80FFFF;

DRAWTEXT_FIX(1,0.935,0.97,0,STRCAT(STRCAT(' ',CON2STR(MPB2,2)),'%')),COLOR00FF00;

DRAWTEXT_FIX(1,0.585,0.97,0,STRCAT(STRCAT('',CON2STR(MPB1,2)),'%')),COLOR0000FF;

DRAWTEXT(ISLASTBAR AND C,C,STRCAT('←',CON2STR(C,2))),COLORYELLOW;

JJ:=DYNAINFO(10)/DYNAINFO(8)/100;

LD1:=C>JJ*1.03;

LD2:=FILTER(LD1,120);

DRAWTEXT(LD2,C,'←冲高看量')COLORYELLOW;

拉升量1:=IF(C>REF(C,1),VOL,0);

打压量1:=IF(C<REF(C,1),VOL,0);

今打压最高值1:=CONST(REF(HHV(打压量1,FROMOPEN),0)),NODRAW;

DRAWTEXT(FILTER(CROSS(拉升量1,今打压最高值1),30),C,'←攻击'),COLORMAGENTA;

今拉升最高值1:=CONST(REF(HHV(拉升量1,FROMOPEN),0));

DRAWTEXT(C<REF(C,1) AND V>=今拉升最高值1,C,'←砸'),COLORGREEN;

{分时均线上大小变色 }

IF(MACD.DEA<0,C,DRAWNULL),COLORYELLOW ,LINETHICK2;

分时顶:=HHV(H,480),COLORFF00FF,POINTDOT;

分时底:=LLV(L,480),COLORGREEN,POINTDOT;

IF( C>=REF(分时顶,1) ,C,DRAWNULL),LINETHICK3,COLORMAGENTA;

IF( C<=REF(分时底,1) ,C,DRAWNULL),LINETHICK3,COLORGREEN;

IF( C>=REF(分时顶,1) ,C,DRAWNULL),LINETHICK3,COLORMAGENTA;

IF( C<=REF(分时底,1) ,C,DRAWNULL),LINETHICK3,COLORGREEN;

XX_1:=IF(REF(HIGH,1)=REF(HHV(HIGH,2),1),1,0);

上线:IF(XX_1=1,REF(HIGH,1),REF(HIGH,2)),NODRAW;

XX_2:=IF(REF(LOW,1)=REF(LLV(LOW,2),1),1,0);

下线:IF(XX_2=1,REF(LOW,1),REF(LOW,2)),NODRAW;

中线:(上线+下线)/2,COLORMAGENTA,LINETHICK2 NODRAW;

{IF(CLOSE<中线,中线,DRAWNULL),COLORLICYAN,LINETHICK2 NODRAW;}

下三一:=(上线-下线)*0.334+下线,COLORGREEN NODRAW;

上三一:=(上线-下线)*0.667+下线,COLORWHITE NODRAW;

DRAWTEXT_FIX(ISLASTBAR AND C<中线 AND C>下三一,0.5,0.05,0,'【个股已走弱,拉拐快减仓,洗盘出货,酌减大半仓。】'),COLORGREEN;

DRAWTEXT_FIX(ISLASTBAR AND C<下三一,0.5,0.05,0,'【个股阴盖阳,全部都空仓,莫再犹豫,犹豫失良机。】'),COLORMAGENTA;

DRAWTEXT_FIX(ISLASTBAR AND C>上三一,0.5,0.05,0,'【个股完全强,逢低不追涨,低量见凹,低吸更妥当。】'),COLORRED;

DRAWTEXT_FIX(ISLASTBAR AND C>中线 AND C<上三一,0.5,0.05,0,'【个股整理期,静观量柱样,缩量调整,不惊也不慌。】'),COLORLIBLUE;

DRAWTEXT_FIX(1,0.0,5,0,'任何指标都是参考,没有完美的公式'),COLORWHITE;

可能昨天复制不完整,现在分4段完全测试通过,希望对大家有用。

记住任何指标公式都是参考,市场是活的,动态的,公式是静态的,不要依此作为买卖的依据,一切后果自负。

​注:所有的文中提到的,都是网络上及自己思考和总结市场的感受和心得。

文中出现的任何股票以及行业,都是网上信息发现,一切也是基于公开媒体报道和信息。不构成任何投资意见和建议,希望大家理性投资,独立思考。

如果您认为有用欢迎点赞、关注、转发、收藏,谢谢大家!

0 阅读:1

得中

简介:感谢大家的关注