通达信自动划黄金分割线主图选股指标公式源码

通达信自动划黄金分割线主图选股指标公式源码

源码正文：

LC:=REF(C,1){XG51};
Wrsi:=SMA(maX(C-LC,0),9,1)/SMA(Abs(C-LC),9,1)*100{XG51};
DRAWICON(crOSS(20,wrSI),C,1){XG51};
DRAWICON(CROSS(WRSI,80),C,2){XG51};
均价:AMOUNT/vol/100,COLORBLUE{XG51};
HH:=HHV(H,30){XG51};
LL:=LLV(L,30){XG51};
NN:=BArslAst(TIME=1000){XG51};
NH:=REF(HH,NN){XG51};
NL:=REF(LL,NN){XG51};
HL3:=NL+(NH-NL)*0.618{XG51};
DRAWLINE(TIME=1000,NL,TIME=1001,NL,1),DOTLINE,COLORGREEN{XG51};
DRAWLINE(TIME=1000,HL3,TIME=1001,HL3,1),DOTLINE,COLORGREEN{XG51};
DRAWLINE(TIME=1000,NH,TIME=1001,NH,1),DOTLINE,COLORGREEN{XG51};
DRAWTEXT(TIME=1005,NL,STRCAT(STRCAT('0.000(',VAR2STR(NL,2)),')')),COLORBLUE{XG51};
DRAWTEXT(TIME=1005,HL3,STRCAT(STRCAT('0.618(',VAR2STR(HL3,2)),')')),COLORBLUE{XG51};
DRAWTEXT(TIME=1005,NH,STRCAT(STRCAT('1.000(',VAR2STR(NH,2)),')')),COLORBLUE{X=G+5-1=C=N={};