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

[复制链接]
查看131 | 回复0 | 2021-8-21 06:54:00 | 显示全部楼层 |阅读模式

以下是通达信分时主图十点画大十字+三日K线公式(无源码的请下载附件导入)

 

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

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

源码股海网提供www.guhai.com.cn:

一、需建立一个引用公式,公式名称: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<O1,H1,L1,1,0),COLORFFFF54;
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<O1,E2,DRAWNULL),RGB(84,255,255),E1,RGB(84,255,255));
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<O2,H2,L2,1,0),COLORFFFF54;
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<O2,E22,DRAWNULL),RGB(84,255,255),E12,RGB(84,255,255));
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<O3,H3,L3,1,0),COLORFFFF54;
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<O3,E23,DRAWNULL),RGB(84,255,255),E13,RGB(84,255,255));
DRAWBAND(IF(C3=O3,E23,DRAWNULL),RGB(255,255,255),E13,RGB(255,255,255));
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;

 

651544689.png

651544689.png

 

回复

使用道具 举报

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

本版积分规则