[通达信指标]月周日K线同图公式

PJ:=(H+L)/2;

OK1:=BARSLAST(L=LLV(L,360))+1;

OK2:=REF(L,OK1);

ZUIDI:=IF(CURRBARSCOUNT<=CONST(OK1+1),CONST(IF(OK1,OK2,OK2)),DRAWNULL)COLORGREEN;

OK6:=IF(CURRBARSCOUNT<=CONST(OK1),CONST(IF(OK1,OK1,OK1)),DRAWNULL);

月开:=O#MONTH;

月高:H#MONTH,NODRAW,COLORRED;

月中:(H#MONTH+L#MONTH)/2,NODRAW,COLORYELLOW;

月低:L#MONTH,NODRAW,COLORGREEN;

月收:=C#MONTH;

STICKLINE(OK6&&月收>=月开,月高,月低,3.2,-1),COLORRED;

STICKLINE(OK6&&月收<=月开,月高,月低,3.2,-1),COLORCYAN;

周开:=O#WEEK;

周高:H#WEEK,NODRAW,COLORRED;

周中:(H#WEEK+L#WEEK)/2,NODRAW,COLORYELLOW;

周低:L#WEEK,NODRAW,COLORGREEN;

周收:=C#WEEK;

STICKLINE(OK6&&周收>=周开,周高,周低,4.1,0),COLORFF0098;

STICKLINE(OK6&&周收<=周开,周高,周低,4.1,0),COLOR006000;

DRAWKLINE(H,O,L,C);{K线}

STICKLINE(O>C,C,O,3,1),COLOR00CC00;

O5:=OK6&&O<C;

STICKLINE(O5,C,O,3.03,0),COLOR450099;

STICKLINE(O5,C,O,2.5,0),COLOR4500AA;

STICKLINE(O5,C,O,2,0),COLOR4500BB;

STICKLINE(O5,C,O,1.5,0),COLOR4500CC;

STICKLINE(O5,C,O,1,0),COLOR4500DD;

STICKLINE(O5,C,O,0.5,0),COLOR4500EE;

STICKLINE(O5,C,O,0.1,0),COLOR4500FF;

O2:=OK6&&O>C;

STICKLINE(O2,C,O,3.03,0),COLOR009900;

STICKLINE(O2,C,O,2.5,0),COLOR00AA00;

STICKLINE(O2,C,O,2,0),COLOR00BB00;

STICKLINE(O2,C,O,1.5,0),COLOR00CC00;

STICKLINE(O2,C,O,1,0),COLOR00DD00;

STICKLINE(O2,C,O,0.5,0),COLOR00EE00;

STICKLINE(O2,C,O,0.1,0),COLOR00FF00;

STICKLINE(PJ,PJ,PJ,0.01,1),COLOR00FFFF;

HHH:=STICKLINE(周中,周中,周中,4.1,0),COLORCYAN;

Q1:=STICKLINE(月中,月中,月中,4.1,-1),COLORYELLOW;

STICKLINE(OK6&&周中,周中,周中,4.1,-1),COLORYELLOW;