通达信五K看盘主图源码(重发)

[复制链接]
查看182 | 回复0 | 2021-8-26 22:49:13 | 显示全部楼层 |阅读模式

以下是通达信五K看盘主图源码(重发)(无源码的请下载附件导入)

通达信公式五K看盘主图

TJ1:=EVERY(C<O,2) AND H<REF(H,1) AND L<REF(L,1);
XG1:=REF(TJ1,1) AND C>O AND C>REF(HHV(H,2),1) AND H=HHV(H,3);
Q1:=BACKSET(XG1,3);
T1:=BARSLAST(CROSS(Q1=1,0.5));
DRAWLINE(T1=0,REFX(HHV(H,3),BARSNEXT(XG1)),XG1,HHV(H,3),0),COLORMAGENTA;
DRAWLINE(T1=0,REFX(LLV(L,3),BARSNEXT(XG1)),XG1,LLV(L,3),0),COLORMAGENTA;
STICKLINE(T1=0,REFX(HHV(H,3),BARSNEXT(XG1)),REFX(LLV(L,3),BARSNEXT(XG1)),0,0),COLORMAGENTA;
STICKLINE(XG1,HHV(H,3),LLV(L,3),0,0),COLORMAGENTA;
TJ2:=EVERY(C>O,2) AND H>REF(H,1) AND L>REF(L,1);
XG2:=REF(TJ2,1) AND C<O AND C<REF(LLV(L,2),1) AND L=LLV(L,3);
Q2:=BACKSET(XG2,3);
T2:=BARSLAST(CROSS(Q2=1,0.5));
DRAWLINE(T2=0,REFX(HHV(H,3),BARSNEXT(XG2)),XG2,HHV(H,3),0),COLORYELLOW;
DRAWLINE(T2=0,REFX(LLV(L,3),BARSNEXT(XG2)),XG2,LLV(L,3),0),COLORYELLOW;
STICKLINE(T2=0,REFX(HHV(H,3),BARSNEXT(XG2)),REFX(LLV(L,3),BARSNEXT(XG2)),0,0),COLORYELLOW;
STICKLINE(XG2,HHV(H,3),LLV(L,3),0,0),COLORYELLOW;
XG3:=REF(XG1,1) AND C>O AND C>REF(HHV(H,3),1) AND H=HHV(H,4);
Q3:=BACKSET(XG3,4);
T3:=BARSLAST(CROSS(Q3=1,0.5));
DRAWLINE(T3=0,REFX(HHV(H,4),BARSNEXT(XG3)),XG3,HHV(H,4),0),COLORLIRED;
DRAWLINE(T3=0,REFX(LLV(L,4),BARSNEXT(XG3)),XG3,LLV(L,4),0),COLORLIRED;
STICKLINE(T3=0,REFX(HHV(H,4),BARSNEXT(XG3)),REFX(LLV(L,4),BARSNEXT(XG3)),0,0),COLORLIRED;
STICKLINE(XG3,HHV(H,4),LLV(L,4),0,0),COLORLIRED;
XG4:=REF(XG2,1) AND C<O AND C<REF(LLV(L,3),1) AND L=LLV(L,4);
Q4:=BACKSET(XG4,4);
T4:=BARSLAST(CROSS(Q4=1,0.5));
DRAWLINE(T4=0,REFX(HHV(H,4),BARSNEXT(XG4)),XG4,HHV(H,4),0),COLORBLUE;
DRAWLINE(T4=0,REFX(LLV(L,4),BARSNEXT(XG4)),XG4,LLV(L,4),0),COLORBLUE;
STICKLINE(T4=0,REFX(HHV(H,4),BARSNEXT(XG4)),REFX(LLV(L,4),BARSNEXT(XG4)),0,0),COLORBLUE;
STICKLINE(XG4,HHV(H,4),LLV(L,4),0,0),COLORBLUE;
XG5:=REF(XG3,1) AND C>O AND C>REF(HHV(H,4),1) AND H=HHV(H,5);
Q5:=BACKSET(XG5,5);
T5:=BARSLAST(CROSS(Q5=1,0.5));
DRAWLINE(T5=0,REFX(HHV(H,5),BARSNEXT(XG5)),XG5,HHV(H,5),0),COLORRED;
DRAWLINE(T5=0,REFX(LLV(L,5),BARSNEXT(XG5)),XG5,LLV(L,5),0),COLORRED;
STICKLINE(T5=0,REFX(HHV(H,5),BARSNEXT(XG5)),REFX(LLV(L,5),BARSNEXT(XG5)),0,0),COLORRED;
STICKLINE(XG5,HHV(H,5),LLV(L,5),0,0),COLORRED;
XG6:=REF(XG4,1) AND C<O AND C<REF(LLV(L,4),1) AND L=LLV(L,5);
Q6:=BACKSET(XG6,5);
T6:=BARSLAST(CROSS(Q6=1,0.5));
DRAWLINE(T6=0,REFX(HHV(H,5),BARSNEXT(XG6)),XG6,HHV(H,5),0),COLORGREEN;
DRAWLINE(T6=0,REFX(LLV(L,5),BARSNEXT(XG6)),XG6,LLV(L,5),0),COLORGREEN;
STICKLINE(T6=0,REFX(HHV(H,5),BARSNEXT(XG6)),REFX(LLV(L,5),BARSNEXT(XG6)),0,0),COLORGREEN;
STICKLINE(XG6,HHV(H,5),LLV(L,5),0,0),COLORGREEN;
A:="玫红框:三K看转强";
A1:="浅红框:四K判转多";
A2:="大红框:五K抓涨势";
B:="黄色框:三K看转弱";
B1:="蓝色框:四K判转空";
B2:="绿色框:五K抓跌势";
DRAWTEXT_FIX(ISLASTBAR,0.005,0,0,A),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.005,0.1,0,A1),COLORLIRED;
DRAWTEXT_FIX(ISLASTBAR,0.005,0.2,0,A2),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0.12,0,0,B),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.12,0.1,0,B1),COLORBLUE;
DRAWTEXT_FIX(ISLASTBAR,0.12,0.2,0,B2),COLORGREEN;

