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;
