通达信公式 飞龙金点，黄金分割点

公式源码：

MA4:MA(C,4);

MA10:MA(C,10);

MA20:MA(C,20);

MA62:MA(C,62);

MA133:MA(C,133);

MA256:MA(C,256);

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

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

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

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

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

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

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

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

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

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

DRAWTEXT(CURRBARSCOUNT=1,高,’ 高’),COLORGREEN;

DRAWTEXT(CURRBARSCOUNT=1,H1,’ 809′),COLORCYAN;

DRAWTEXT(CURRBARSCOUNT=1,H2,’ 618′),COLORFFFFFF;

DRAWTEXT(CURRBARSCOUNT=1,H3,’ 中’),COLORYELLOW;

DRAWTEXT(CURRBARSCOUNT=1,H4,’ 382′),COLORLIRED;

DRAWTEXT(CURRBARSCOUNT=1,H5,’ 191′),COLORMAGENTA;

DRAWTEXT(CURRBARSCOUNT=1,低,’ 低’),COLORRED;

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

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

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

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

距今天:BARSSINCE(C)+1,NODRAW;

ZZ:=距今天<100;

条件:=TESTSKIP(ZZ=0);

首日中枢:(REF(H,距今天-1)+REF(L,距今天-1))/2,NODRAW;

金子发光:(首日中枢/1.5) ,COLORFFAAFF;

XG:C<金子发光,COLOR00FFFF,NODRAW;

发光:DRAWICON(CROSS(EMA(C,2),MA(金子发光,1)),L*0.95,17),COLORFFAAFF;