当前位置:→ 股海网通达信公式 → 正文
  • 分时主图二

  • 相关简介:超引B1:=总引.超B#DAY; 超引B2:=总引.大B#DAY; 超引B3:=总引.中B#DAY; 超引B4:=总引.小B#DAY; 超引S1:=总引.超S#DAY; 超引S2:=总引.大S#DAY; 超引S3:=总引.中S#DAY; 超引S4:=总引.小S#DAY; TESTSKIP(NOT(超引B1 OR 超引B2 OR 超引B3 OR 超引B4 OR 超引S1 OR 超引S2 OR 超引S3 OR 超引S4)!=0); 总A:=(超引B1+超引B2+超引B3+超引B4)+(超引S1+超引

  • 文章来源:股海网作者:股海网发布时间:2013-09-23浏览次数:下载次数:0

超引B1:="总引.超B#DAY";
 超引B2:="总引.大B#DAY";
 超引B3:="总引.中B#DAY";
 超引B4:="总引.小B#DAY";
 超引S1:="总引.超S#DAY";
 超引S2:="总引.大S#DAY";
 超引S3:="总引.中S#DAY";
 超引S4:="总引.小S#DAY";
 TESTSKIP(NOT(超引B1 OR 超引B2 OR 超引B3 OR 超引B4 OR 超引S1 OR 超引S2 OR 超引S3 OR 超引S4)!=0);
 总A:=(超引B1+超引B2+超引B3+超引B4)+(超引S1+超引S2+超引S3+超引S4),NODRAW;
 净流入:=SUM((超引B1+超引B2+超引B3+超引B4)-(超引S1+超引S2+超引S3+超引S4),1),NODRAW,COLORCYAN;
 流入:=(超引B1+超引B2+超引B3+超引B4),COLORRED,NODRAW;
 流出:=(超引S1+超引S2+超引S3+超引S4),COLORGREEN,NODRAW;
 流入比:=(超引B1+超引B2+超引B3+超引B4)/总A*100;
 流出比:=(超引S1+超引S2+超引S3+超引S4)/总A*100;
 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-CONST(流入*300/总A),1000,790,940,RGB(140,0,0));
 DRAWRECTREL(790-CONST(流入*300/总A),995,790,945,RGB(148,0,0));
 DRAWRECTREL(790-CONST(流入*300/总A),990,790,950,RGB(168,0,0));
 DRAWRECTREL(790-CONST(流入*300/总A),985,790,955,RGB(188,0,0));
 DRAWRECTREL(790-CONST(流入*300/总A),980,790,960,RGB(208,0,0));
 DRAWRECTREL(790-CONST(流入*300/总A),975,790,965,RGB(228,0,0));
 DRAWRECTREL(790-CONST(流入*300/总A),970,790,970,RGB(248,0,0));
 DRAWRECTREL(790-CONST(流入*300/总A),940,790-CONST(流入*300/总A),1000,RGB(128,0,0));
 DRAWRECTREL(790,1000,790+CONST(流出*300/总A),940,RGB(0,128,0));
 DRAWRECTREL(790,995,790+CONST(流出*300/总A),945,RGB(0,148,0));
 DRAWRECTREL(790,990,790+CONST(流出*300/总A),950,RGB(0,168,0));
 DRAWRECTREL(790,985,790+CONST(流出*300/总A),955,RGB(0,188,0));
 DRAWRECTREL(790,980,790+CONST(流出*300/总A),960,RGB(0,208,0));
 DRAWRECTREL(790,975,790+CONST(流出*300/总A),965,RGB(0,228,0));
 DRAWRECTREL(790,970,790+CONST(流出*300/总A),970,RGB(0,248,0));
 DRAWRECTREL(790+CONST(流出*300/总A),940,790+CONST(流出*300/总A),1000,RGB(0,128,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.61,0.88,0,STRCAT(STRCAT('流入=',CON2STR(流入,1)),'万')),COLOR0000FF;
 DRAWTEXT_FIX(1,0.9,0.88,0,STRCAT(STRCAT('流出=',CON2STR(流出,1)),'万')),COLOR00FF00;
 DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(净流入)>0,0.755,0.88,0,STRCAT('净流= ',STRCAT(CON2STR(净流入,1),'万'))) COLOR0000FF;
 DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(净流入)<0,0.755,0.88,0,STRCAT('净流= ',STRCAT(CON2STR(净流入,1),'万'))) COLOR00FF00;
 DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(净流入)=0,0.755,0.88,0,STRCAT('净流= ',STRCAT(CON2STR(净流入,1),'万'))) COLOR80FFFF;
 DRAWTEXT_FIX(1,0.80,0.955,0,STRCAT(STRCAT(' ',CON2STR(流出比,1)),'%%')),COLORBLUE;
 DRAWTEXT_FIX(1,0.74,0.955,0,STRCAT(STRCAT('',CON2STR(流入比,1)),'%%')),COLORBLUE;
 
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,COLORRED;
 中:(支撑+阻力)/2,COLORWHITE,POINTDOT;
 DRAWTEXT(CURRBARSCOUNT=4,阻力,'顶'),COLORGREEN;
 DRAWTEXT(CURRBARSCOUNT=4,支撑,'底'),COLORRED;
 DRAWTEXT(CURRBARSCOUNT=4,(支撑+阻力)/2,'中'),COLORWHITE;
 
