文华财经高低点变色主图带K线显示源码

N:=9;//在此自定义N根K线
X1:=N;
X2:=N;
HH:HHV(H,X1),NODRAW;
LL:LLV(L,X2),NODRAW;
MID:(HH+LL)/2,NODRAW;
DRAWCOLORLINE(BARSLAST(MID>REF(MID,1))<BARSLAST(MID<REF(MID,1)),HH,RGB(255,104,255),COLORGREEN),LINETHICK3;

DRAWCOLORLINE(BARSLAST(MID>REF(MID,1))<BARSLAST(MID<REF(MID,1)),LL,RGB(255,104,255),COLORGREEN),LINETHICK3;

DRAWCOLORLINE(BARSLAST(MID>REF(MID,1))<BARSLAST(MID<REF(MID,1)),MID,COLORYELLOW,COLORGREEN),LINETHICK7;

M:=3;

DRAWCOLORLINE(BARSLAST(MID>REF(MID,1))<BARSLAST(MID<REF(MID,1)),HH+M*MINPRICE,RGB(255,104,255),COLORGREEN),LINETHICK3;

DRAWCOLORLINE(BARSLAST(MID>REF(MID,1))<BARSLAST(MID<REF(MID,1)),LL-M*MINPRICE,RGB(255,104,255),COLORGREEN),LINETHICK3;

FILLRGN(BARSLAST(MID>REF(MID,1))>BARSLAST(MID<REF(MID,1)),MID,LL-M*MINPRICE,COLORWHITE);
DRAWKLINE1(H,O,L,C);