通达信北沙月周日MACD框

JC:="MACD.MACD#MONTH"<0;

TS:=BARSLAST(JC),NODRAW;

起点:=FILTERX(TS=1,BARSSINCE(C));

终点:=FILTERX(TS>=1 AND REFX(TS,1)=0,BARSSINCE(C));

天数:=BARSLAST(起点);

红柱最高价:IF(天数>=0 AND REFX(TS>=1,BARSNEXT(ISLASTBAR)),CONST(HHV(H,TS)),DRAWNULL),COLORYELLOW;

红柱最低价:IF(天数>=0 AND REFX(TS>=1,BARSNEXT(ISLASTBAR)),CONST(LLV(L,TS)),DRAWNULL),COLORYELLOW;

STICKLINE(起点,红柱最高价,红柱最低价,0,-1),COLORYELLOW;

STICKLINE(ISLASTBAR,红柱最高价,红柱最低价,0,-1),COLORYELLOW;

{月死叉绿柱}

SC:="MACD.MACD#MONTH">0;

TS1:=BARSLAST(SC),NODRAW;

起点1:=FILTERX(TS1=1,BARSSINCE(C));

终点1:=FILTERX(TS1>=1 AND REFX(TS1,1)=0,BARSSINCE(C));

天数1:=BARSLAST(起点1);

绿柱最高价:IF(天数1>=0 AND REFX(TS1>=1,BARSNEXT(ISLASTBAR)),CONST(HHV(H,TS1)),DRAWNULL),COLORLIBLUE;

绿柱最低价:IF(天数1>=0 AND REFX(TS1>=1,BARSNEXT(ISLASTBAR)),CONST(LLV(L,TS1)),DRAWNULL),COLORLIBLUE;

STICKLINE(起点1,绿柱最高价,绿柱最低价,0,-1),COLORLIBLUE;

STICKLINE(ISLASTBAR,绿柱最高价,绿柱最低价,0,-1),COLORLIBLUE;

{周金叉红柱}

ZJC:="MACD.MACD#WEEK"<0;

ZTS:=BARSLAST(ZJC),NODRAW;

Z起点:=FILTERX(ZTS=1,BARSSINCE(C));

Z终点:=FILTERX(ZTS>=1 AND REFX(ZTS,1)=0,BARSSINCE(C));

Z天数:=BARSLAST(Z起点);

Z红柱最高价:IF(Z天数>=0 AND REFX(ZTS>=1,BARSNEXT(ISLASTBAR)),CONST(HHV(H,ZTS)),DRAWNULL),COLORMAGENTA;

Z红柱最低价:IF(Z天数>=0 AND REFX(ZTS>=1,BARSNEXT(ISLASTBAR)),CONST(LLV(L,ZTS)),DRAWNULL),COLORMAGENTA;

STICKLINE(Z起点,Z红柱最高价,Z红柱最低价,0,-1),COLORMAGENTA;

STICKLINE(ISLASTBAR,Z红柱最高价,Z红柱最低价,0,-1),COLORMAGENTA;

{周死叉绿柱}

ZSC:="MACD.MACD#WEEK">0;

ZTS1:=BARSLAST(ZSC),NODRAW;

Z起点1:=FILTERX(ZTS1=1,BARSSINCE(C));

Z终点1:=FILTERX(ZTS1>=1 AND REFX(ZTS1,1)=0,BARSSINCE(C));

Z天数1:=BARSLAST(Z起点1);

Z绿柱最高价:IF(Z天数1>=0 AND REFX(ZTS1>=1,BARSNEXT(ISLASTBAR)),CONST(HHV(H,ZTS1)),DRAWNULL),COLORGREEN;

Z绿柱最低价:IF(Z天数1>=0 AND REFX(ZTS1>=1,BARSNEXT(ISLASTBAR)),CONST(LLV(L,ZTS1)),DRAWNULL),COLORGREEN;

STICKLINE(Z起点1,Z绿柱最高价,Z绿柱最低价,0,-1),COLORGREEN;