突破:=REF(EMA(C,14),1);
 A1X:=(EMA(C,10)-突破)/突破*100;
 多方:=IF(A1X>=0,REF(EMA(C,10),BARSLAST(CROSS(A1X,0))+1),DRAWNULL);
 空方:=IF(A1X<0,REF(EMA(C,10),BARSLAST(CROSS(0,A1X))+1),DRAWNULL);
 STICKLINE(A1X>=0,多方,突破,0,0),COLOR000099;
 STICKLINE(A1X<0,空方,突破,0,0),COLOR00CC66;
 
前量:="总引.前量#DAY";
 昨量:="总引.昨量#DAY";
 今量:="总引.今量#DAY";
 前总:=前量;
 昨总:=昨量;
 总:=今量,NODRAW;
 BMM:=MAX(前总,昨总);
 AMM:=IF(总/BMM>2,BMM*3,BMM);
 MM:=150/AMM;
 KP1:=DYNAINFO(4);
 ZX1:=DYNAINFO(7);
 A1:=IF(ZX1>=KP1,355,0);
 A2:=IF(ZX1>=KP1,0,355);
 A3:=IF(ZX1>=KP1,0,0);
 量差:=IF(C>400,今量-昨量,(今量-昨量)/10000);
 DRAWRECTREL(0,80,MM*今量,114,RGB(A1,A2,A3));
 DRAWTEXT_FIX(1,0.04,0.08,0,STRCAT(STRCAT('量差=',CON2STR(量差,2)),'万')),COLORWHITE;
 昨开:="总引.昨开#DAY";
 昨收:="总引.昨收#DAY";
 A4:=IF(昨收>=昨开,355,0);
 A5:=IF(昨收>=昨开,0,355);
 A6:=IF(昨收>=昨开,0,0);
 DRAWRECTREL(0,40,MM*昨量,70,RGB(A4,A5,A6));
 前开:="总引.前开#DAY";
 前收:="总引.前收#DAY";
 A7:=IF(前收>=前开,355,0);
 A8:=IF(前收>=前开,0,355);
 A9:=IF(前收>=前开,0,0);
 DRAWRECTREL(0,0,MM*前量,30,RGB(A7,A8,A9));
 
现价:=C,LINETHICK2,COLORFFFF00;
 DRAWICON(CROSS(现价,"总引.ZH#DAY"),现价,13);
 
