经典黄金分割线源码

NN:=150;
高11:=REFDATE(HHV(H,NN),DATE);
低11:=REFDATE(LLV(L,NN),DATE);
H11:=高11-(高11-低11)*0.191;
H12:=高11-(高11-低11)*0.382;
H13:=高11-(高11-低11)*0.5;
H14:=高11-(高11-低11)*0.618;
H15:=高11-(高11-低11)*0.809;
DRAWTEXT(CURRBARSCOUNT=1,高11,'高'),COLORA68064;
DRAWTEXT(CURRBARSCOUNT=1,H11,'809'),COLORA68064;
DRAWTEXT(CURRBARSCOUNT=1,H12,'618'),COLORA68064;
DRAWTEXT(CURRBARSCOUNT=1,H13,'中'),COLORA68064;
DRAWTEXT(CURRBARSCOUNT=1,H14,'382'),COLORA68064;
DRAWTEXT(CURRBARSCOUNT=1,H15,'191'),COLORA68064;
DRAWTEXT(CURRBARSCOUNT=1,低11,'低'),COLORA68064;
STICKLINE(CURRBARSCOUNT=13,高11,高11,100,-2),COLORA68064,LINETHICK2;
STICKLINE(CURRBARSCOUNT=13,H11,H11,100,-1),COLORA68064,LINETHICK2;
STICKLINE(CURRBARSCOUNT=13,H12,H12,100,-1),COLORA68064,LINETHICK2;
STICKLINE(CURRBARSCOUNT=13,H13,H13,100,-1),COLORA68064,LINETHICK2;
STICKLINE(CURRBARSCOUNT=13,H14,H14,100,-1),COLORA68064,LINETHICK2;
STICKLINE(CURRBARSCOUNT=13,H15,H15,100,-1),COLORA68064,LINETHICK2;
STICKLINE(CURRBARSCOUNT=13,低11,低11,100,-1),COLORA68064,LINETHICK2;