老钱庄股票论坛

 找回密码
 5秒快速注册

QQ登录

只需一步,快速开始

   扫一扫关注老钱庄微信号 关闭
扫一扫关注老钱庄财经微信号 关闭
查看: 2102|回复: 4

[通达信] 副图给大家了现在给主图、也不错的哟

[复制链接]
发表于 2016-8-8 08:00 | 显示全部楼层 |阅读模式
HH:=(20*H+19*REF(H,1)+18*REF(H,2)+17*REF(H,3)+16*REF(H,4)+15*REF(H,5)+14*REF(H,6)
+13*REF(H,7)+12*REF(H,8)+11*REF(H,9)+10*REF(H,10)+9*REF(H,11)+8*REF(H,12)
+7*REF(H,13)+6*REF(H,14)+5*REF(H,15)+4*REF(H,16)+3*REF(H,17)+2*REF(H,18)+
REF(H,20))/210,COLORBLUE,LINETHICK1;
LL:=(20*L+19*REF(L,1)+18*REF(L,2)+17*REF(L,3)+16*REF(L,4)+15*REF(L,5)+14*REF(L,6)
+13*REF(L,7)+12*REF(L,8)+11*REF(L,9)+10*REF(L,10)+9*REF(L,11)+8*REF(L,12)
+7*REF(L,13)+6*REF(L,14)+5*REF(L,15)+4*REF(L,16)+3*REF(L,17)+2*REF(L,18)+
REF(L,20))/210,COLORBLUE,LINETHICK1;
D90H:=EMA(HH,90),COLORRED,LINETHICK1;
D90L:=EMA(LL,90),COLORRED,LINETHICK1;
DGH:=(20*H+19*REF(H,1)+18*REF(H,2)+17*REF(H,3)+16*REF(H,4)+15*REF(H,5)+14*REF(H,6)
+13*REF(H,7)+12*REF(H,8)+11*REF(H,9)+10*REF(H,10)+9*REF(H,11)+8*REF(H,12)
+7*REF(H,13)+6*REF(H,14)+5*REF(H,15)+4*REF(H,16)+3*REF(H,17)+2*REF(H,18)+
REF(H,20))/210,COLORBLUE,LINETHICK1;DDL:=(20*L+19*REF(L,1)+18*REF(L,2)+17*REF(L,3)+16*REF(L,4)+15*REF(L,5)+14*REF(L,6)
+13*REF(L,7)+12*REF(L,8)+11*REF(L,9)+10*REF(L,10)+9*REF(L,11)+8*REF(L,12)
+7*REF(L,13)+6*REF(L,14)+5*REF(L,15)+4*REF(L,16)+3*REF(L,17)+2*REF(L,18)+
REF(L,20))/210,COLORBLUE,LINETHICK1;D90C:=D90H-D90L;D90D:=D90H+D90C*2,COLORRED,LINETHICK1;D90T:=D90L-D90C*2,COLORRED,LINETHICK1;G0:=(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1+XMA(XMA(H,25),25),LINETHICK1,COLORWHITE;D0:=XMA(XMA(L,25),25)-(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1,LINETHICK1,COLORWHITE;DTD:=D0>=D90T AND G0>=D90D;KTD:=G0<=D90D AND D0<=D90T;ZDD:=D0>=D90T AND G0<=D90D;BDD0:=(XMA(XMA(H,60),60)-XMA(XMA(L,60),60))*3+XMA(XMA(H,60),60),LINETHICK2,COLORGREEN;BDT0:=XMA(XMA(L,60),60)-(XMA(XMA(H,60),60)-XMA(XMA(L,60),60))*3,LINETHICK2,COLORGREEN;STICKLINE(DTD=1,G0,D0,5,0),COLOR000066;STICKLINE(KTD=1,G0,D0,5,0),COLOR003300;STICKLINE(ZDD=1,G0,D0,5,0),COLOR555555;
ZK1:(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1+XMA(XMA(H,25),25),DOTLINE,COLORWHITE;
ZD1:XMA(XMA(L,25),25)-(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1,DOTLINE,COLORWHITE;
BS:(XMA(XMA(H,60),60)-XMA(XMA(L,60),60))*2.2+XMA(XMA(H,60),60),DOTLINE,COLORRED;
SS:=XMA(XMA(L,25),25)-(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1.5,DOTLINE,COLORGREEN;
BD:XMA(XMA(L,60),60)-(XMA(XMA(H,60),60)-XMA(XMA(L,60),60))*2.8,DOTLINE,COLORGREEN;
ZZ:=(ZK1+ZD1)/2,DOTLINE,COLORYELLOW;
STICKLINE(1=1,D90H,D90L,5,0),COLORLIGRAY;
DEA3:=EMA((EMA(CLOSE,3) - EMA(CLOSE,6)),9),COLORGREEN,LINETHICK2;
DEA3B:=REF(DEA3,1),COLORWHITE,LINETHICK0;
DEA33B:=EMA((EMA(EMA(CLOSE,3) - EMA(CLOSE,9),3) - EMA(EMA(CLOSE,3) - EMA(CLOSE,9),9)),9),COLORWHITE,LINETHICK0;
DEA333B:=REF(DEA33B,1),COLORWHITE,LINETHICK0;
STICKLINE(DEA3B<DEA3 OR DEA333B<DEA33B,L,H,0.0,0),COLORRED;
STICKLINE(DEA3B<DEA3 OR DEA333B<DEA33B,C,O,3,1),COLORRED;
STICKLINE(DEA3<DEA3B,L,H,0.0,0),COLORGREEN;
STICKLINE(DEA3<DEA3B,C,O,3,1),COLORGREEN;
白色点多定位1:=L<ZD1 AND H>ZD1;
白色点空定位1:=H>ZK1 AND L<ZK1;
STICKLINE(白色点多定位1=1,L,ZD1,3.2,0),COLOR0044FF;
STICKLINE(白色点多定位1=1,L,ZD1,2.7,0),COLOR0066FF;
STICKLINE(白色点多定位1=1,L,ZD1,2.1,0),COLOR0088FF;
STICKLINE(白色点多定位1=1,L,ZD1,1.5,0),COLOR00AAFF;
STICKLINE(白色点多定位1=1,L,ZD1,0.9,0),COLOR00CCFF;
STICKLINE(白色点多定位1=1,L,ZD1,0.2,0),COLOR00FFFF;
STICKLINE(白色点空定位1=1,H,ZK1,3.2,0),COLOR770077;
STICKLINE(白色点空定位1=1,H,ZK1,2.7,0),COLOR990099;
STICKLINE(白色点空定位1=1,H,ZK1,2.1,0),COLORBB00BB;
STICKLINE(白色点空定位1=1,H,ZK1,1.5,0),COLORDD00DD;
STICKLINE(白色点空定位1=1,H,ZK1,0.9,0),COLORFF00FF;
STICKLINE(白色点空定位1=1,H,ZK1,0.2,0),COLORFF55FF;
白色点多定位2:=H<ZD1;
白色点空定位2:=L>ZK1;
STICKLINE(白色点多定位2=1,L,H,0.0,0),COLOR00FFFF;
STICKLINE(白色点多定位2=1,C,O,3.2,0),COLOR0044FF;
STICKLINE(白色点多定位2=1,C,O,2.7,0),COLOR0066FF;

STICKLINE(白色点多定位2=1,C,O,2.1,0),COLOR0088FF;
STICKLINE(白色点多定位2=1,C,O,1.5,0),COLOR00AAFF;
STICKLINE(白色点多定位2=1,C,O,0.9,0),COLOR00CCFF;
STICKLINE(白色点多定位2=1,C,O,0.2,0),COLOR00FFFF;

STICKLINE(白色点空定位2=1,L,H,0.0,0),COLORFF55FF;
STICKLINE(白色点空定位2=1,C,O,3.2,0),COLOR770077;
STICKLINE(白色点空定位2=1,C,O,2.7,0),COLOR990099;
STICKLINE(白色点空定位2=1,C,O,2.1,0),COLORBB00BB;
STICKLINE(白色点空定位2=1,C,O,1.5,0),COLORDD00DD;
STICKLINE(白色点空定位2=1,C,O,0.9,0),COLORFF00FF;
STICKLINE(白色点空定位2=1,C,O,0.2,0),COLORFF55FF;

多头红色点:=DEA3B<DEA3 OR DEA333B<DEA33B;
空头红色点:=DEA3B>DEA3 OR DEA333B>DEA33B;
多头红色点定位1:=白色点多定位1=1 AND 多头红色点=1;
空头红色点定位1:=白色点空定位1=1 AND 空头红色点=1;
STICKLINE(多头红色点定位1=1,L,ZD1,3.2,0),COLOR000077;
STICKLINE(多头红色点定位1=1,L,ZD1,2.7,0),COLOR000099;
STICKLINE(多头红色点定位1=1,L,ZD1,2.1,0),COLOR0000BB;
STICKLINE(多头红色点定位1=1,L,ZD1,1.5,0),COLOR0000DD;
STICKLINE(多头红色点定位1=1,L,ZD1,0.9,0),COLOR0000FF;
STICKLINE(多头红色点定位1=1,L,ZD1,0.2,0),COLOR6666FF;

STICKLINE(空头红色点定位1=1,H,ZK1,3.2,0),COLORFF0000;
STICKLINE(空头红色点定位1=1,H,ZK1,2.7,0),COLORFF3300;
STICKLINE(空头红色点定位1=1,H,ZK1,2.1,0),COLORFF5500;
STICKLINE(空头红色点定位1=1,H,ZK1,1.5,0),COLORFF7700;
STICKLINE(空头红色点定位1=1,H,ZK1,0.9,0),COLORFF9900;
STICKLINE(空头红色点定位1=1,H,ZK1,0.2,0),COLORFFCC00;


多头红色点定位2:=白色点多定位2=1 AND 多头红色点=1;
空头红色点定位2:=白色点空定位2=1 AND 空头红色点=1;
STICKLINE(多头红色点定位2=1,L,H,0.0,0),COLOR6666FF;
STICKLINE(多头红色点定位2=1,C,O,3.2,0),COLOR000077;
STICKLINE(多头红色点定位2=1,C,O,2.7,0),COLOR000099;
STICKLINE(多头红色点定位2=1,C,O,2.1,0),COLOR0000BB;
STICKLINE(多头红色点定位2=1,C,O,1.5,0),COLOR0000DD;
STICKLINE(多头红色点定位2=1,C,O,0.9,0),COLOR0000FF;
STICKLINE(多头红色点定位2=1,C,O,0.2,0),COLOR6666FF;

STICKLINE(空头红色点定位2=1,L,H,0.0,0),COLORFFCC00;
STICKLINE(空头红色点定位2=1,C,O,3.2,0),COLORFF0000;
STICKLINE(空头红色点定位2=1,C,O,2.7,0),COLORFF3300;
STICKLINE(空头红色点定位2=1,C,O,2.1,0),COLORFF5500;
STICKLINE(空头红色点定位2=1,C,O,1.5,0),COLORFF7700;
STICKLINE(空头红色点定位2=1,C,O,0.9,0),COLORFF9900;
STICKLINE(空头红色点定位2=1,C,O,0.2,0),COLORFFCC00;

多头多定位:=CROSS(ZD1,L) AND DTD=1;
多头平定位:=CROSS(H,ZK1) AND DTD=1 AND ZDD=0;
空头空定位:=CROSS(H,ZK1) AND KTD=1;
空头平定位:=CROSS(ZD1,L) AND KTD=1 AND ZDD=0;
震荡多定位:=CROSS(ZD1,L) AND ZDD=1;
震荡空定位:=CROSS(H,ZK1) AND ZDD=1;
DRAWTEXT(ISLASTBAR,ZK1,'卖'),COLORWHITE;
DRAWTEXT(ISLASTBAR,ZD1,'买'),COLORWHITE;
DRAWTEXT(ISLASTBAR,BS,'顶'),COLORRED;
DRAWTEXT(ISLASTBAR,BD,'底'),COLORGREEN;
大单动向:=(LARGEINTRDVOL-LARGEOUTTRDVOL)*10000/FINANCE(7);
涨跌动因:=IF(TRADENUM>0,(TRADEOUTNUM-TRADEINNUM)*100/TRADENUM,0);
大单差分:=IF(TRADENUM>0,(LARGETRDINNUM-LARGETRDOUTNUM)/TRADENUM*100,0);
DDZ1:=大单差分*7;
DDZ2:=大单差分*3;
主力活跃度:=LARGEINTRDVOL-LARGEOUTTRDVOL;
主力净流入:=(LARGEINTRDVOL-LARGEOUTTRDVOL)*AMO/V/10000;
买入力度:=LARGEINTRDVOL*100/VOL;
卖出力度:=LARGEOUTTRDVOL*100/VOL;
超B:=L2_AMO(0,2)/10000.0;
大B:=L2_AMO(1,2)/10000.0;
中B:=L2_AMO(2,2)/10000.0;
小B:=L2_AMO(3,2)/10000.0;
超S:=L2_AMO(0,3)/10000.0;
大S:=L2_AMO(1,3)/10000.0;
中S:=L2_AMO(2,3)/10000.0;
小S:=L2_AMO(3,3)/10000.0;
资金流向:=(超B+大B+中B+小B)-(超S+大S+中S+小S);
资金选股:=资金流向>0 AND 大单动向>0 AND 涨跌动因>0 AND DDZ1>0 AND DDZ2>0 AND 主力活跃度>0 AND 主力净流入>0 AND 买入力度>卖出力度;
STICKLINE(资金选股=1 AND (H-C)<(C-L),LOW,HIGH,0.0,0),COLORRED;
STICKLINE(资金选股=1 AND (H-C)<(C-L),CLOSE,OPEN,3,0),COLORRED;
DRAWICON(空头平定位=1,L,5);
DRAWICON(多头平定位=1,H,15);
DRAWICON(多头多定位=1 OR 震荡多定位=1,L,5);
DRAWICON(空头空定位=1 OR 震荡空定位=1,H,15);

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?5秒快速注册

x
发表于 2016-8-8 13:13 | 显示全部楼层
多谢分享!!!!!!!!!!!!!!
回复 支持 反对

使用道具 举报

发表于 2016-8-8 20:40 | 显示全部楼层
谢谢老师的分享,辛苦了!
回复 支持 反对

使用道具 举报

发表于 2016-8-8 23:25 | 显示全部楼层
该主图公式检测到有未来函数~~
回复 支持 反对

使用道具 举报

发表于 2016-8-9 15:39 | 显示全部楼层

谢谢老师的分享,辛苦了!
回复 支持 反对

使用道具 举报

关于老钱庄 | 广告合作 | 商务合作 | 意见反馈 | 免责声明 | 友情链接
    经营性网站备案信息 安徽黄埔网络科
技有限公司 安徽大时代投
资咨询有限公司 可信网站 网上交易保障中心

信息产业部信息备案:闽ICP备13021446号-4 茂名市公安局网警备案:4409023010511号
老钱庄股票论坛网友发表的帖子纯属个人意见,老钱庄股票论坛不负任何责任! 股市有风险,投资需谨慎!
共同建设网络精神文明,欢迎广大网友举报论坛上的不良信息,我们会在第一时间内及时处理!

[ 广告服务咨询QQ:2806911298 ] [ 合作联系电话 :15396270234 联系QQ : 800025923 ]

值班QQ: 800025923 值班电话:0592-5962326

小黑屋|手机版|Archiver|老钱庄

GMT+8, 2017-12-18 09:26 , Processed in 0.092315 second(s), 18 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表