通达信大资金顶底选股指标公式源码

通达信大资金顶底选股指标公式源码

源码正文：

VAR1:=5{XG51};
VAR2:=10{XG51};
VAR3:=REF(CLOSE,1){XG51};
VAR4:=(2*CLOSE+HIGH+LOW)/4{XG51};
VAR5:=ma(VAR4,3)>REF(MA(VAR4,3),1){XG51};
安全线:2,POINTDOT,COLORWHITE,LINETHICK4{XG51};
VAR6:=(CLOSE-LLV(LOW,7))/(HHV(HIGH,7)-LLV(LOW,7))*10{XG51};
K:MA(3*SMA(VAR6,6,1)-2*SMA(SMA(VAR6,5,1),5,1),3),COLORF00FF0{XG51};
D:MA(K,3),COLORYELLOW{XG51};
J:3*K-2*D,COLORF00FF0{XG51};
DRAWBAND(K,RGB(155,50,50),D,RGB(0,100,50)){XG51};
VAR7:=CLOSE-REF(CLOSE,1){XG51};
VAR8:=100*ema(EMA(VAR7,6),6)/EMA(EMA(Abs(VAR7),6),6){XG51};
VAR9:=EMA(CLOSE,5){XG51};
VAR10:=EMA(CLOSE,13){XG51};
VAR11:=DRAWLINE(LOW=LLV(LOW,BArslAst(crOSS(VAR10,VAR9))+1),LLV(LOW,BARSLAST(CROSS(VAR10,VAR9))+1),HIGH=HHV(HIGH,BARSLAST(CROSS(VAR9,VAR10))+1),HHV(HIGH,BARSLAST(CROSS(VAR9,VAR10))+1),0){XG51};
VAR12:=DRAWLINE(HIGH=HHV(HIGH,BARSLAST(CROSS(VAR9,VAR10))+1),HHV(HIGH,BARSLAST(CROSS(VAR9,VAR10))+1),LOW=LLV(LOW,BARSLAST(CROSS(VAR10,VAR9))+1),LLV(LOW,BARSLAST(CROSS(VAR10,VAR9))+1),0){XG51};
BT:LLV(VAR8,2)=LLV(VAR8,7) AND COUNT(VAR8<0,2) AND CROSS(VAR8,MA(VAR8,2)) AND REF(VAR12,1)<REF(VAR12,2) AND VAR11>REF(VAR12,1){XG51};
底线:0,COLORLIMAGENTA{XG51};
顶线:10,COLORYELLOW{XG51};
STICKLINE(VAR11,0,0.2,3,0),COLORWHITE{XG51};
STICKLINE(VAR12,0,0.2,3,0),COLORCYAN{XG51};
STICKLINE(BT,0,3,2,0),COLOR000088{XG51};
STICKLINE(BT,0,3,1,0),COLOR0000CC{XG51};
STICKLINE(BT,0,3,0.22,0),COLORWHITE{XG51};
DRAWTEXT(BT,3,57),COLORWHITE{XG51};
TJ1:REF(VAR12,1)<REF(VAR12,2) AND VAR11>REF(VAR12,1) AND CLOSE<HHV(HIGH,21)*0.82{XG51};
STICKLINE(TJ1,0,2,3,0),COLOR880088{XG51};
STICKLINE(TJ1,0,2,1.5,0),COLORAA00AA{XG51};
STICKLINE(TJ1,0,2,0.8,0),COLORCC00CC{XG51};
STICKLINE(TJ1,0,2,0.2,0),COLORLIMAGENTA{XG51};
DRAWTEXT(TJ1,2,58),COLORLIMAGENTA{XG51};
VAR13:=HHV(HIGH,55){XG51};
VAR14:=LLV(LOW,55){XG51};
VAR15:=VAR13*VAR14{XG51};
VAR16:=SQRT(VAR15){XG51};
TJ2:REF(VAR12,1)<REF(VAR12,2) AND VAR11>REF(VAR12,1) AND CLOSE<VAR16{XG51};
STICKLINE(TJ2,0,1,5,0),COLOR008888{XG51};
STICKLINE(TJ2,0,1,2,0),COLOR00AAAA{XG51};
STICKLINE(TJ2,0,1,1,0),COLOR00CCCC{XG51};
STICKLINE(TJ2,0,1,0.2,0),COLORBLUE{XG51};
DRAWTEXT(TJ2,1,59),COLORBLUE{XG51};
VAR17:=REF(VAR11,1)>REF(VAR11,2) AND VAR12<REF(VAR11,1){XG51};
STICKLINE(VAR17,10,9,5,0),COLOR008800{XG51};
STICKLINE(VAR17,10,9,2,0),COLOR00AA00{XG51};
STICKLINE(VAR17,10,9,1,0),COLOR00CC00{XG51};
STICKLINE(VAR17,10,9,0.2,0),COLORCYAN{XG51};
DRAWTEXT(VAR17,9,4),COLORCYAN{XG51};
difF:EMA(DCLOSE,12)-EMA(DCLOSE,26){XG51};
DEA:EMA(DIFF,9),COLORGREEN{XG51};
VAR18:=BARSLAST(REF(CROSS(DIFF,DEA),1)){XG51};
底背离:REF(CLOSE,VAR18+1)>CLOSE AND DIFF>REF(DIFF,VAR18+1) AND CROSS(DIFF,DEA){XG51};
DRAWTEXT(底背离,(-0.6),60),COLORRED{XG51};
VAR19:=BARSLAST(REF(CROSS(DEA,DIFF),1)){XG51};
顶背离:REF(CLOSE,VAR19+1)<CLOSE AND REF(DIFF,VAR19+1)>DIFF AND CROSS(DEA,DIFF){XG51};
DRAWTEXT(顶背离,11,61),COLORRED{XG51};
买入:zig(3,5)>REF(ZIG(3,5),1) AND REF(ZIG(3,5),1)<=REF(ZIG(3,5),2) AND REF(ZIG(3,5),2)<=REF(ZIG(3,5),3),COLORWHITE{XG51};
卖出:ZIG(3,5)<REF(ZIG(3,5),1) AND REF(ZIG(3,5),1)>=REF(ZIG(3,5),2) AND REF(ZIG(3,5),2)>=REF(ZIG(3,5),3),COLORCYAN{X_G_5-1_C_N_{};