通达信黄金折返主图未加密选股指标公式源码

通达信黄金折返主图未加密选股指标公式源码

源码正文：

参数设置见附图:

源码:
TL:=1000000+DA{XG51};
TH:=1000000+DB{XG51};
TC:=1000000+DC{XG51};
TO:=1000000+DO{XG51};
AL:=IF(REFDATE(CLOSE,TL)>REFDATE(CLOSE,TH),REFDATE(HIGH,TL),REFDATE(LOW,TL)){XG51};
BH:=IF(REFDATE(CLOSE,TL)>REFDATE(CLOSE,TH),REFDATE(LOW,TH),REFDATE(HIGH,TH)){XG51};
CZF:=IF(REFDATE(CLOSE,TL)>REFDATE(CLOSE,TH),REFDATE(HIGH,TC),REFDATE(LOW,TC)){XG51};
DJB:=IF(REFDATE(CLOSE,TL)>REFDATE(CLOSE,TH),REFDATE(LOW,TO),REFDATE(HIGH,TO)){XG51};
OP:=BH-AL+CZF{XG51};
COP:=0.618*(BH-AL)+CZF{XG51};
XOP:=IF((1.618*(BH-AL)+CZF)<0,OP,1.618*(BH-AL)+CZF){XG51};
TODAY:=DATE{XG51};
stICKLINE(DATE=TC,CZF,XOP,0,-1),LINETHICK3,COLORLImaGENTA{XG51};
DRAWLINE(DATE=TC,COP,DATE=TODAY,COP,1),LINETHICK3,POINTDOT,COLORMAGENTA{XG51};
DRAWLINE(DATE=TC,OP,DATE=TODAY,OP,1),LINETHICK3,POINTDOT,COLORMAGENTA{XG51};
DRAWLINE(DATE=TC,XOP,DATE=TODAY,XOP,1),LINETHICK3,POINTDOT,COLORMAGENTA{XG51};
DRAWTEXT(DATE=TC,COP,'COP'){XG51};
DRAWTEXT(DATE=TC,OP,'OP'){XG51};
DRAWTEXT(DATE=TC,XOP,'XOP'){XG51};
DRAWLINE(DATE=TO,DJB,DATE=TL,AL,0),LINETHICK3,POINTDOT,COLORRED{XG51};
DRAWLINE(DATE=TL,AL,DATE=TH,BH,0),COLORMAGENTA{XG51};
DRAWLINE(DATE=TH,BH,DATE=TC,CZF,0),COLORMAGENTA;

F3:=(BH-0.382*(BH-AL)){XG51};
F5:=(BH-0.5*(BH-AL)){XG51};
F6:=(BH-0.618*(BH-AL)){XG51};
DRAWLINE(DATE=TH,F3,DATE=TODAY,F3,1),LINETHICK1,POINTDOT,COLORGREEN{XG51};
DRAWLINE(DATE=TH,F5,DATE=TODAY,F5,1),LINETHICK1,POINTDOT,COLORGREEN{XG51};
DRAWLINE(DATE=TH,F6,DATE=TODAY,F6,1),LINETHICK1,POINTDOT,COLORGREEN{XG51};
DRAWTEXT(DATE=TH,F3,'0.382'){XG51};
DRAWTEXT(DATE=TH,F5,'0.5'){XG51};
DRAWTEXT(DATE=TH,F6,'0.618');

FF3:=(AL-0.382*(AL-DJB)){XG51};
FF5:=(AL-0.5*(AL-DJB)){XG51};
FF6:=(AL-0.618*(AL-DJB)){XG51};
DRAWLINE(DATE=TL,FF3,DATE=TODAY,FF3,1),LINETHICK1,POINTDOT,COLORRED{XG51};
DRAWLINE(DATE=TL,FF5,DATE=TODAY,FF5,1),LINETHICK1,POINTDOT,COLORRED{XG51};
DRAWLINE(DATE=TL,FF6,DATE=TODAY,FF6,1),LINETHICK1,POINTDOT,COLORRED{XG51};
DRAWTEXT(DATE=TL,FF3,'0.382'){XG51};
DRAWTEXT(DATE=TL,FF5,'0.5'){XG51};
DRAWTEXT(DATE=TL,FF6,'0.618');

dma1:=REF(MA(CLOSE,3),3),COLORRED;

TL1:=1000000+DA1{XG51};
TH1:=1000000+DB1{XG51};
TC1:=1000000+DC1{XG51};
TO1:=1000000+DO1{XG51};
AL1:=IF(REFDATE(CLOSE,TL1)>REFDATE(CLOSE,TH1),REFDATE(HIGH,TL1),REFDATE(LOW,TL1)){XG51};
BH1:=IF(REFDATE(CLOSE,TL1)>REFDATE(CLOSE,TH1),REFDATE(LOW,TH1),REFDATE(HIGH,TH1)){XG51};
CZF1:=IF(REFDATE(CLOSE,TL1)>REFDATE(CLOSE,TH1),REFDATE(HIGH,TC1),REFDATE(LOW,TC1)){XG51};
DJB1:=IF(REFDATE(CLOSE,TL1)>REFDATE(CLOSE,TH1),REFDATE(LOW,TO1),REFDATE(HIGH,TO1)){XG51};
OP1:=BH1-AL1+CZF1{XG51};
COP1:=0.618*(BH1-AL1)+CZF1{XG51};
XOP1:=IF((1.618*(BH1-AL1)+CZF1)<0,OP1,1.618*(BH1-AL1)+CZF1);

