通达信分时主图分享

此分时主图是我结合网上收集到的相关指标改编的,选了我需要的部分,去除我不需要的部分。

 
D1:=HOUR=9 AND MINUTE=40;
D2:=HOUR=9 AND MINUTE=50;
D3:=HOUR=10 AND MINUTE=0;
D1D:=IF(D1=1,C,DRAWNULL);
D2D:=IF(D2=1,C,DRAWNULL);
D3D:=IF(D3=1,C,DRAWNULL);
DRAWLINE(D1=1,D1D,D2=1,D2D,0),COLORRED,LINETHICK2;
DRAWLINE(D2=1,D2D,D3=1,D3D,0),COLORRED,LINETHICK2;
DD1:D1D,NODRAW;
DD2:D2D,NODRAW;
DD3:D3D,NODRAW;
DRAWNUMBER(D1=1,C*0.998,C),COLORGREEN;
DRAWNUMBER(D2=1,C*0.998,C),COLORCYAN;
DRAWNUMBER(D3=1,C*0.998,C),COLORLIRED;
DRAWTEXT_FIX( 1,0.00,1-0.18,0,' 9:40:'),COLORGREEN;
DRAWNUMBER_FIX(1,0.09,1-0.18,0,D1D),COLORGREEN;
DRAWTEXT_FIX( 1,0.00,1-0.12,0,' 9:50:'),COLORCYAN;
DRAWNUMBER_FIX(1,0.09,1-0.12,0,D2D),COLORCYAN;
DRAWTEXT_FIX( 1,0.00,1-0.03,0,'10:00:'),COLORLIRED;
DRAWNUMBER_FIX(1,0.09,1-0.03,0,D3D),COLORLIRED;

ZS:=DYNAINFO(3);
KP:=DYNAINFO(4);
ZX:=DYNAINFO(7);
ZG:=DYNAINFO(5);
ZD:=DYNAINFO(6);
OP:=500-(KP/ZS-1)*4000;
CL:=500-(ZX/ZS-1)*4000;
HI:=500-(ZG/ZS-1)*4000;
LO:=500-(ZD/ZS-1)*4000;
N1:=IF(TIME>=130000 OR TIME<91500,360,860);
DRAWRECTREL(N1+4,OP,N1+8,HI,RGB(255,0,255));
DRAWRECTREL(N1+4,CL,N1+8,LO,RGB(0,128,0));
Q1:=IF(ZX>=KP,255,0);
Q2:=IF(ZX>=KP,0,255);
Q3:=IF(ZX>=KP,0,255);
DRAWRECTREL(N1-10,OP,N1+22,CL,RGB(Q1,Q2,Q3));
ZO:="FSKY.ZO#DAY";
ZC:="FSKY.ZC#DAY";
ZH:="FSKY.ZH#DAY";
ZL:="FSKY.ZL#DAY";
ZKP:=500-(ZO/ZS-1)*4000;
ZCP:=500-(ZC/ZS-1)*4000;
ZZG:=500-(ZH/ZS-1)*4000;
ZZD:=500-(ZL/ZS-1)*4000;
DRAWRECTREL(N1-36,ZKP,N1-32,ZZG,RGB(255,0,255));
DRAWRECTREL(N1-36,ZCP,N1-32,ZZD,RGB(0,128,0));
Q4:=IF(ZC>=ZO,255,0);
Q5:=IF(ZC>=ZO,0,255);
Q6:=IF(ZC>=ZO,0,255);
DRAWRECTREL(N1-49,ZKP,N1-17,ZCP,RGB(Q4,Q5,Q6));
JO:="FSKY.JO#DAY";
JC:="FSKY.JC#DAY";
JH:="FSKY.JH#DAY";
JL:="FSKY.JL#DAY";
ZZKP:=500-(JO/ZS-1)*4000;
ZZCP:=500-(JC/ZS-1)*4000;
ZZZG:=500-(JH/ZS-1)*4000;
ZZZD:=500-(JL/ZS-1)*4000;
DRAWRECTREL(N1-76,ZZKP,N1-72,ZZZG,RGB(255,0,255));
DRAWRECTREL(N1-76,ZZCP,N1-72,ZZZD,RGB(0,128,0));
Q7:=IF(JC>=JO,255,0);
Q8:=IF(JC>=JO,0,255);
Q9:=IF(JC>=JO,0,255);
DRAWRECTREL(N1-89,ZZKP,N1-57,ZZCP,RGB(Q7,Q8,Q9));

