月框图，自动划箱体（通达信公式 主图 源码 测试图）

月框图，自动划箱体

//月框图

HH:=H#MONTH,NODRAW;

LL:=L#MONTH,NODRAW;

T:=BARSLAST(MONTH!=REF(MONTH,1));

T0:=BACKSET(ISLASTBAR,T+0);

YM:=CROSS(BACKSET(T=0,2),0.1);

TH:=REF(H,T);

TL:=REF(L,T);

{»-¿ò}

Y1:STICKLINE(T=0 AND T0=0,HH,LL,0,-1),COLORFFFFFF;

Y2:STICKLINE(YM ,HH,LL,0,-1),COLORFFFFFF;

X1:STICKLINE(T>0 AND YM=0 AND T0=0,HH,HH,8,-1),COLORFFFFFF;

X2:STICKLINE(T>0 AND YM=0 AND T0=0,LL,LL,8,-1),COLORFFFFFF;

IF(BACKSET(BARSTATUS=2,T+1)*2=2,CONST(HH),DRAWNULL)DOTLINE,COLORFFFFFF;

IF(BACKSET(BARSTATUS=2,T+1)*2=2,CONST(LL),DRAWNULL)DOTLINE,COLORFFFFFF;

{213äKÏß};

2020106914761667.png

2020106915570707.png

202010692137869.png