通达信五日金叉十日七档黄金分割主图指标(源码)

STICKLINE(T =0,REF(D,T),REF(D,T),6,0),COLORRED,LINETHICK2;
STICKLINE(T =0,REF(D+D*0.198,T),REF(D+D*0.198,T),6,-1),COLORLIMAGENTA;
STICKLINE(T =0,REF(D-D*0.198,T),REF(D-D*0.198,T),6,-1),COLORLIMAGENTA;
STICKLINE(T =0,REF(D+D*0.382,T),REF(D+D*0.382,T),6,-1),COLORGREEN;
STICKLINE(T =0,REF(D-D*0.382,T),REF(D-D*0.382,T),6,-1),COLORGREEN;
STICKLINE(T =0,REF(D+D*0.5,T),REF(D+D*0.5,T),6,-1),COLORYELLOW;
STICKLINE(T =0,REF(D-D*0.5,T),REF(D-D*0.5,T),6,-1),COLORYELLOW;
DRAWTEXT(T=0,REF(D,T)*1.02,VARCAT(VARCAT( 中心价： ,VAR2STR(REF(D,T),2)), 元 )),COLORWHITE;
DRAWTEXT(T=0,REF(D+D*0.198,T)*1.02,VARCAT(VARCAT( 压力1： ,VAR2STR(REF(D+D*0.198,T),2)), 元 ))COLORYELLOW;
DRAWTEXT(T=0,REF(D+D*0.382,T)*1.02,VARCAT(VARCAT( 压力2： ,VAR2STR(REF(D+D*0.382,T),2)), 元 ))COLORYELLOW;
DRAWTEXT(T=0,REF(D+D*0.5,T)*1.02,VARCAT(VARCAT( 压力3： ,VAR2STR(REF(D+D*0.5,T),2)), 元 ))COLORYELLOW;
DRAWTEXT(T=0,REF(D-D*0.198,T)*1.02,VARCAT(VARCAT( 支撑1： ,VAR2STR(REF(D-D*0.198,T),2)), 元 )),COLORMAGENTA;
DRAWTEXT(T=0,REF(D-D*0.380,T)*1.02,VARCAT(VARCAT( 支撑2： ,VAR2STR(REF(D-D*0.382,T),2)), 元 )),COLORMAGENTA;
DRAWTEXT(T=0,REF(D-D*0.5,T)*1.02,VARCAT(VARCAT( 支撑3： ,VAR2STR(REF(D-D*0.5,T),2)), 元 )),COLORMAGENTA;