MA5:="FSKY.MA5#DAY";
XMA5:=500-(MA5/ZS-1)*4000;
DRAWRECTREL(N1-15,XMA5-5,N1+25,XMA5+5,RGB(255,255,255));
DRAWTEXT_FIX(ISLASTBAR,0.820,1-0.20,0,STRCAT('A5 : ',CON2STR(MA5,2))),COLORWHITE;
MA10:="FSKY.MA10#DAY";
XMA10:=500-(MA10/ZS-1)*4000;
DRAWRECTREL(N1-15,XMA10-5,N1+35,XMA10+5,RGB(255,255,0));
DRAWTEXT_FIX(ISLASTBAR,0.8200,1-0.15,0,STRCAT('A10 : ',CON2STR(MA10,2))),COLORYELLOW;
MA20:="FSKY.MA20#DAY";
XMA20:=500-(MA20/ZS-1)*4000;
DRAWRECTREL(N1-15,XMA20-5,N1+45,XMA20+5,RGB(255,0,255));
DRAWTEXT_FIX(ISLASTBAR,0.8200,1-0.10,0,STRCAT('A20 : ',CON2STR(MA20,2))),COLORMAGENTA;
MA60:="FSKY.MA60#DAY";
XMA60:=500-(MA60/ZS-1)*4000;
DRAWRECTREL(N1-15,XMA60-5,N1+55,XMA60+5,RGB(0,125,0));
DRAWTEXT_FIX(ISLASTBAR,0.8200,1-0.03,0,STRCAT('A60 : ',CON2STR(MA60,2))),COLORGREEN;
分时均价线:SUM(C*V,240)/SUM(V,240),COLORYELLOW,LINETHICK1;

DA:=YEAR AND MONTH AND DAY;
AA1:=STRCAT(CON2STR(YEAR,0),'年');
AA2:=STRCAT(CON2STR(MONTH,0),'月');
AA3:=STRCAT(CON2STR(DAY,0),'日');
AA4:=STRCAT('【',IF(WEEKDAY=1,'一',IF(WEEKDAY=2,'二',IF(WEEKDAY=3,'三',IF(WEEKDAY=4,'四',IF(WEEKDAY=5,'五',IF(WEEKDAY=6,'六','日')))))));
AA:=STRCAT(STRCAT(STRCAT(AA1,AA2),STRCAT(AA3,AA4)),'】');
DRAWTEXT_FIX(DA,0.85,0.01,0,AA),COLORWHITE;



来函数检测结果如下
该公式包含未来函数:DYNAINFO
该公式包含未来函数:XMA

定制、编写公式指标请联系QQ或微信同号:88652583

