通达信自动画黄金分割线主图源码

STICKLINE(CLOSE OPEN,HIGH,LOW,0,0 ),COLOR0000C0;

STICKLINE(CLOSE OPEN,OPEN,CLOSE,2.2,0 ),COLOR0000C0;

STICKLINE(CLOSE OPEN,HIGH,LOW,0,0 ),COLOR00C000;

STICKLINE(CLOSE OPEN,OPEN,CLOSE,2.2,0 ),COLOR00C000;

STICKLINE(CLOSE=OPEN,HIGH,LOW,0,0 ),COLORWHITE;

STICKLINE(CLOSE=OPEN,OPEN,CLOSE,2.2,0 ),COLORWHITE;

{自动画黄金分割线-源码}

N:=74;

M:=3;

PC:=(C+REF(C,1)+0)/3;

高:=REF(HHV(H,N),M);

低:=REF(LLV(L,N),M);

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

H38:=高-(高-低)*0.382;

H中:=高-(高-低)*0.5;

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

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

顶点:REFDATE(高,DATE),COLORWHITE;

%19.8:REFDATE(H19,DATE),COLORYELLOW;

%38.2:REFDATE(H38,DATE),COLORMAGENTA;

%50:REFDATE(H中,DATE),COLORRED;

%61.8:REFDATE(H61,DATE),COLORMAGENTA;

%80.9:REFDATE(H80,DATE),COLORYELLOW;

低点:REFDATE(低,DATE),COLORWHITE;

DRAWTEXT(ISLASTBAR,顶点, 顶点 ),COLORWHITE;

DRAWTEXT(ISLASTBAR,%19.8, %19.8 ),COLORYELLOW;

DRAWTEXT(ISLASTBAR,%38.2, %38.2 ),COLORMAGENTA;

DRAWTEXT(ISLASTBAR,%50, 50% ),COLORRED;

DRAWTEXT(ISLASTBAR,%61.8, %61.8 ),COLORMAGENTA;

DRAWTEXT(ISLASTBAR,%80.9, %80.9 ),COLORYELLOW;

DRAWTEXT(ISLASTBAR,低点, 低点 ),COLORWHITE;