GJ:=C,COLORWHITE;
 JJ:SUM(C*V,FROMOPEN)/SUM(V,FROMOPEN),COLORYELLOW,LINETHICK1.5;
 均量:=MA(V,5);
 量连增:=均量>REF(均量,1) AND REF(均量,1)>REF(均量,2);
 价连涨:=C>=REF(C,1) AND REF(C,1)>REF(C,2);
 价量线上:=C>JJ AND V>均量;
 倍量:=V>=REF(V,1)*2 ;
 价新高:=C>=HHV(C,FROMOPEN);
 量新高:=V>=HHV(V,FROMOPEN);
 限幅:=C/DYNAINFO(3)<=1.02;
 起爆:=FILTER(量连增 AND 价连涨 AND 价量线上 AND 倍量 AND 价新高  AND 量新高 AND 限幅,20);
 DRAWTEXT(起爆,C,'起爆'),COLOR00FFFF;
 DRAWICON(起爆,C,1);
 STICKLINE(起爆,C,JJ,1,0),COLOR1000FF;
 VV:=BARSSINCE(起爆);
 起爆价:=REF(C,VV);
 起爆时间:=REF(TIME/100,VV);
 收益:=(DYNAINFO(7)-起爆价)/起爆价*100;
 DRAWICON(VV>=2,起爆价,17);
 DRAWTEXT_FIX(1,0,0.82,0,'起爆时间:'),COLOR00FFFF;
 DRAWNUMBER_FIX(1,0.05,0.82,0,CONST(起爆时间)),COLOR00FFFF;
 DRAWTEXT_FIX(1,0.013,0.89,0,'起爆价:'),COLOR00FFFF;
 DRAWNUMBER_FIX(1,0.05,0.89,0,CONST(起爆价)),COLOR00FFFF;
 DRAWTEXT_FIX(1,0.022,1,0,'收益:'),COLOR00FFFF;
 DRAWNUMBER_FIX(1,0.05,1,0,CONST(收益)),COLOR00FFFF;
 
