当前位置:→ 股海网通达信公式 → 正文
  • 通达信比较准的分时主图源码

  • 相关简介:AA1:=(VOL/CLOSE)/3; AA2:=SUM((IF(((AA140) AND (CLOSE(REF(CLOSE,1)))),AA1,0)),0); AA3:=SUM((IF(((AA140) AND (CLOSE(REF(CLOSE,1)))),AA1,0)),0); AA4:=SUM((IF(((AA140) AND (CLOSE(REF(CLOSE,1)))),AA1,0)),0); AA5:=SUM((IF(((AA140) AND (CLOSE(REF(CLOSE,1)))

  • 文章来源:股海网作者:股海网发布时间:2018-03-26浏览次数:下载次数:0

AA1:=(VOL/CLOSE)/3;
 AA2:=SUM((IF(((AA1>40) AND (CLOSE>(REF(CLOSE,1)))),AA1,0)),0);
 AA3:=SUM((IF(((AA1>40) AND (CLOSE<(REF(CLOSE,1)))),AA1,0)),0);
 AA4:=SUM((IF(((AA1<40) AND (CLOSE>(REF(CLOSE,1)))),AA1,0)),0);
 AA5:=SUM((IF(((AA1<40) AND (CLOSE<(REF(CLOSE,1)))),AA1,0)),0);
 AA6:=((AA2+AA3)+AA4)+AA5;
 AA7:=IF((BARSTATUS=2),((100*AA2)/AA6),0);
 AA8:=((IF((BARSTATUS=2),((100*AA3)/AA6),0)));
 AA9:=((IF((BARSTATUS=2),((100*AA4)/AA6),0)));
 AA10:=((IF((BARSTATUS=2),((100*AA5)/AA6),0)));
机买:=(AA2),LINETHICK0;
机卖:=(AA3),LINETHICK0;
散买:=(AA4);
散卖:=(AA5);
总买:=AA2+AA4;
总卖:=AA3+AA5;
机构买比:=机买/总买*0.1,LINETHICK0;
机构卖比:=机卖/总卖*0.1,LINETHICK0;

最新:CLOSE,LINETHICK2,COLORWHITE;
 AA:=SUM(AMOUNT,BARSCOUNT(C))/SUM(VOL*100,BARSCOUNT(C));
 BB:=BETWEEN(C/AA,C+H,C-H);
 DRAWTEXT( ISLASTBAR AND 最新>REF(最新,1),最新,STRCAT(' 涨▲',CON2STR(最新,2))),COLORMAGENTA;
 DRAWTEXT( ISLASTBAR AND 最新<REF(最新,1),最新,STRCAT(' 跌▼',CON2STR(最新,2))),COLOR00FF00;


均价:SUM(C*V,240)/SUM(V,240),COLORYELLOW,LINETHICK2;

TT:=BARSCOUNT(C);
前高:=REF(HHV(H,TT),1);
突破:=CROSS(C,REF(HHV(H,TT),1)){ AND HHVBARS(VOL,TT)=0} AND C/均价<1.09 AND TT>1 AND TT<240;
 DRAWTEXT(CROSS(C,REF(HHV(H,TT),1)) AND {HHVBARS(VOL,TT)=0 AND} C/均价<1.09 AND TT>=1 AND TT<240 ,前高, '←突'),COLORRED;

主力扫盘:=COUNT(突破,13)>=3 AND CROSS(C,REF(HHV(H,TT),1)){ AND HHVBARS(VOL,TT)=0};
 DRAWTEXT(主力扫盘,前高, '←扫盘'),COLORYELLOW;

{已主力扫盘:=BARSLAST(主力扫盘)<13;
 DRAWTEXT(BARSLAST(主力扫盘)<8,(DYNAINFO(3))*9.5/10 , '↖已扫'),COLORGREEN;}

全仓买进:=CROSS(C,REF(HHV(H,TT),1)) AND HHVBARS(VOL,TT)=0 AND C/均价<1.09 AND TT>1 AND TT<240 AND BARSLAST(主力扫盘)>=21;

DRAWTEXT(全仓买进 ,前高, '←全仓'),COLORCYAN;

VAR1:=EMA(EMA(C,13),13);
控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;
 JJ:=DYNAINFO(11);
 P:=55;
 S:=8;
 M1:=3;
能量:=(EMA(C,S)-EMA(C,P))*10;
空头:=EMA(能量,M1);
 BTJ11:=(C-JJ)/JJ<-0.03;
 BTJ2:=控盘>REF(控盘,1) AND 控盘<-0.2;
 BTJ3:=CROSS(能量,空头) AND 能量<-0.3;
 BTJ811:=FILTER(BTJ11 AND BTJ2 AND BTJ3,13);
有庄:=BTJ811;
 DRAWTEXT(BTJ811,C*0.999,'←有庄'),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;
 {DRAWICON(LONGCROSS(支撑,C,2),C,5);
 DRAWICON(LONGCROSS(C,阻力,2),C,6);}

{资金流入:=SUM(IF(C>REF(C,1),C*V,0),FROMOPEN);
资金流出:=-SUM(IF(C<REF(C,1),C*V,0),FROMOPEN);
净资金:=(资金流入+资金流出)/10000;

{DRAWTEXT_FIX(1,0.700,1-0.15,0,STRCAT(STRCAT('【净买】',CON2STR(净资金,1)),'万')),COLORRED;}

KP:=DYNAINFO(4);
 ZX:=DYNAINFO(7);
分时顶:HHV(H,480),COLORRED,DOTLINE;
分时底:LLV(L,480),COLORGREEN,DOTLINE;

{DRAWICON(FILTER(CROSS(C,DYNAINFO(3)*1.1-0.01),60),C,1);}
 DRAWNUMBER(FILTER(CROSS(C,DYNAINFO(3)*1.1-0.01),60),C*0.99,TIME);
 DRAWNUMBER(FILTER(CROSS(C,DYNAINFO(3)*1.1-0.01),60),C*0.98,C),COLORYELLOW;

{分时量}

{分时K}
 ZS:=DYNAINFO(3);
 ZG:=DYNAINFO(5);
 ZD:=DYNAINFO(6);
 OP:=500-(KP/ZS-1)*1200;
 CL:=500-(ZX/ZS-1)*1200;
 HI:=500-(ZG/ZS-1)*1200;
 LO:=500-(ZD/ZS-1)*1200;
 {N1:=IF(TIME2<125959,750,260);{360,860}
 N1:=IF(FROMOPEN>=120,250,750);
 Z1:=IF(ZX>=KP,255,0);
 Z2:=IF(ZX>=KP,0,255);
 Z3:=IF(ZX>=KP,0,255);

MA5:="FSKY8.MA5#DAY";
 XMA5:=500-(MA5/ZS-1)*1200;
 DRAWRECTREL(N1+128,XMA5,N1+142,XMA5,RGB(255,255,255));
 {DRAWTEXT_FIX(N1+128,XMA5,1-0.15,0,STRCAT(STRCAT('MA5',CON2STR(A5,1)),'')),COLORRED;}
 MA10:="FSKY8.MA10#DAY";
 XMA10:=500-(MA10/ZS-1)*1200;
 DRAWRECTREL(N1+118,XMA10,N1+152,XMA10,RGB(250,250,280));
 MA20:="FSKY8.MA20#DAY";
 XMA20:=500-(MA20/ZS-1)*1200;
 DRAWRECTREL(N1+108,XMA20,N1+162,XMA20,RGB(255,0,255)),COLORC0C0C0;{(0,0,255)}
 MA60:="FSKY8.MA60#DAY";
 XMA60:=500-(MA60/ZS-1)*1200;
 DRAWRECTREL(N1+98,XMA60,N1+172,XMA60,RGB(0,255,0)),COLOR808000;
阻力1:=REFDATE(REF(HHV(C,60),FROMOPEN-60),DATE)DOTLINE,COLORCYAN;
 DRAWTEXT_FIX(1,0.880,1-0.20,0,STRCAT(STRCAT('MA5: ',CON2STR(MA5,2)),'')),COLORWHITE;
 DRAWTEXT_FIX(1,0.880,1-0.15,0,STRCAT(STRCAT('MA10:',CON2STR(MA10,2)),'')),COLORYELLOW;
 DRAWTEXT_FIX(1,0.880,1-0.10,0,STRCAT(STRCAT('MA20:',CON2STR(MA20,2)),'')),COLORMAGENTA;
 DRAWTEXT_FIX(1,0.880,1-0.05,0,STRCAT(STRCAT('MA60:',CON2STR(MA60,2)),'')),COLORGREEN;


 IF(MACD.DEA<0,CLOSE,DRAWNULL),COLORYELLOW,LINETHICK9;
 XA_1:=MAX(DYNAINFO(3),DYNAINFO(5));
 XA_2:=MIN(DYNAINFO(3),DYNAINFO(6));
 XA_3:=XA_1-XA_2;
 XA_4:=XA_2+XA_3*7/8;
 XA_5:=XA_2+XA_3*0.5/8;
 DRAWICON(LONGCROSS(XA_5,CLOSE,2),CLOSE,1);
 DRAWICON(LONGCROSS(CLOSE,XA_4,2),CLOSE,6);
 XA_6:=DYNAINFO(4);
 XA_7:=DYNAINFO(5);
 XA_8:=DYNAINFO(6);
 XA_9:=DYNAINFO(11);
 XA_10:=CLOSE;
 XA_11:=BARSCOUNT(XA_10);
 XA_12:=SUM(VOL*CLOSE,0)/SUM(VOL,0);
 XA_13:=MA(XA_10,XA_11);
 XA_14:=XA_13+2*STD(XA_10,3);
 XA_15:=XA_13-2*STD(XA_10,3);
 DRAWICON(CROSS(XA_12,XA_13),XA_12,38);
 XA_16:=TIME>93000;
 XA_17:=XA_10/REF(CLOSE,1)>1.02;
 XA_18:=XA_10/REF(CLOSE,1)<0.98;
 XA_19:=(HHV(XA_10,XA_11)-LLV(XA_10,XA_11))/XA_10<0.05;
 XA_20:=SMA(VOL,30,1);
 XA_21:=(XA_20-LLV(LLV(XA_20,1),30))/(HHV(HHV(XA_20,1),30)-LLV(LLV(XA_20,1),30))>0.95;
 XA_22:=XA_17 OR XA_18;
 XA_23:=XA_22=0 AND XA_19 AND XA_21 AND CROSS(XA_12,XA_13);
 DRAWTEXT(FILTER(XA_23,10),XA_12,506),COLORYELLOW;
 XA_24:=XA_22=0 AND XA_19 AND XA_21 AND CROSS(CLOSE,XA_12) AND CROSS(CLOSE,XA_13);
 DRAWTEXT(FILTER(XA_24,10),XA_12*0.99,507),COLORRED;

AAA:=MAX(DYNAINFO(3),DYNAINFO(5));
 BBB:=MIN(DYNAINFO(3),DYNAINFO(6));
 CCC:=AAA-BBB;
中轨:=(AAA+BBB)/1,POINTDOT;
阻力6:BBB+CCC*7/8,COLORBLUE,POINTDOT;
支撑6:BBB+CCC*1/8,COLORMAGENTA,POINTDOT;
支撑1:BBB+CCC*0.5/8,POINTDOT;
上顶:BBB+CCC*2/3,POINTDOT;
下底:BBB+CCC/3,COLORBLUE,POINTDOT;

STICKLINE(C>阻力6,阻力6,C,2,0),COLORGREEN;
 STICKLINE(C<支撑6,支撑6,C,2,0),COLORLIMAGENTA;

DRAWTEXT(LONGCROSS(支撑1,C,2),下底,'B'),COLORYELLOW;{B}
 DRAWTEXT(LONGCROSS(C,阻力6,2),上顶,'S'),COLORRED;{S};


攻击量:=((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;
攻击比:=攻击流量/SUM(V,FROMOPEN)*100,COLORRED,LINETHICK1;
资金攻击度:=IF(攻击比>=0,(攻击比+50),100-ABS((攻击比-50)));
资金流入:=SUM(IF(C>REF(C,1),V,0),FROMOPEN),STICK,COLORRED;
资金流出:=-SUM(IF(C<REF(C,1),V,0),FROMOPEN),STICK,COLOR00FF00;
资金出入:=资金流入+资金流出,COLORSTICK;
资金比:=资金出入/SUM(V,FROMOPEN)*100,COLOR00FFFF,LINETHICK1;
资金流量比:=IF(资金比>=0,(资金比+100)/2,100-ABS((资金比-100)/2));
 DRAWTEXT_FIX(1,0.200,0.87,0,STRCAT(STRCAT('资金流量比',CON2STR(资金流量比,2)),'%买')),COLORCYAN;
 DRAWTEXT_FIX(1,0.000,0.87,0,STRCAT(STRCAT('资金攻击度',CON2STR(资金攻击度,2)),' %买')),COLORCYAN;

A1:=SUM(IF(CLOSE>REF(CLOSE,1),VOL/CAPITAL*100,IF(CLOSE<REF(CLOSE,1),-VOL/CAPITAL*100,0)),0);
成交额:=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);
 A4:=SUM((IF(((成交额/8<20) AND (CLOSE>(REF(CLOSE,1)))),成交额,0)),0);
 A5:=SUM((IF(((成交额/8<20) AND (CLOSE<(REF(CLOSE,1)))),成交额,0)),0);
 A6:=((A2+A3)+A4)+A5;
 A7:=IF((ISLASTBAR),((100*A2)/A6),0);
 A8:=IF((ISLASTBAR),((100*A3)/A6),0);
 A9:=IF((ISLASTBAR),((100*A4)/A6),0);
 A10:=IF((ISLASTBAR),((100*A5)/A6),0);

DD1:=1;
 AAA1:=STRCAT(STRCAT('机构买入',CON2STR((100*A2)/A6,0)),'%');
 AAA2:=STRCAT(STRCAT('机构卖出',CON2STR((100*A3)/A6,0)),'%');
 AAA0:=STRCAT(STRCAT('机构总买入',CON2STR((100*(A2-A3))/A6,0)),'%');
 AAA3:=STRCAT(STRCAT('散户买入',CON2STR((100*A4)/A6,0)),'%');
 AAA4:=STRCAT(STRCAT('散户卖出',CON2STR((100*A5)/A6,0)),'%');
 AAA5:=STRCAT(STRCAT('散户总买入',CON2STR((100*(A4-A5))/A6,0)),'%');
 DRAWTEXT_FIX(DD1=1,0.000,1.00,0,AAA1),COLORRED;
 DRAWTEXT_FIX(DD1=1,0.150,1.00,0,AAA2),COLORGREEN;
 DRAWTEXT_FIX(DD1=1,0.300,1.00,0,AAA3),COLORRED;
 DRAWTEXT_FIX(DD1=1,0.450,1.00,0,AAA4),COLORGREEN;
 DRAWTEXT_FIX(DD1=1,0.600,1.00,0,AAA0),LINETHICK5,COLORYELLOW;
 DRAWTEXT_FIX(DD1=1,0.750,1.00,0,AAA5),LINETHICK5,COLORCYAN;


通达信比较准的分时主图源码

 ☟问题反馈 ☞┄┄┄┄┄┄┄┄┄┄→收藏资源:

通达信比较准的分时主图源码

  • 下载资源所需积分

    0

  • 当前拥有积分

    0

上传会员: 
股海网
文件大小: 
Bytes
上传时间: 
2018-03-26
下载积分: 
-
免责声明: 
请仔细阅读并同意后才能下载
本附件为用户分享上传,股海网没有对文件进行验证,不能保证下载资源的准确性、安全性和完整性,也不保证下载资源能正常安装和使用,且下载后扣除的积分无法退还,除非您充分理解并完全接受本声明,否则您无权下载。
本站对提供下载的软件、指标、资料等不拥有任何权利,其版权归该下载资源的合法拥有者所有。本附件仅供学习和研究使用,不得用于商业或者非法用途,如有侵犯您的版权, 请参看 《股海网侵权处理流程》《股海网免责声明条款》
点击下载无反应时,更换主流浏览器重新登录操作,如360浏览器、Edge浏览器、谷歌浏览器,个别浏览器有不兼容现象。
勾选以下表示您已经阅读并同意以上声明才能下载本文件,扣除积分无法退还!
我已阅读所有条款规定, 请点我同意 所有条款内容!我自愿下载!
提示:如下载失败,请点关闭刷新此页面或提交问题反馈给管理员→
关闭

关于我们 - 联系我们 - 隐私政策 - 免责声明 - 下载帮助 - 广告合作 - SiteMap - TOP
增值电信业务经营ICP许可证:湘B2-20210269 湘ICP备09016573号-10 湘公网安备43108102000040号
Copyright © 2021 铭网科技,All Rights Reserved.