[通达信公式] 分时图添加黄金分割线
-
相关简介:{分时均线} W:=BARSLAST(DAY-REF(DAY,1))+1; FSJX:SUM(CLOSE*VOL,W)/SUM(VOL,W),LINETHICK2,COLORYELLOW; IF(FSJXREF(FSJX,1),FSJX,DRAWNULL),LINETHICK2,COLORGREEN; {分时黄金分割线} HH:=CONST(HHV(C,0)); LL:=CONST(LLV(C,0)); HL:=HH-LL; 顶:HH,COLORCYAN,DOTLINE; A809:0.809*
-
文章来源:股海网作者:股海网发布时间:2013-10-20浏览次数:

{分时均线}
W:=BARSLAST(DAY-REF(DAY,1))+1;
FSJX:SUM(CLOSE*VOL,W)/SUM(VOL,W),LINETHICK2,COLORYELLOW;
IF(FSJX<REF(FSJX,1),FSJX,DRAWNULL),LINETHICK2,COLORGREEN;
{分时黄金分割线}
HH:=CONST(HHV(C,0));
LL:=CONST(LLV(C,0));
HL:=HH-LL;
顶:HH,COLORCYAN,DOTLINE;
A809:0.809*HL+LL,COLORWHITE,DOTLINE;
A618:0.618*HL+LL,COLORMAGENTA,DOTLINE;
A500:0.500*HL+LL,COLORYELLOW,DOTLINE;
A382:0.382*HL+LL,COLORMAGENTA,DOTLINE;
A191:0.191*HL+LL,COLORWHITE,DOTLINE;
底:LL,COLORGREEN,DOTLINE;
{描述}
DRAWTEXT(CURRBARSCOUNT=240,HH,'顶'),COLORWHITE;
DRAWTEXT(CURRBARSCOUNT=240,A809,'警809'),COLORWHITE;
DRAWTEXT(CURRBARSCOUNT=240,A618,'惕618'),COLORWHITE;
DRAWTEXT(CURRBARSCOUNT=240,A500,'中500'),COLORYELLOW;
DRAWTEXT(CURRBARSCOUNT=240,A382,'惕382'),COLORMAGENTA;
DRAWTEXT(CURRBARSCOUNT=240,A191,'警191'),COLORMAGENTA;
DRAWTEXT(CURRBARSCOUNT=240,LL,'底'),COLORMAGENTA;