通达信趋势黄金分割划线主图及未加密选股指标公式源码

通达信趋势黄金分割划线主图及未加密选股指标公式源码

源码正文：

N:=60{XG51};
JH:=HHVBARS(H,N){XG51};
YH:=BArslAst(H=HHV(H,N)){XG51};
QD:=CURRBARSCOUNT=CONST(YH)+1{XG51};
ZD:=CURRBARSCOUNT=CONST(JH)+1{XG51};
HH:=REF(H,YH){XG51};
DH:=REF(H,JH){XG51};
JD:=LLVBARS(L,JH){XG51};
LL:=CONST(REF(L,JD)){XG51};
黄金线:IF(CURRBARSCOUNT<=CONST(JH)+1,(CONST(DH)-CONST(LL))*0.618+CONST(LL),DRAWNULL),DOTLINE,COLORmaGENTA{XG51};
IF(CURRBARSCOUNT<=CONST(JH)+1,CONST(DH),DRAWNULL),DOTLINE,COLORLICYAN{XG51};
IF(CURRBARSCOUNT<=CONST(YH)+1,CONST(HH),DRAWNULL),DOTLINE,COLORBLUE{XG51};
EXT1:DRAWLINE(QD,H,ZD,H,1),DOTLINE,COLORBLUE{XG51};
STICKLINE(QD,H,L,0,0),COLORBLUE{XG51};
STICKLINE(QD,C,O,2,0),COLORBLUE{XG51};
STICKLINE(ZD,H,L,0,0),COLORLICYAN{XG51};
STICKLINE(ZD,C,O,2,0),COLORLICYAN{XG51};
DRAWTEXT(CURRBARSCOUNT=CONST(YH)+10,CONST(HH),VARCAT(VARCAT('远高价',VAR2STR(CONST(HH),2)),'元')),COLORBLUE{XG51};
DRAWTEXT(ZD,H*1.02,VARCAT(VARCAT('近高价',VAR2STR(H,2)),'元')),COLORLICYAN{XG51};
DRAWICON(crOSS(C,EXT1) AND CURRBARSCOUNT<CONST(JH)+1,L,1){XG51};
DRAWICON(CROSS(C,黄金线) AND CURRBARSCOUNT<CONST(JD)+1,L,25){X-G_5!1-C-N-{};

通达信画角度线主图未加密选股指标公式源码

源码正文：

LT:=FINDLOWBARS(L,0,30,1){XG51};
HT:=FINDHIGHBARS(H,LT=0,60,1){XG51};
LL:=REF(L,LT){XG51};
HH:=REF(H,HT){XG51};
NOTEXT1:DRAWLINE(HT=0,HH,LT=0,HH,1),COLORBLUE{XG51};
NOTEXT2:DRAWLINE(HT=0,HH,LT=0,LL,1),COLORBLUE{XG51};
NOTEXT3:DRAWLINE(HT=0,HH,LT=0,(HH-LL)*0.25+LL,1),DOTLINE,COLORLImaGENTA{XG51};
NOTEXT4:DRAWLINE(HT=0,HH,LT=0,(HH-LL)*0.5+LL,1),DOTLINE,COLORLIGREEN{XG51};
NOTEXT5:DRAWLINE(HT=0,HH,LT=0,(HH-LL)*0.75+LL,1),DOTLINE,COLORLIBLUE{XG51};
NOTEXT6:DRAWLINE(HT=0,HH,LT=0,(HH-LL)*0.875+LL,1),DOTLINE,COLORBLACK{XG51};
DRAWNUMBER(ISLAstBAR,NOTEXT3,0.25){XG51};
DRAWNUMBER(ISLASTBAR,NOTEXT4,0.5){XG51};
DRAWNUMBER(ISLASTBAR,NOTEXT5,0.75){XG51};
DRAWNUMBER(ISLASTBAR,NOTEXT6,0.875){X^G?5.1^C^N^{};