STICKLINE(DATE=TC1,CZF1,XOP1,0,-1),LINETHICK3,COLORLIBLUE{XG51};
DRAWLINE(DATE=TC1,COP1,DATE=TODAY,COP1,1),LINETHICK3,POINTDOT,COLORLIBLUE{XG51};
DRAWLINE(DATE=TC1,OP1,DATE=TODAY,OP1,1),LINETHICK3,POINTDOT,COLORLIBLUE{XG51};
DRAWLINE(DATE=TC1,XOP1,DATE=TODAY,XOP1,1),LINETHICK3,POINTDOT,COLORLIBLUE;

DRAWTEXT(DATE=TC1,COP1,'COP'){XG51};
DRAWTEXT(DATE=TC1,OP1,'OP'){XG51};
DRAWTEXT(DATE=TC1,XOP1,'XOP'){XG51};
DRAWLINE(DATE=TO1,DJB1,DATE=TL1,AL1,0),LINETHICK3,POINTDOT,COLORRED{XG51};
DRAWLINE(DATE=TL1,AL1,DATE=TH1,BH1,0),COLORLIBLUE{XG51};
DRAWLINE(DATE=TH1,BH1,DATE=TC1,CZF1,0),COLORLIBLUE;

F31:=(BH1-0.382*(BH1-AL1)){XG51};
F51:=(BH1-0.5*(BH1-AL1)){XG51};
F61:=(BH1-0.618*(BH1-AL1)){XG51};
DRAWLINE(DATE=TH1,F31,DATE=TODAY,F31,1),LINETHICK1,POINTDOT,COLORGREEN{XG51};
DRAWLINE(DATE=TH1,F51,DATE=TODAY,F51,1),LINETHICK1,POINTDOT,COLORGREEN{XG51};
DRAWLINE(DATE=TH1,F61,DATE=TODAY,F61,1),LINETHICK1,POINTDOT,COLORGREEN{XG51};
DRAWTEXT(DATE=TH1,F31,'0.382'){XG51};
DRAWTEXT(DATE=TH1,F51,'0.5'){XG51};
DRAWTEXT(DATE=TH1,F61,'0.618');

FF31:=(AL1-0.382*(AL1-DJB1)){XG51};
FF51:=(AL1-0.5*(AL1-DJB1)){XG51};
FF61:=(AL1-0.618*(AL1-DJB1)){XG51};
DRAWLINE(DATE=TL1,FF31,DATE=TODAY,FF31,1),LINETHICK1,POINTDOT,COLORRED{XG51};
DRAWLINE(DATE=TL1,FF51,DATE=TODAY,FF51,1),LINETHICK1,POINTDOT,COLORRED{XG51};
DRAWLINE(DATE=TL1,FF61,DATE=TODAY,FF61,1),LINETHICK1,POINTDOT,COLORRED{XG51};
DRAWTEXT(DATE=TL1,FF31,'0.382'){XG51};
DRAWTEXT(DATE=TL1,FF51,'0.5'){XG51};
DRAWTEXT(DATE=TL1,FF61,'0.618');

&nbsp;

{X.G!5_1.C.N.{}

通达信透视主力买卖交量未加密选股指标公式源码

源码正文：

A股:CAPITAL/1000000,LINETHICK0,COLORRED{XG51};
实际量:vol,LINETHICK0{XG51};
AA:=VOL/((HIGH-LOW)*2-Abs(CLOSE-OPEN)){XG51};
主买:IF(CLOSE>OPEN,AA*(HIGH-LOW),IF(CLOSE<OPEN,AA*((HIGH-OPEN)+ (CLOSE-LOW)),VOL /2)),POINTDOT,COLORWHITE{XG51};
主卖:IF(CLOSE>OPEN,0-AA*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0- AA*(HIGH-LOW),0-VOL /2)),LINETHICK0,COLORCYAN{XG51};
换手率％:VOL/CAPITAL*100,POINTDOT,COLORRED{XG51};
STICKLINE(C>=REF(C,1) ,0,VOL,2.5,1),COLORWHITE{XG51};
STICKLINE(C<REF(C,1),0,VOL,2.5,1),COLORCYAN{XG51};
STICKLINE(主买>0,0,主买,2.5,0),COLORWHITE{XG51};
STICKLINE(主卖<0 ,0,主卖,2.5,0),COLORCYAN{XG51};
资金异动:VOL/MA(VOL,55)*100,COLORBLUE{XG51};
STICKLINE(资金异动>100 ,0,VOL,0.6,0),COLORBLUE{XG51};
MA5:MA(V,5),COLORRED{XG51};
MA13:MA(V,13),COLORWHITE{XG51};
DRAWTEXT(crOSS(MA5,MA13),(V *1.05),'★关注'),COLORBLUE{X-G+5_1-C-N-{};