D1赋值:小时=9 AND 分钟=40
D2赋值:小时=9 AND 分钟=50
D3赋值:小时=10 AND 分钟=0
D1D赋值:如果D1=1,返回收盘价,否则返回无效数
D2D赋值:如果D2=1,返回收盘价,否则返回无效数
D3D赋值:如果D3=1,返回收盘价,否则返回无效数
当满足条件D1=1时,在D1D位置画直线起点,当满足条件D2=1时,在D2D位置画直线终点,0表示是否延长.,画红色,线宽为2
当满足条件D2=1时,在D2D位置画直线起点,当满足条件D3=1时,在D3D位置画直线终点,0表示是否延长.,画红色,线宽为2
输出DD1:D1D,NODRAW
输出DD2:D2D,NODRAW
输出DD3:D3D,NODRAW
当满足条件D1=1时,在收盘价*0.998位置书写数字,画绿色
当满足条件D2=1时,在收盘价*0.998位置书写数字,画青色
当满足条件D3=1时,在收盘价*0.998位置书写数字,画淡红色
当满足条件1时,在横轴0.00纵轴1-0.18位置书写文字,画绿色
当满足条件1时,在横轴0.09纵轴1-0.18位置书写数字,画绿色
当满足条件1时,在横轴0.00纵轴1-0.12位置书写文字,画青色
当满足条件1时,在横轴0.09纵轴1-0.12位置书写数字,画青色
当满足条件1时,在横轴0.00纵轴1-0.03位置书写文字,画淡红色
当满足条件1时,在横轴0.09纵轴1-0.03位置书写数字,画淡红色
ZS赋值:昨收盘价
KP赋值:开盘价
ZX赋值:现价
ZG赋值:最高价
ZD赋值:最低价
OP赋值:500-(KP/ZS-1)*4000
CL赋值:500-(ZX/ZS-1)*4000
HI赋值:500-(ZG/ZS-1)*4000
LO赋值:500-(ZD/ZS-1)*4000
N1赋值:如果时间(时分)>=130000ORTIME<91500,返回360,否则返回860
相对位置上画矩形
相对位置上画矩形
Q1赋值:如果ZX>=KP,返回255,否则返回0
Q2赋值:如果ZX>=KP,返回0,否则返回255
Q3赋值:如果ZX>=KP,返回0,否则返回255
相对位置上画矩形
ZO赋值:"FSKY的ZO[取日线数据]"
ZC赋值:"FSKY的ZC[取日线数据]"
ZH赋值:"FSKY的ZH[取日线数据]"
ZL赋值:"FSKY的ZL[取日线数据]"
ZKP赋值:500-(ZO/ZS-1)*4000
ZCP赋值:500-(ZC/ZS-1)*4000
ZZG赋值:500-(ZH/ZS-1)*4000
ZZD赋值:500-(ZL/ZS-1)*4000
相对位置上画矩形
相对位置上画矩形
Q4赋值:如果ZC>=ZO,返回255,否则返回0
Q5赋值:如果ZC>=ZO,返回0,否则返回255
Q6赋值:如果ZC>=ZO,返回0,否则返回255
相对位置上画矩形
JO赋值:"FSKY的JO[取日线数据]"
JC赋值:"FSKY的JC[取日线数据]"
JH赋值:"FSKY的JH[取日线数据]"
JL赋值:"FSKY的JL[取日线数据]"
ZZKP赋值:500-(JO/ZS-1)*4000
ZZCP赋值:500-(JC/ZS-1)*4000
ZZZG赋值:500-(JH/ZS-1)*4000
ZZZD赋值:500-(JL/ZS-1)*4000
相对位置上画矩形
相对位置上画矩形
Q7赋值:如果JC>=JO,返回255,否则返回0
Q8赋值:如果JC>=JO,返回0,否则返回255
Q9赋值:如果JC>=JO,返回0,否则返回255
相对位置上画矩形
MA5赋值:"FSKY的MA5[取日线数据]"
XMA5赋值:500-(MA5/ZS-1)*4000
相对位置上画矩形
当满足条件是否最后一个周期时,在横轴0.820纵轴1-0.20位置书写文字,画白色
MA10赋值:"FSKY的MA10[取日线数据]"
XMA10赋值:500-(MA10/ZS-1)*4000
相对位置上画矩形
当满足条件是否最后一个周期时,在横轴0.8200纵轴1-0.15位置书写文字,画黄色
MA20赋值:"FSKY的MA20[取日线数据]"
XMA20赋值:500-(MA20/ZS-1)*4000
相对位置上画矩形
当满足条件是否最后一个周期时,在横轴0.8200纵轴1-0.10位置书写文字,画洋红色
MA60赋值:"FSKY的MA60[取日线数据]"
XMA60赋值:500-(MA60/ZS-1)*4000
相对位置上画矩形
当满足条件是否最后一个周期时,在横轴0.8200纵轴1-0.03位置书写文字,画绿色
输出分时均价线:收盘价*成交量(手)的240日累和/成交量(手)的240日累和,画黄色,线宽为1
DA赋值:年份 AND 月份 AND 日
AA1赋值:字符串相加
AA2赋值:字符串相加
AA3赋值:字符串相加
AA4赋值:字符串相加
AA赋值:字符串相加
当满足条件DA时,在横轴0.85纵轴0.01位置书写文字,画白色
定制、找人做指标公式联系我们
  • QQ:88652583
  • 邮箱:88652583@qq.com
  • 工作时间:7:30-21:00
  • 微信:88652583或扫描如下二维码
指标公式网微信联系方式
月度排行
季度排行
半年排行


指标安装下载帮助  |   热门标签  | 联系我们  |  股朋指标网  |  指标网   |  指标公式网  |  加入收藏   

@2005-2023 粤ICP备2023063687号-2 股朋指标公式网别名指标公式网均来源互联网收集整理,如不慎侵犯了你的权益,请联系我们告知,我们将做删除处理
免责声明:股朋指标公式网所有指标公式及文章由网络收集,不保障实时性和真实性, 仅供学习研究并不构成投资建议,请勿以此为依据进行股票交易,由此引起的投资亏损与本站无关。
QQ:88652583 微信 88652583
sitemap站点地图