============以上源码,有错误,谢谢网友反馈,修改源码如下:

 {马到功成主图}
{主图}

TJ1:=EVERY(C<O,2) AND H<REF(H,1) AND L<REF(L,1);
XG1:=REF(TJ1,1) AND C>O AND C>REF(HHV(H,2),1) AND H=HHV(H,3);
Q1:=BACKSET(XG1,3);
T1:=BARSLAST(CROSS(Q1=1,0.5));
DRAWLINE(T1=0,REFX(HHV(H,3),BARSNEXT(XG1)),XG1,HHV(H,3),0),COLORMAGENTA;
DRAWLINE(T1=0,REFX(LLV(L,3),BARSNEXT(XG1)),XG1,LLV(L,3),0),COLORMAGENTA;
STICKLINE(T1=0,REFX(HHV(H,3),BARSNEXT(XG1)),REFX(LLV(L,3),BARSNEXT(XG1)),0,0),COLORMAGENTA;
STICKLINE(XG1,HHV(H,3),LLV(L,3),0,0),COLORMAGENTA;
TJ2:=EVERY(C>O,2) AND H>REF(H,1) AND L>REF(L,1);
XG2:=REF(TJ2,1) AND C<O AND C<REF(LLV(L,2),1) AND L=LLV(L,3);
Q2:=BACKSET(XG2,3);
T2:=BARSLAST(CROSS(Q2=1,0.5));
DRAWLINE(T2=0,REFX(HHV(H,3),BARSNEXT(XG2)),XG2,HHV(H,3),0),COLORYELLOW;
DRAWLINE(T2=0,REFX(LLV(L,3),BARSNEXT(XG2)),XG2,LLV(L,3),0),COLORYELLOW;
STICKLINE(T2=0,REFX(HHV(H,3),BARSNEXT(XG2)),REFX(LLV(L,3),BARSNEXT(XG2)),0,0),COLORYELLOW;
STICKLINE(XG2,HHV(H,3),LLV(L,3),0,0),COLORYELLOW;
XG3:=REF(XG1,1) AND C>O AND C>REF(HHV(H,3),1) AND H=HHV(H,4);
Q3:=BACKSET(XG3,4);
T3:=BARSLAST(CROSS(Q3=1,0.5));
DRAWLINE(T3=0,REFX(HHV(H,4),BARSNEXT(XG3)),XG3,HHV(H,4),0),COLORLIRED;
DRAWLINE(T3=0,REFX(LLV(L,4),BARSNEXT(XG3)),XG3,LLV(L,4),0),COLORLIRED;
STICKLINE(T3=0,REFX(HHV(H,4),BARSNEXT(XG3)),REFX(LLV(L,4),BARSNEXT(XG3)),0,0),COLORLIRED;
STICKLINE(XG3,HHV(H,4),LLV(L,4),0,0),COLORLIRED;
XG4:=REF(XG2,1) AND C<O AND C<REF(LLV(L,3),1) AND L=LLV(L,4);
Q4:=BACKSET(XG4,4);
{}

