N:=15;
高1:=HHV(H,N);
低1:=LLV(L,N);
H1:=高1-(高1-低1)*0.191;
H2:=高1-(高1-低1)*0.382;
H3:=高1-(高1-低1)*0.5;
H4:=高1-(高1-低1)*0.618;
H5:=高1-(高1-低1)*0.809;
高:REFDATE(高1,DATE);
低:REFDATE(低1,DATE);
一:REFDATE(H1,DATE);
二:REFDATE(H2,DATE);
三:REFDATE(H3,DATE);
四:REFDATE(H4,DATE),COLORRED;
五:REFDATE(H5,DATE);{}
{DRAWTEXT(CURRBARSCOUNT=1.00,一,'一(0.191)'),COLORYELLOW;
DRAWTEXT(CURRBARSCOUNT=1.00,二,'二(0.382)'),COLORYELLOW;
DRAWTEXT(CURRBARSCOUNT=1.00,三,'三(0.50)'),COLORYELLOW;
DRAWTEXT(CURRBARSCOUNT=1.00,四,'四(0.618'),COLORYELLOW;
DRAWTEXT(CURRBARSCOUNT=1.00,五,'五(0.809)'),COLORYELLOW;
DRAWTEXT(CURRBARSCOUNT=1.00,高,'高'),COLORYELLOW;
DRAWTEXT(CURRBARSCOUNT=1.00,低,'低'),COLORYELLOW;
DRAWKLINE(H,O,L,C);};