ZS1:=DYNAINFO(3);{前收盘价}
 KP:=DYNAINFO(4);{今开}
 ZX:=DYNAINFO(7);{现价}
 ZG:=DYNAINFO(5);{最高}
 ZD:=DYNAINFO(6);{最底}
 OP:=500-(KP/ZS1-1)*4000;
 CL:=500-(ZX/ZS1-1)*4000;
 HI:=500-(ZG/ZS1-1)*4000;
 LO:=500-(ZD/ZS1-1)*4000;
 N1:=IF(TIME>=130000 OR TIME<91500,360,860);
 DRAWRECTREL(N1+613,OP,N1+615,HI,RGB(255,0,255)),COLORFF00FF;{今日最高}{玫红}
 DRAWRECTREL(N1+613,CL,N1+615,LO,RGB(0,128,0)),COLOR008000;{今日最低}{暗绿}
 Q1:=IF(ZX>=KP,255,0);
 Q2:=IF(ZX>=KP,0,255);
 Q3:=IF(ZX>=KP,0,255);
 DRAWRECTREL(N1+606,OP,N1+622,CL,RGB(Q1,Q2,Q3));{今日实体}{255,0,0大红}{0,255,255青}
 ZO:="总引.ZO#DAY";
 ZC:="总引.ZC#DAY";
 ZH:="总引.ZH#DAY";
 ZL:="总引.ZL#DAY";
 ZKP:=500-(ZO/ZS1-1)*4000;
 ZCP:=500-(ZC/ZS1-1)*4000;
 ZZG:=500-(ZH/ZS1-1)*4000;
 ZZD:=500-(ZL/ZS1-1)*4000;
 DRAWRECTREL(N1+577,ZKP,N1+579,ZZG,RGB(255,0,255)),COLORFF00FF;{昨日最高}{玫红}
 DRAWRECTREL(N1+577,ZCP,N1+579,ZZD,RGB(0,128,0)),COLOR008000;{昨日最低}{暗绿}
 Q4:=IF(ZC>=ZO,255,0);
 Q5:=IF(ZC>=ZO,0,255);
 Q6:=IF(ZC>=ZO,0,255);
 DRAWRECTREL(N1+570,ZKP,N1+586,ZCP,RGB(Q4,Q5,Q6)),COLOR00FFFF;{昨日实体}{大红或青}
 JO:="总引.JO#DAY";
 JC:="总引.JC#DAY";
 JH:="总引.JH#DAY";
 JL:="总引.JL#DAY";
 ZZKP:=500-(JO/ZS1-1)*4000;
 ZZCP:=500-(JC/ZS1-1)*4000;
 ZZZG:=500-(JH/ZS1-1)*4000;
 ZZZD:=500-(JL/ZS1-1)*4000;
 DRAWRECTREL(N1+541,ZZKP,N1+543,ZZZG,RGB(255,0,255)),COLORFF00FF;{前日最高}{玫红}
 DRAWRECTREL(N1+541,ZZCP,N1+543,ZZZD,RGB(0,128,0)),COLOR008000;{前日最低}{暗绿}
 Q7:=IF(JC>=JO,255,0);
 Q8:=IF(JC>=JO,0,255);
 Q9:=IF(JC>=JO,0,255);
 DRAWRECTREL(N1+534,ZZKP,N1+550,ZZCP,RGB(Q7,Q8,Q9)),COLOR00FFFF;{前日实体}{大红或青}
 JO3:="总引.JO3#DAY";
 JC3:="总引.JC3#DAY";
 JH3:="总引.JH3#DAY";
 JL3:="总引.JL3#DAY";
 ZZKP3:=500-(JO3/ZS1-1)*4000;
 ZZCP3:=500-(JC3/ZS1-1)*4000;
 ZZZG3:=500-(JH3/ZS1-1)*4000;
 ZZZD3:=500-(JL3/ZS1-1)*4000;
 DRAWRECTREL(N1+505,ZZKP3,N1+507,ZZZG3,RGB(255,0,255)),COLORFF00FF;{四日最高}{玫红}
 DRAWRECTREL(N1+505,ZZCP3,N1+507,ZZZD3,RGB(0,128,0)),COLOR008000;{四日最低}{暗绿}
 Q10:=IF(JC3>=JO3,255,0);
 Q11:=IF(JC3>=JO3,0,255);
 Q12:=IF(JC3>=JO3,0,255);
 DRAWRECTREL(N1+498,ZZKP3,N1+514,ZZCP3,RGB(Q10,Q11,Q12)),COLOR00FFFF;{四日实体}{大红或青}
 JO4:="总引.JO4#DAY";
 JC4:="总引.JC4#DAY";
 JH4:="总引.JH4#DAY";
 JL4:="总引.JL4#DAY";
 ZZKP4:=500-(JO4/ZS1-1)*4000;
 ZZCP4:=500-(JC4/ZS1-1)*4000;
 ZZZG4:=500-(JH4/ZS1-1)*4000;
 ZZZD4:=500-(JL4/ZS1-1)*4000;
 DRAWRECTREL(N1+469,ZZKP4,N1+471,ZZZG4,RGB(255,0,255)),COLORFF00FF;{五日最高}{玫红}
 DRAWRECTREL(N1+469,ZZCP4,N1+471,ZZZD4,RGB(0,128,0)),COLOR008000;{五日最低}{暗绿}
 Q13:=IF(JC4>=JO4,255,0);
 Q14:=IF(JC4>=JO4,0,255);
 Q15:=IF(JC4>=JO4,0,255);
 DRAWRECTREL(N1+462,ZZKP4,N1+478,ZZCP4,RGB(Q13,Q14,Q15)),COLOR00FFFF;{五日实体}{大红或青}
 
