主图近期顶底压力一目了然

{黄金分割线开始}

N02:=30;

高:=REFDATE(HHV(H,N02),DATE);

低:=REFDATE(LLV(L,N02),DATE);

H1:=高-(高-低)*0.191;

H2:=高-(高-低)*0.382;

H3:=高-(高-低)*0.5;

H4:=高-(高-低)*0.618;

H5:=高-(高-低)*0.809;

DRAWTEXT(CURRBARSCOUNT=1,高,'高位'),COLORRED;

DRAWTEXT(CURRBARSCOUNT=1,H1,'809'),COLORWHITE;

DRAWTEXT(CURRBARSCOUNT=1,H2,'618'),COLORRED;

DRAWTEXT(CURRBARSCOUNT=1,H3,'050'),COLORLIMAGENTA;

DRAWTEXT(CURRBARSCOUNT=1,H4,'382'),COLORRED;

DRAWTEXT(CURRBARSCOUNT=1,H5,'191'),COLORWHITE;

DRAWTEXT(CURRBARSCOUNT=1,低,'低位'),COLORRED;

STICKLINE(CURRBARSCOUNT=13,高,高,100,-1),COLORRED;

STICKLINE(CURRBARSCOUNT=13,H1,H1,100,-1),COLORWHITE;

STICKLINE(CURRBARSCOUNT=13,H2,H2,100,-1),COLORRED;

STICKLINE(CURRBARSCOUNT=13,H3,H3,100,-1),COLORLIMAGENTA;

STICKLINE(CURRBARSCOUNT=13,H4,H4,100,-1),COLORRED;

STICKLINE(CURRBARSCOUNT=13,H5,H5,100,-1),COLORWHITE;

STICKLINE(CURRBARSCOUNT=13,低,低,100,-1),COLORRED;

{黄金分割线结束};

N:=150;判断高低:=3;

近期顶:REFDATE(高,DATE),COLORGREEN,LINETHICK3;

最顶:=REFDATE(近期顶,DATE),NODRAW;

出:=最顶=H AND ((C-L)<(O-C) OR (O-L)<(C-O)),NODRAW;

STICKLINE(出,C,O,3,0),COLORGREEN;

STICKLINE(出,C,O,2,0),COLORGREEN;

近期底:REFDATE(低,DATE),C