通达信北沙分时指标公式

均价:SUM(V*C,0)/SUM(V,0),COLORYELLOW;
SJ1:=TIME=93100;
SJ2:=TIME=130000;
T1:=BArslAST(SJ1);
T2:=BARSLAST(SJ2);
午前低点:=IF(BETWEEN(TIME,93100,130000),LLV(L,T1),DRAWNULL)=C;
WQD:=CONST(REF(C,BARSLAST(IF(FILTERX(午前低点,T1),1,0))));
WD:=FILTERX(午前低点,T1);
午前高点:=IF(BETWEEN(TIME,93100,130000),HHV(H,T1),DRAWNULL)=C;
WQG:=CONST(REF(C,BARSLAST(IF(FILTERX(午前高点,T1),1,0))));
WG:=FILTERX(午前高点,T1);
午前高点数:=CONST(IF(BARSLAST(WG)>=0,REF(T1,BARSLAST(WG)),DRAWNULL));
午前低点数:=CONST(IF(BARSLAST(WD)>=0,REF(T1,BARSLAST(WD)),DRAWNULL));
{上午区间}
早开横线:=CONST(DYNAINFO(4));
午收横线:=CONST(REF(C,T2));
午收:=(IF(SJ2,1,0));
早开横线最高:=IF(TIME=93100 AND 早开横线=MAX(早开横线,MAX(WQG,WQD)),1,0);
早开横线最低:=IF(TIME=93100 AND 早开横线=MIN(早开横线,MIN(WQG,WQD)),1,0);
开盘起始点:=SJ1 AND 早开横线<=WQG AND 早开横线>=WQD;
起点成立:=SJ1 AND 早开横线<=WQG AND 早开横线>=WQD;
起点1:=crOSS(SUM(IF(CROSS(SUM(WD+WG,T1)=1,0.5),1,CROSS(SUM(WD+WG,0)=2,0.5)),T1)=1,0.5);
起点1天数:=CONST(IF(BARSLAST(起点1)>=0,REF(T1,BARSLAST(起点1)),DRAWNULL));
起点1横线:=CONST(IF(BARSLAST(起点1)>=0,REF(C,BARSLAST(起点1)),DRAWNULL));
{第一根画线}
第一根1:IF(REF(起点成立,T1) AND T1>=0 AND T1<=起点1天数 AND 早开横线<起点1横线,
((起点1横线-早开横线)/起点1天数)*T1+早开横线,DRAWNULL),LINETHICK2,COLORMAGENTA;
第一根2:IF(REF(起点成立,T1) AND T1>=0 AND T1<=起点1天数 AND 早开横线>起点1横线,
早开横线-((早开横线-起点1横线)/起点1天数)*T1,DRAWNULL),LINETHICK2,COLORMAGENTA;
{第一根实时}
午收1实时天:=CONST(IF(ISLASTBAR,BARSLAST(起点1),DRAWNULL));
午收1实时横线:=CONST(IF(BARSLAST(起点1)>=0 AND T1<=120,C,DRAWNULL));
第一根实时1:IF(BARSLAST(起点1)>=0 AND T1<=119 AND 午收1实时横线>起点1横线 AND
早开横线>WQG,((午收1实时横线-起点1横线)/午收1实时天)*BARSLAST(起点1)+起点1横线,
DRAWNULL),LINETHICK2,COLORGREEN;
第一根实时2:IF(BARSLAST(起点1)>=0 AND T1<=119 AND 午收1实时横线<起点1横线 AND
早开横线<WQD,起点1横线-((起点1横线-午收1实时横线)/午收1实时天)*BARSLAST(起点1),
DRAWNULL),LINETHICK2,COLORGREEN;
{第二根画线}
起点2:=CROSS(SUM(WD+WG,0)=2,0.5);
起点2天数:=CONST(IF(BARSLAST(起点2)>=0,REF(BARSLAST(起点1),BARSLAST(起点2)),DRAWNULL));
起点2横线:=CONST(IF(BARSLAST(起点2)>=0,REF(C,BARSLAST(起点2)),DRAWNULL));
午收天数1:=CONST(IF(T2>=0,REF(BARSLAST(起点1),T2),DRAWNULL));
午收天数2:=CONST(IF(T2>=0,REF(BARSLAST(起点2),T2),DRAWNULL));
第二根1:IF(BARSLAST(起点1)>=0 AND BARSLAST(起点1)<=起点2天数 AND 起点2横线>起点1横线
AND 早开横线<=WQG AND 早开横线>=WQD,
((起点2横线-起点1横线)/起点2天数)*BARSLAST(起点1)+起点1横线,
DRAWNULL),LINETHICK2,COLORGREEN;
第二根2:IF(BARSLAST(起点1)>=0 AND BARSLAST(起点1)<=起点2天数 AND 起点2横线<起点1横线
AND 早开横线<=WQG AND 早开横线>=WQD,
起点1横线-((起点1横线-起点2横线)/起点2天数)*BARSLAST(起点1),
DRAWNULL),LINETHICK2,COLORGREEN;
第二根3:IF(BARSLAST(起点1)>=0 AND BARSLAST(起点1)<=午收天数1 AND 午收横线>起点1横线
AND 早开横线>WQG,
((午收横线-起点1横线)/午收天数1)*BARSLAST(起点1)+起点1横线,
DRAWNULL),LINETHICK2,COLORGREEN;
第二根4:IF(BARSLAST(起点1)>=0 AND BARSLAST(起点1)<=午收天数1 AND 午收横线<起点1横线
AND 早开横线<WQD,
起点1横线-((起点1横线-午收横线)/午收天数1)*BARSLAST(起点1),
DRAWNULL),LINETHICK2,COLORGREEN;
第二根5:IF(BARSLAST(起点2)>=0 AND BARSLAST(起点2)<=午收天数2 AND 午收横线>起点2横线
AND 早开横线>WQG,
((午收横线-起点2横线)/午收天数2)*BARSLAST(起点2)+起点2横线,
DRAWNULL),LINETHICK2,COLORGREEN;
第二根6:IF(BARSLAST(起点2)>=0 AND BARSLAST(起点2)<=午收天数2 AND 午收横线<起点2横线
AND 早开横线<WQD,
起点2横线-((起点2横线-午收横线)/午收天数2)*BARSLAST(起点2),
DRAWNULL),LINETHICK2,COLORGREEN;
第二根7:IF(T1>=0 AND T1<=午前高点数 AND 早开横线<WQD AND DYNAINFO(4)>0,
((WQG-早开横线)/午前高点数)*T1+早开横线,DRAWNULL),LINETHICK2,COLORMAGENTA;
第二根8:IF(T1>=0 AND T1<=午前低点数 AND 早开横线>WQG AND DYNAINFO(4)>0,
早开横线-((早开横线-WQD)/午前低点数)*T1,DRAWNULL),LINETHICK2,COLORMAGENTA;
第二根9:IF(T1>=0 AND T1<=起点1天数 AND 早开横线=WQD AND 早开横线=起点1横线 AND
DYNAINFO(4)>0,早开横线,DRAWNULL),LINETHICK2,COLORMAGENTA;
第二根10:IF(T1>=0 AND T1<=起点1天数 AND 早开横线=WQG AND 早开横线=起点1横线 AND
DYNAINFO(4)>0,早开横线,DRAWNULL),LINETHICK2,COLORMAGENTA;
{第二根实时}
午收2实时天:=CONST(IF(ISLASTBAR,BARSLAST(起点2),DRAWNULL));
午收2实时横线:=CONST(IF(BARSLAST(起点2)>=0 AND T1<=120,C,DRAWNULL));
第二根11:IF(BARSLAST(起点2)>=0 AND T1<=119 AND 午收2实时横线>起点2横线 AND
早开横线>WQG,((午收2实时横线-起点2横线)/午收2实时天)*BARSLAST(起点2)+起点2横线,
DRAWNULL),LINETHICK2,COLORGREEN;
第二根12:IF(BARSLAST(起点2)>=0 AND T1<=119 AND 午收2实时横线<起点2横线 AND
早开横线<WQD,起点2横线-((起点2横线-午收2实时横线)/午收2实时天)*BARSLAST(起点2),
DRAWNULL),LINETHICK2,COLORGREEN;
{第三根画线};
起点3天数:=CONST(IF(T1>=120,REF(BARSLAST(起点2),T2),DRAWNULL));
第三根1:IF(BARSLAST(起点2)>=0 AND T1<=119 AND 午收横线>起点2横线 AND 早开横线<=WQG
AND 早开横线>=WQD,
((午收横线-起点2横线)/起点3天数)*BARSLAST(起点2)+起点2横线,DRAWNULL),LINETHICK2,COLORRED;
第三根2:IF(BARSLAST(起点2)>=0 AND T1<=119 AND 午收横线<起点2横线 AND 早开横线<=WQG
AND 早开横线>=WQD,
起点2横线-((起点2横线-午收横线)/起点3天数)*BARSLAST(起点2),DRAWNULL),LINETHICK2,COLORRED;
{高低点虚线}
虚线1:IF(早开横线<=WQD AND DYNAINFO(4)>0,早开横线,DRAWNULL),COLORLIBLUE,DOTLINE;
虚线2:IF(早开横线>=WQG AND DYNAINFO(4)>0,早开横线,DRAWNULL),COLORLIBLUE,DOTLINE;
虚线3:IF(BARSLAST(WD)>=0 AND WQD<早开横线 AND DYNAINFO(4)>0,REF(C,BARSLAST(WD)),
DRAWNULL),COLORLIBLUE,DOTLINE;
虚线4:IF(BARSLAST(WG)>=0 AND WQG>早开横线 AND DYNAINFO(4)>0,REF(C,BARSLAST(WG)),
DRAWNULL),COLORLIBLUE,DOTLINE;
{盘中验证第三根}
午收天数3:=CONST(IF(ISLASTBAR,BARSLAST(起点2),DRAWNULL));
午收横线1:=CONST(IF(BARSLAST(起点2)>=0 AND T1<=120,C,DRAWNULL));
第三根3:IF(BARSLAST(起点2)>=0 AND T1<=119 AND 午收横线1>起点2横线 AND 早开横线<=WQG
AND 早开横线>=WQD,((午收横线1-起点2横线)/午收天数3)*BARSLAST(起点2)+起点2横线,DRAWNULL)
,LINETHICK2,COLORRED;
第三根4:IF(BARSLAST(起点2)>=0 AND T1<=119 AND 午收横线1<起点2横线 AND 早开横线<=WQG
AND 早开横线>=WQD,起点2横线-((起点2横线-午收横线1)/午收天数3)*BARSLAST(起点2),DRAWNULL)
,LINETHICK2,COLORRED;
{下午画线}
午后低点:=LLV(L,T2)=C;
WHD:=CONST(REF(C,BARSLAST(IF(FILTERX(午后低点,T2),1,0))));
XWD:=FILTERX(午后低点,T2);
午后高点:=HHV(H,T2)=C;
WHG:=CONST(REF(C,BARSLAST(IF(FILTERX(午后高点,T2),1,0))));
XWG:=FILTERX(午后高点,T2);
午后高点数:=CONST(IF(BARSLAST(XWG)>=0,REF(T2,BARSLAST(WG)),DRAWNULL));
午后低点数:=CONST(IF(BARSLAST(XWD)>=0,REF(T2,BARSLAST(WD)),DRAWNULL));
午后信号1:=CROSS(SUM(XWD+XWG,T2)=1,0.5);
{午后第一根}
午后起点1天数:=CONST(IF(BARSLAST(午后信号1)>=0,REF(T2,BARSLAST(午后信号1)),DRAWNULL));
午后起点1横线:=CONST(IF(BARSLAST(午后信号1)>=0,REF(C,BARSLAST(午后信号1)),DRAWNULL));
午后第一根1:IF(T2>=0 AND T2<=午后起点1天数 AND 午收横线<=午后起点1横线,
((午后起点1横线-午收横线)/午后起点1天数)*T2+午收横线,DRAWNULL),LINETHICK2,COLORMAGENTA;
午后第一根2:IF(T2>=0 AND T2<=午后起点1天数 AND 午收横线>午后起点1横线,
午收横线-((午收横线-午后起点1横线)/午后起点1天数)*T2,DRAWNULL),LINETHICK2,COLORMAGENTA;
{午后第二根}
午后信号2:=CROSS(SUM(XWD+XWG,T2)=2,0.5);
午后起点2天数:=CONST(IF(BARSLAST(午后信号2)>=0,REF(BARSLAST(午后信号1),
BARSLAST(午后信号2)),DRAWNULL));
午后起点2横线:=CONST(IF(BARSLAST(午后信号2)>=0,REF(C,BARSLAST(午后信号2)),DRAWNULL));
午后第二根1:IF(BARSLAST(午后信号1)>=0 AND BARSLAST(午后信号1)<=午后起点2天数 AND
午后起点1横线<=午后起点2横线,((午后起点2横线-午后起点1横线)/午后起点2天数)*
BARSLAST(午后信号1)+午后起点1横线,DRAWNULL),LINETHICK2,COLORGREEN;
午后第二根2:IF(BARSLAST(午后信号1)>=0 AND BARSLAST(午后信号1)<=午后起点2天数 AND
午后起点1横线>午后起点2横线,午后起点1横线-((午后起点1横线-午后起点2横线)/午后起点2天数)
*BARSLAST(午后信号1),DRAWNULL),LINETHICK2,COLORGREEN;
{午后第三根}
收盘横线:=CONST(IF(ISLASTBAR,C,DRAWNULL));
午后信号3:=ISLASTBAR;
午后起点3天数:=CONST(IF(午后信号3,BARSLAST(午后信号2),DRAWNULL));
午后第三根1:IF(BARSLAST(午后信号2)>=0 AND T1<=239 AND 收盘横线>=午后起点2横线,
((收盘横线-午后起点2横线)/午后起点3天数)*BARSLAST(午后信号2)+
午后起点2横线,DRAWNULL),LINETHICK2,COLORRED;
午后第三根2:IF(BARSLAST(午后信号2)>=0 AND T1<=239 AND 收盘横线<午后起点2横线,
午后起点2横线-((午后起点2横线-收盘横线)/午后起点3天数)*BARSLAST(午后信号2)
,DRAWNULL),LINETHICK2,COLORRED;
D1:=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(D1,0,1,0,AA),COLORGREEN;