STICKLINE(ISLASTBAR,Z绿柱最高价,Z绿柱最低价,0,-1),COLORGREEN;

{日金叉红柱}

RJC:="MACD.MACD#DAY"<0;

RTS:=BARSLAST(RJC),NODRAW;

R起点:=FILTERX(RTS=1,BARSSINCE(C));

R终点:=FILTERX(RTS>=1 AND REFX(RTS,1)=0,BARSSINCE(C));

R天数:=BARSLAST(R起点);

R红柱最高价:IF(R天数>=0 AND REFX(RTS>=1,BARSNEXT(ISLASTBAR)),CONST(HHV(H,RTS)),DRAWNULL),COLORlired;

R红柱最低价:IF(R天数>=0 AND REFX(RTS>=1,BARSNEXT(ISLASTBAR)),CONST(LLV(L,RTS)),DRAWNULL),COLORlired;

STICKLINE(R起点,R红柱最高价,R红柱最低价,0,-1),COLORlired;

STICKLINE(ISLASTBAR,R红柱最高价,R红柱最低价,0,-1),COLORlired;

{日死叉绿柱}

RSC:="MACD.MACD#DAY">0;

RTS1:=BARSLAST(RSC),NODRAW;

R起点1:=FILTERX(RTS1=1,BARSSINCE(C));

R终点1:=FILTERX(RTS1>=1 AND REFX(RTS1,1)=0,BARSSINCE(C));

R天数1:=BARSLAST(R起点1);

R绿柱最高价:IF(R天数1>=0 AND REFX(RTS1>=1,BARSNEXT(ISLASTBAR)),CONST(HHV(H,RTS1)),DRAWNULL),COLORgray;

R绿柱最低价:IF(R天数1>=0 AND REFX(RTS1>=1,BARSNEXT(ISLASTBAR)),CONST(LLV(L,RTS1)),DRAWNULL),COLORgray;

STICKLINE(R起点1,R绿柱最高价,R绿柱最低价,0,-1),COLORgray;

STICKLINE(ISLASTBAR,R绿柱最高价,R绿柱最低价,0,-1),COLORgray;

DRAWKLINE(H,O,L,C);

原理解析：
JC赋值:"MACD.MACD#MONTH"<0


TS赋值:上次JC距今天数,NODRAW


起点赋值:FILTERX(TS=1,BARSSINCE(C))


终点赋值:FILTERX(TS>=1 AND REFX(TS,1)=0,BARSSINCE(C))


天数赋值:上次起点距今天数
输出

红柱最高价:IF(天数>=0 AND REFX(TS>=1,BARSNEXT(ISLASTBAR)),CONST(TS日内H最高值),DRAWNULL),画黄色
输出

红柱最低价:IF(天数>=0 AND REFX(TS>=1,BARSNEXT(ISLASTBAR)),CONST(TS日内L最低值),DRAWNULL),画黄色
当满足条件起点时,在红柱最高价和红柱最低价之间画柱状线
当满足条件ISLASTBAR时,在红柱最高价和红柱最低价之间画柱状线


{月死叉绿柱}

SC赋值:"MACD.MACD#MONTH">0


TS1:=上次SC距今天数,NODRAW


起点1:=FILTERX(TS1=1,BARSSINCE(C))


终点1:=FILTERX(TS1>=1 AND REFX(TS1,1)=0,BARSSINCE(C))


天数1:=上次起点1距今天数
输出

绿柱最高价:IF(天数1>=0 AND REFX(TS1>=1,BARSNEXT(ISLASTBAR)),CONST(TS1日内H最高值),DRAWNULL),COLORLIBLUE
输出

绿柱最低价:IF(天数1>=0 AND REFX(TS1>=1,BARSNEXT(ISLASTBAR)),CONST(TS1日内L最低值),DRAWNULL),COLORLIBLUE
当满足条件起点1时,在绿柱最高价和绿柱最低价之间画柱状线
当满足条件ISLASTBAR时,在绿柱最高价和绿柱最低价之间画柱状线


{周金叉红柱}

ZJC赋值:"MACD.MACD#WEEK"<0