T4:=BARSLAST(CROSS(Q4=1,0.5));
DRAWLINE(T4=0,REFX(HHV(H,4),BARSNEXT(XG4)),XG4,HHV(H,4),0),COLORBLUE;
DRAWLINE(T4=0,REFX(LLV(L,4),BARSNEXT(XG4)),XG4,LLV(L,4),0),COLORBLUE;
STICKLINE(T4=0,REFX(HHV(H,4),BARSNEXT(XG4)),REFX(LLV(L,4),BARSNEXT(XG4)),0,0),COLORBLUE;
STICKLINE(XG4,HHV(H,4),LLV(L,4),0,0),COLORBLUE;
XG5:=REF(XG3,1) AND C>O AND C>REF(HHV(H,4),1) AND H=HHV(H,5);
Q5:=BACKSET(XG5,5);
T5:=BARSLAST(CROSS(Q5=1,0.5));
DRAWLINE(T5=0,REFX(HHV(H,5),BARSNEXT(XG5)),XG5,HHV(H,5),0),COLORRED;
DRAWLINE(T5=0,REFX(LLV(L,5),BARSNEXT(XG5)),XG5,LLV(L,5),0),COLORRED;
STICKLINE(T5=0,REFX(HHV(H,5),BARSNEXT(XG5)),REFX(LLV(L,5),BARSNEXT(XG5)),0,0),COLORRED;
STICKLINE(XG5,HHV(H,5),LLV(L,5),0,0),COLORRED;
XG6:=REF(XG4,1) AND C<O AND C<REF(LLV(L,4),1) AND L=LLV(L,5);
Q6:=BACKSET(XG6,5);
T6:=BARSLAST(CROSS(Q6=1,0.5));
{}

DRAWLINE(T6=0,REFX(HHV(H,5),BARSNEXT(XG6)),XG6,HHV(H,5),0),COLORGREEN;
DRAWLINE(T6=0,REFX(LLV(L,5),BARSNEXT(XG6)),XG6,LLV(L,5),0),COLORGREEN;
STICKLINE(T6=0,REFX(HHV(H,5),BARSNEXT(XG6)),REFX(LLV(L,5),BARSNEXT(XG6)),0,0),COLORGREEN;
STICKLINE(XG6,HHV(H,5),LLV(L,5),0,0),COLORGREEN;
{}

{
A:="玫红框:三K看转强";
A1:="浅红框:四K判转多";
A2:="大红框:五K抓涨势";
B:="黄色框:三K看转弱";
B1:="蓝色框:四K判转空";
B2:="绿色框:五K抓跌势";
}
DRAWTEXT_FIX(ISLASTBAR,0.005,0,0,'玫红框:三K看转强'),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.005,0.1,0,'浅红框:四K判转多'),COLORLIRED;
DRAWTEXT_FIX(ISLASTBAR,0.005,0.2,0,'大红框:五K抓涨势'),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0.12,0,0,'黄色框:三K看转弱'),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.12,0.1,0,'蓝色框:四K判转空'),COLORBLUE;
DRAWTEXT_FIX(ISLASTBAR,0.12,0.2,0,'绿色框:五K抓跌势'),COLORGREEN;

81200947.png

81200947.png

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则