A51:="总引.MA5#DAY";
 XMA5:=500-(A51/ZS1-1)*4000;
 DRAWRECTREL(N1+595,XMA5-5,N1+630,XMA5+5,RGB(255,255,255));{白}
 DRAWTEXT_FIX(ISLASTBAR,0.2,1,0,STRCAT('MA5 :  ',CON2STR(A51,2))),COLORWHITE;
 A10:="总引.MA10#DAY";
 XMA10:=500-(A10/ZS1-1)*4000;
 DRAWRECTREL(N1+580,XMA10-5,N1+630,XMA10+5,RGB(255,255,0));{黄}
 DRAWTEXT_FIX(ISLASTBAR,0.3,1,0,STRCAT('MA10 :  ',CON2STR(A10,2))),COLORYELLOW;
 A20:="总引.MA20#DAY";
 XMA20:=500-(A20/ZS1-1)*4000;
 DRAWRECTREL(N1+565,XMA20-5,N1+630,XMA20+5,RGB(255,0,255)),COLORMAGENTA;
 DRAWTEXT_FIX(ISLASTBAR,0.4,1,0,STRCAT('MA20 :  ',CON2STR(A20,2))),COLORMAGENTA;
 A60:="总引.MA60#DAY";
 XMA60:=500-(A60/ZS1-1)*4000;
 DRAWRECTREL(N1+550,XMA60-5,N1+630,XMA60+5,RGB(0,125,0)),COLORGREEN;
 DRAWTEXT_FIX(ISLASTBAR,0.5,1,0,STRCAT('MA60 :  ',CON2STR(A60,2))),COLORGREEN;
 

Z1:=STRCAT(HYBLOCK,' ');
 Z2:=STRCAT(Z1,FGBLOCK);
 Z3:=STRCAT(Z2,DYBLOCK);
 Z4:=STRCAT(Z3,' ');
 DRAWTEXT_FIX(ISLASTBAR,0.97,0,1,STRCAT(Z4,GNBLOCK)),COLORYELLOW;
 
最新:C,LINETHICK4,COLORGREEN;
 IF(C>REF(C,1),C,DRAWNULL),LINETHICK4,COLORRED;
 IF(C=REF(C,1),C,DRAWNULL),LINETHICK4,COLORWHITE;
 均价:SUM(V*C,0)/SUM(V,0),COLORYELLOW;
 DRAWNUMBER(ISLASTBAR,C,C),COLORMAGENTA;
 DRAWTEXT_FIX(ISLASTBAR,0.1,1.0,0,STRCAT('均价 :  ',CON2STR(均价,2))),COLORYELLOW;
 DRAWNUMBER(ISLASTBAR,阻力,阻力)COLORCYAN;
 DRAWNUMBER(ISLASTBAR,支撑,支撑)COLORCYAN;
 
大1:="总引.大单动向#DAY";
 涨跌:="总引.涨跌动因#DAY";
 大2:="总引.大单差分#DAY";
 DRAWRECTREL(185,875,100,915,IF(CONST(大1)>0,RGB(255,0,0),RGB(0,50,0)));
 DRAWRECTREL(295,875,205,915,IF(CONST(涨跌)>0,RGB(255,0,0),RGB(0,50,0)));
 DRAWRECTREL(395,875,311,915,IF(CONST(大2)>0,RGB(255,0,0),RGB(0,50,0)));
 DRAWTEXT_FIX(1,0.101,0.88,0,STRCAT('【DDX】:',CON2STR(大1,2))),COLORYELLOW;
 DRAWTEXT_FIX(1,0.205,0.88,0,STRCAT('【DDY】:',CON2STR(涨跌,2))),COLORYELLOW;
 DRAWTEXT_FIX(1,0.311,0.88,0,STRCAT('【DDZ】:',CON2STR(大2,2))),COLORYELLOW;

分时主图二

 

上一篇:分时组图一  下一篇:朗玛斐波那指标公式
 ☟问题反馈 ☞┄┄┄┄┄┄┄┄┄┄→收藏资源:

分时主图二

  • 下载资源所需积分

    0

  • 当前拥有积分

    0

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

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