以下是通达信分时图标提示黄金分割（源码）
HH:=CONST(HHV(C,0));
LL:=CONST(LLV(C,0));
HL:=HH-LL;
顶:HH,COLOR545454,LINETHICK1,DOTLINE;
DRAWICON(C=HH,HH,35);
A809:0.809*HL+LL,COLOR545454,DOTLINE;
A618:0.618*HL+LL,COLOR545454,DOTLINE;
A500:0.500*HL+LL,COLOR545454,DOTLINE;
A382:0.382*HL+LL,COLOR545454,DOTLINE;
A191:0.191*HL+LL,COLOR545454,DOTLINE;
底:LL,COLOR545454,LINETHICK1,DOTLINE;
DRAWICON(C=LL,LL,34);
DRAWTEXT(CURRBARSCOUNT=240,HH,'顶'),COLORYELLOW;
DRAWTEXT(CURRBARSCOUNT=240,A809,'809'),COLOR545454;
DRAWTEXT(CURRBARSCOUNT=240,A618,'618'),COLOR545454;
DRAWTEXT(CURRBARSCOUNT=240,A500,'500'),COLOR545454;
DRAWTEXT(CURRBARSCOUNT=240,A382,'382'),COLOR545454;
DRAWTEXT(CURRBARSCOUNT=240,A191,'191'),COLOR545454;
DRAWTEXT(CURRBARSCOUNT=240,LL,'底'),COLORYELLOW;
MD:=EMA(C,0)-EMA(C,5);
STICKLINE(MD>0,DYNAINFO(3),DYNAINFO(3)+MD*1.5,0,1),COLOR545454;
STICKLINE(MD<=0,DYNAINFO(3),DYNAINFO(3)+MD*1.5,0,1),COLOR545454;
均价:SUM(V*C,0)/SUM(V,0),COLORYELLOW;