ZTS赋值:上次ZJC距今天数,NODRAW


Z起点赋值:FILTERX(ZTS=1,BARSSINCE(C))


Z终点赋值:FILTERX(ZTS>=1 AND REFX(ZTS,1)=0,BARSSINCE(C))


Z天数赋值:上次Z起点距今天数
输出

Z红柱最高价:IF(Z天数>=0 AND REFX(ZTS>=1,BARSNEXT(ISLASTBAR)),CONST(ZTS日内H最高值),DRAWNULL),画洋红色
输出

Z红柱最低价:IF(Z天数>=0 AND REFX(ZTS>=1,BARSNEXT(ISLASTBAR)),CONST(ZTS日内L最低值),DRAWNULL),画洋红色
当满足条件Z起点时,在Z红柱最高价和Z红柱最低价之间画柱状线
当满足条件ISLASTBAR时,在Z红柱最高价和Z红柱最低价之间画柱状线


{周死叉绿柱}

ZSC赋值:"MACD.MACD#WEEK">0


ZTS1:=上次ZSC距今天数,NODRAW


Z起点1:=FILTERX(ZTS1=1,BARSSINCE(C))


Z终点1:=FILTERX(ZTS1>=1 AND REFX(ZTS1,1)=0,BARSSINCE(C))


Z天数1:=上次Z起点1距今天数
输出

Z绿柱最高价:IF(Z天数1>=0 AND REFX(ZTS1>=1,BARSNEXT(ISLASTBAR)),CONST(ZTS1日内H最高值),DRAWNULL),画绿色
输出

Z绿柱最低价:IF(Z天数1>=0 AND REFX(ZTS1>=1,BARSNEXT(ISLASTBAR)),CONST(ZTS1日内L最低值),DRAWNULL),画绿色
当满足条件Z起点1时,在Z绿柱最高价和Z绿柱最低价之间画柱状线
当满足条件ISLASTBAR时,在Z绿柱最高价和Z绿柱最低价之间画柱状线


{日金叉红柱}

RJC赋值:"MACD.MACD#DAY"<0


RTS赋值:上次RJC距今天数,NODRAW


R起点赋值:FILTERX(RTS=1,BARSSINCE(C))


R终点赋值:FILTERX(RTS>=1 AND REFX(RTS,1)=0,BARSSINCE(C))


R天数赋值:上次R起点距今天数
输出

R红柱最高价:IF(R天数>=0 AND REFX(RTS>=1,BARSNEXT(ISLASTBAR)),CONST(RTS日内H最高值),DRAWNULL),COLORLIRED
输出

R红柱最低价:IF(R天数>=0 AND REFX(RTS>=1,BARSNEXT(ISLASTBAR)),CONST(RTS日内L最低值),DRAWNULL),COLORLIRED
当满足条件R起点时,在R红柱最高价和R红柱最低价之间画柱状线
当满足条件ISLASTBAR时,在R红柱最高价和R红柱最低价之间画柱状线


{日死叉绿柱}

RSC赋值:"MACD.MACD#DAY">0


RTS1:=上次RSC距今天数,NODRAW


R起点1:=FILTERX(RTS1=1,BARSSINCE(C))


R终点1:=FILTERX(RTS1>=1 AND REFX(RTS1,1)=0,BARSSINCE(C))


R天数1:=上次R起点1距今天数
输出

R绿柱最高价:IF(R天数1>=0 AND REFX(RTS1>=1,BARSNEXT(ISLASTBAR)),CONST(RTS1日内H最高值),DRAWNULL),COLORGRAY
输出

R绿柱最低价:IF(R天数1>=0 AND REFX(RTS1>=1,BARSNEXT(ISLASTBAR)),CONST(RTS1日内L最低值),DRAWNULL),COLORGRAY
当满足条件R起点1时,在R绿柱最高价和R绿柱最低价之间画柱状线
当满足条件ISLASTBAR时,在R绿柱最高价和R绿柱最低价之间画柱状线


DRAWKLINE(H,O,L,C)