公式指标论坛

 找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索

通达信分时主图十点画大十字+三日K线源码

2012-10-22 09:28| 发布者: admin| 查看: 106| 评论: 0

【优点】:
看分时的同时能查看前三天的K线走势;
【缺点】:
1、前三天K线高低点压缩当日盘面;
2、叠加的大盘走势10点前无法显示;

一、需建立一个引用公式,公式名称:SS。

源码:

O1:REF(O,1);
C1:REF(C,1);
H1:REF(H,1);
L1:REF(L,1);
O2:REF(O,2);
C2:REF(C,2);
H2:REF(H,2);
L2:REF(L,2);
O3:REF(O,3);
C3:REF(C,3);
H3:REF(H,3);
L3:REF(L,3);

二、分时主图10点画大十字+三日K线,名称随意起。

源码:

O1:="SS.O1#DAY";
C1:="SS.C1#DAY";
H1:="SS.H1#DAY";
L1:="SS.L1#DAY";

O2:="SS.O2#DAY";
C2:="SS.C2#DAY";
H2:="SS.H2#DAY";
L2:="SS.L2#DAY";

O3:="SS.O3#DAY";
C3:="SS.C3#DAY";
H3:="SS.H3#DAY";
L3:="SS.L3#DAY";
GGJ:=CONST(IF(BARSLAST(TIME=93100),HHV(H,0),REF(HHV(H,0),BARSLAST(TIME=93100))));
DDJ:=CONST(IF(BARSLAST(TIME=93100),LLV(H,0),REF(LLV(H,0),BARSLAST(TIME=93100))));

E1:=IF(BETWEEN(TIME,94900,95700),O1,DRAWNULL);
E2:=IF(BETWEEN(TIME,94900,95700),C1,DRAWNULL);

E12:=IF(BETWEEN(TIME,94000,94800),O2,DRAWNULL);
E22:=IF(BETWEEN(TIME,94000,94800),C2,DRAWNULL);

E13:=IF(BETWEEN(TIME,93100,93900),O3,DRAWNULL);
E23:=IF(BETWEEN(TIME,93100,93900),C3,DRAWNULL);

时间:=TIME=100000;
N:=BARSLAST(时间);
CS1:=CONST(IF(N,HHV(H,0),REF(HHV(H,0),N)));
CS2:=CONST(IF(N,LLV(L,0),REF(LLV(L,0),N)));

三高:=IF(BETWEEN(TIME,93100,100000),MAX(H1,MAX(H2,H3)),DRAWNULL);
三低:=IF(BETWEEN(TIME,93100,100000),MIN(L1,MIN(L2,L3)),DRAWNULL);
三日高:=IF(BETWEEN(TIME,95700,100000),MAX(H1,MAX(H2,H3)),DRAWNULL);
三日低:=IF(BETWEEN(TIME,95700,100000),MIN(L1,MIN(L2,L3)),DRAWNULL);
三日高1:=IF(BETWEEN(TIME,94900,93100),MAX(H1,MAX(H2,H3)),DRAWNULL);
三日低1:=IF(BETWEEN(TIME,954900,93100),MIN(L1,MIN(L2,L3)),DRAWNULL);
三日高2:=IF(BETWEEN(TIME,94000,93100),MAX(H1,MAX(H2,H3)),DRAWNULL);
三日低2:=IF(BETWEEN(TIME,94000,93100),MIN(L1,MIN(L2,L3)),DRAWNULL);

DRAWBAND(三日高,RGB(0,0,0),三日低,RGB(0,0,0));
STICKLINE(TIME=95300 AND C1>O1,H1,L1,1,0),COLOR0000CC;
STICKLINE(TIME=95300 AND C1 STICKLINE(TIME=95300 AND C1=O1,H1,L1,1,0),COLORWHITE;

DRAWBAND(IF(C1>O1,E2,DRAWNULL),RGB(204,0,0),E1,RGB(204,0,0));
DRAWBAND(IF(C1 DRAWBAND(IF(C1=O1,E2,DRAWNULL),RGB(255,255,255),E1,RGB(255,255,255));
DRAWBAND(三日高1,RGB(0,0,0),三日低1,RGB(0,0,0));

STICKLINE(TIME=94400 AND C2>O2,H2,L2,1,0),COLOR0000CC;
STICKLINE(TIME=94400 AND C2 STICKLINE(TIME=94400 AND C2=O2,H2,L2,1,0),COLORWHITE;
DRAWBAND(IF(C2>O2,E22,DRAWNULL),RGB(204,0,0),E12,RGB(204,0,0));
DRAWBAND(IF(C2 DRAWBAND(IF(C2=O2,E22,DRAWNULL),RGB(255,255,255),E12,RGB(255,255,255));

DRAWBAND(三日高2,RGB(0,0,0),三日低2,RGB(0,0,0));

STICKLINE(TIME=93500 AND C3>O3,H3,L3,1,0),COLOR0000CC;
STICKLINE(TIME=93500 AND C3 STICKLINE(TIME=93500 AND C3=O3,H3,L3,1,0),COLORWHITE;
DRAWBAND(IF(C3>O3,E23,DRAWNULL),RGB(204,0,0),E13,RGB(204,0,0));
DRAWBAND(IF(C3 DRAWBAND(IF(C3=O3,E23,DRAWNULL),RGB(255,255,255),E13,RGB(255,255,255));
{www.goodgupiao.com}

STICKLINE(时间=1,三日高,三日低,-1,-1),COLOR0000CC;
IF(BETWEEN(TIME,93100,94000) AND BETWEEN(C,C1,O1),C,DRAWNULL),COLORWHITE;
STICKLINE(时间=1,CS1,CS2,-1,-1),COLORGREEN;
均价:SUM(V*C,0)/SUM(V,0),COLORYELLOW;
CONST(IF(N,LLV(L,0),REF(LLV(L,0),N))),COLOR888888;
CONST(IF(N,HHV(H,0),REF(HHV(H,0),N))),COLOR888888;
CONST(IF(时间,HHV(H,0),REF(HHV(H,0),N))),COLORRED,DOTLINE;
CONST(IF(时间,LLV(L,0),REF(LLV(L,0),N))),COLORLIBLUE,DOTLINE;
常数:CONST(IF(N=0,C,REF(C,N))),COLORGREEN,DOTLINE;
DRAWNUMBER(TIME=93500,常数,常数),COLORMAGENTA;
DRAWNUMBER(时间,GGJ*0.999,GGJ),COLORMAGENTA;
DRAWNUMBER(时间,DDJ*1.001,DDJ),COLORMAGENTA;
IF(BETWEEN(C,三高,三低),C,DRAWNULL),COLORWHITE;
IF(C=GGJ,C,DRAWNULL),COLORWHITE;


鲜花

握手

雷人

路过

鸡蛋
返回顶部