通达信副图显示周k线源码

 2023-10-06 11:20:13    通达信指标网  

副图显示周线A


A:=WEEKDAY-REF(WEEKDAY,1);

B:=DATETODAY(DATE)-REF(DATETODAY(DATE),1);

周天数:=1+BARSLAST(BARSCOUNT(C)=0 OR A!=B),NODRAW;

本周已交易天数:周天数,NODRAW;

{上面援用日线显示周线的作者,向你问候.向理想致敬}

开盘:=周天数=1;

周距:=周天数<5,周天数>1;

RR:=BACKSET(周天数<REF(周天数,1),2),NODRAW;

周未:=( RR=1 AND 周天数!=1) OR WEEKDAY=5 ,NODRAW;

周开盘:IF(开盘*O,开盘*O,REF(开盘*O,周天数=2)*周距),NODRAW;

周最高:HHV(H,周天数),COLORYELLOW,NODRAW;

周最低:LLV(L,周天数),COLOR00FF00,NODRAW;

收盘价:C,NODRAW;

DRAWKLINE(周最高,周开盘,周最低,收盘价);

STICKLINE(周未 AND 周开盘>C,周开盘,C,2,0),COLORGREEN;

STICKLINE(周未 AND 周开盘<C,周开盘,C,2,0),COLORYELLOW;

STICKLINE(周未 AND 周开盘>C,周最高,周最低,0,0),COLORGREEN;

STICKLINE(周未 AND 周开盘<C,周最高,周最低,0,0),COLORYELLOW;


=======================


副图显示周线B



A:=WEEKDAY-REF(WEEKDAY,1);

B:=DATETODAY(DATE)-REF(DATETODAY(DATE),1);

周天数:=1+BARSLAST(BARSCOUNT(C)=0 OR A!=B),NODRAW;

本周已交易天数:周天数,NODRAW;

{上面援用日线显示周线的作者,向你问候.向理想致敬}

开盘:=周天数=1;

周距:=周天数<5,周天数>1;

RR:=BACKSET(周天数<REF(周天数,1),2),NODRAW;

周未:=( RR=1 AND 周天数!=1) OR WEEKDAY=5 ,NODRAW;

周开盘:IF(开盘*O,开盘*O,REF(开盘*O,周天数=2)*周距),NODRAW;

周最高:HHV(H,周天数),COLORYELLOW,NODRAW;

周最低:LLV(L,周天数),COLOR00FF00,NODRAW;

收盘价:C,NODRAW;

STICKLINE(周未 AND 周开盘>C,周开盘,C,2,0),COLOREAEAAE;

STICKLINE(周未 AND 周开盘<C,周开盘,C,2,0),COLORRED;

STICKLINE(周未 AND 周开盘>C,周最高,周最低,0,0),COLOREAEAAE;

STICKLINE(周未 AND 周开盘<C,周最高,周最低,0,0),COLORRED;

  •  标签:  

原文链接:https://www.tdxzb.com/?id=1669

本文版权:如无特别标注,本站文章均为原创。

相关文章

服务热线

18020657357

微信客服

微信客服