通达信牛顶底未加密选股指标公式源码

通达信牛顶底未加密选股指标公式源码

源码正文：

多方能量:=7*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30,4,1)
-3*Sma(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30,4,1),3,1)
-SMA(SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30,4,1)
,3,1),2,1),{XG51};
空方能量:=ema(MA(多方能量,5),7){XG51};
VAR1:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*50{XG51};
AA:= (EMA(VAR1,3))*2{XG51};
BB:=MA(AA,3){XG51};
VAR2:=8,;
短期:=100*(C-LLV(L,5))/(HHV(C,5)-LLV(L,5)),{XG51};
中期:=100*(C-LLV(L,10))/(HHV(C,10)-LLV(L,10)),{XG51};
中长期:=100*(C-LLV(L,20))/(HHV(C,20)-LLV(L,20)),{XG51};
长期:=100*(C-LLV(L,30))/(HHV(C,30)-LLV(L,30)),{XG51};
牛量:=中期=100 OR 中长期=100 OR 长期=100{XG51};
能量:=短期=100 OR 中期=100 OR 中长期=100 OR 长期=100{XG51};
能量走势:=(多方能量-空方能量)+50{XG51};
强势1:=crOSS(能量走势,60) AND REF(能量走势,1)<60{XG51};
强势2:=CROSS(AA,60) AND REF(AA,1)<60{XG51};
强势:=强势1 AND 强势2{XG51};
能量角度:=ATAN((能量走势/REF(能量走势,1)-1)*100)*180/3.1416{XG51};
股价角度:=ATAN((AA/REF(AA,1)-1)*100)*180/3.1416{XG51};
去除st:=EXIST((C/REF(C,1)-1)*100>5.6,60){XG51};
去除停牌:=DYNAINFO(4)>0;
去除高价:=DYNAINFO(7)<40;
去除大盘股:=CAPITAL/1000000<10;
牛量 AND 强势 AND 能量角度>80 AND 股价角度>80 AND 去除ST AND 去除停牌 AND 去除高价 AND 去除大盘股 {X=G_5_1=C=N={};

通达信线性回归主图未加密选股指标公式源码

源码正文：

EM01:=ema(C,10){XG51};
EM:=Ema(C,21){XG51};
UP:=EMA(EM,13){XG51};
DOWN:=EMA(EM,17){XG51};
MIDD:(UP+DOWN)/2,POINTDOT{XG51};
stICKLINE(MIDD>REF(MIDD,1),UP,DOWN,1,0),COLORLIMAGENTA{XG51};
STICKLINE(MIDD<REF(MIDD,1),UP,DOWN,1,0),COLORCYAN{XG51};
STICKLINE(MIDD=REF(MIDD,1),UP,DOWN,1,0),COLORBROWN{XG51};
止盈线:EMA(EMA(C,10),10),COLORBLUE,LINETHICK1{XG51};
空止盈:=止盈线>REF(止盈线,1){XG51};
IF(空止盈-1,止盈线,DRAWNULL),COLORGREEN,LINETHICK1{XG51};
DRAWICON(REF(MIDD,1)<=REF(MIDD,2) AND MIDD>REF(MIDD,1),DOWN,7){XG51};
DRAWICON(REF(MIDD,1)>=REF(MIDD,2) AND MIDD<REF(MIDD,1),UP,8){XG51};
UR:=15;LR:=15{XG51};
TC1:=IF(C=HHV(C,5*UR),C,DRAWNULL){XG51};
TC2:=CONST(BArslAST(TC1=C))+1{XG51};
BC1:=IF(L=LLV(L,5*LR),L,DRAWNULL){XG51};
BC2:=CONST(BARSLAST(BC1=L))+1{XG51};
NOD:=(IF(TC2>BC2,TC2,BC2)-IF(TC2>BC2,BC2,TC2)){XG51};
LR1:=FORCAST(C,NOD+1){XG51};
NP:=IF(CURRBARSCOUNT<=MAX(BC2,TC2),CONST(IF(MIN(TC2,BC2)=1,LR1,REF(LR1,MIN(TC2,BC2)-1))),DRAWNULL),POINTDOT,COLOR93BDA8{XG51};
LR2:=SLOPE(C,NOD+1){XG51};
LR3:=CONST(IF(MIN(TC2,BC2)=1,LR2,REF(LR2,MIN(TC2,BC2)-1))){XG51};
FP:=NP-LR3*(NOD),POINTDOT,COLOR93BDA8{XG51};
AD:=Abs(NP-FP){XG51};
DBL:=BARSLAST(BC1!=DRAWNULL)+1{XG51};
DBH:=BARSLAST(TC1!=DRAWNULL)+1{XG51};
BSP:=IF(BC2>TC2,DBL,DBH)-1{XG51};
LRL:=IF(NP>FP,FP+AD/NOD*BSP,FP-AD/NOD*BSP){XG51};
AT1:=IF(BETWEEN(CURRBARSCOUNT,BC2,TC2) AND C>LRL,C,LRL){XG51};
AT2:=HHV(AT1-LRL,MAX(BC2,TC2)){XG51};
AT3:=CONST(BARSLAST(AT1-LRL=AT2)){XG51};
AT5:=CONST(IF(AT3=0,AT1-LRL,REF(AT1-LRL,AT3))){XG51};
ATL:=LRL+AT5{XG51};
UT1:=IF(BETWEEN(CURRBARSCOUNT,BC2,TC2) AND L<LRL,L,LRL){XG51};
UT2:=HHV(LRL-UT1,MAX(BC2,TC2)){XG51};
UT3:=CONST(BARSLAST(LRL-UT1=UT2)){XG51};
UT5:=CONST(IF(UT3=0,LRL-UT1,REF(LRL-UT1,UT3))){XG51};
UTL:=LRL-UT5{XG51};
RH:=IF(CURRBARSCOUNT>=MIN(BC2,TC2)-10,ATL,CONST(REF(ATL,MIN(BC2,TC2)-11))){XG51};
RL:=IF(CURRBARSCOUNT>=MIN(BC2,TC2)-10,UTL,CONST(REF(UTL,MIN(BC2,TC2)-11))){XG51};
中轨:=IF(NP>FP,IF(LRL<=RH,LRL,DRAWNULL),IF(LRL>=RL,LRL,DRAWNULL)),COLORLIRED{XG51};
上轨12:IF(NP>FP,IF(ATL<=RH,ATL,DRAWNULL),IF(ATL>=RL,ATL,DRAWNULL)),COLORLIRED{XG51};
下轨12:IF(NP>FP,IF(UTL<=RH,UTL,DRAWNULL),IF(UTL>=RL,UTL,DRAWNULL)),COLORLIRED{XG51};
IF(NP>FP,IF(LRL-UTL<ATL-LRL,LRL*2-UTL,IF(ATL-LRL<LRL-UTL,LRL-(ATL-LRL),DRAWNULL)),IF(LRL-UTL<ATL-LRL,LRL*2-UTL,IF(ATL-LRL<LRL-UTL,LRL-(ATL-LRL),DRAWNULL))),DOTLINE,COLORLIRED{XG51};
URA:=5;LRA:=5{XG51};
TC1A:=IF(C=HHV(C,5*URA),C,DRAWNULL){XG51};
TC2A:=CONST(BARSLAST(TC1A=C))+1{XG51};
BC1A:=IF(L=LLV(L,5*LRA),L,DRAWNULL){XG51};
BC2A:=CONST(BARSLAST(BC1A=L))+1{XG51};
NODA:=(IF(TC2A>BC2A,TC2A,BC2A)-IF(TC2A>BC2A,BC2A,TC2A)){XG51};
LR1A:=FORCAST(C,NODA+1){XG51};
NPA:=IF(CURRBARSCOUNT<=MAX(BC2A,TC2A),CONST(IF(MIN(TC2A,BC2A)=1,LR1A,REF(LR1A,MIN(TC2A,BC2A)-1))),DRAWNULL),POINTDOT,COLOR93BDA8{XG51};
LR2A:=SLOPE(C,NODA+1){XG51};
LR3A:=CONST(IF(MIN(TC2A,BC2A)=1,LR2A,REF(LR2A,MIN(TC2A,BC2A)-1))){XG51};
FPA:=NPA-LR3A*(NODA),POINTDOT,COLOR93BDA8{XG51};
ADA:=ABS(NPA-FPA){XG51};
DBLA:=BARSLAST(BC1A!=DRAWNULL)+1{XG51};
DBHA:=BARSLAST(TC1A!=DRAWNULL)+1{XG51};
BSPA:=IF(BC2A>TC2A,DBLA,DBHA)-1{XG51};
LRLA:=IF(NPA>FPA,FPA+ADA/NODA*BSPA,FPA-ADA/NODA*BSPA){XG51};
AT1A:=IF(BETWEEN(CURRBARSCOUNT,BC2A,TC2A) AND C>LRLA,C,LRLA){XG51};
AT2A:=HHV(AT1A-LRLA,MAX(BC2A,TC2A)){XG51};
AT3A:=CONST(BARSLAST(AT1A-LRLA=AT2A)){XG51};
AT5A:=CONST(IF(AT3A=0,AT1A-LRLA,REF(AT1A-LRLA,AT3A))){XG51};
ATLA:=LRLA+AT5A{XG51};
UT1A:=IF(BETWEEN(CURRBARSCOUNT,BC2A,TC2A) AND L<LRLA,L,LRLA){XG51};
UT2A:=HHV(LRLA-UT1A,MAX(BC2A,TC2A)){XG51};
UT3A:=CONST(BARSLAST(LRLA-UT1A=UT2A)){XG51};
UT5A:=CONST(IF(UT3A=0,LRLA-UT1A,REF(LRLA-UT1A,UT3A))){XG51};
UTLA:=LRLA-UT5A{XG51};
RHA:=IF(CURRBARSCOUNT>=MIN(BC2A,TC2A)-10,ATLA,CONST(REF(ATLA,MIN(BC2A,TC2A)-11))){XG51};
RLA:=IF(CURRBARSCOUNT>=MIN(BC2A,TC2A)-10,UTLA,CONST(REF(UTLA,MIN(BC2A,TC2)-11))){XG51};
中轨A:=IF(NPA>FPA,IF(LRLA<=RHA,LRLA,DRAWNULL),IF(LRLA>=RLA,LRLA,DRAWNULL)),COLOR628962{XG51};
上轨12A:IF(NPA>FPA,IF(ATLA<=RHA,ATLA,DRAWNULL),IF(ATLA>=RLA,ATLA,DRAWNULL)),COLORRED{XG51};
下轨12A:IF(NPA>FPA,IF(UTLA<=RHA,UTLA,DRAWNULL),IF(UTLA>=RLA,UTLA,DRAWNULL)),COLORRED{XG51};
IF(NPA>FPA,IF(LRLA-UTLA<ATLA-LRLA,LRLA*2-UTLA,IF(ATLA-LRLA<LRLA-UTLA,LRLA-(ATLA-LRLA),DRAWNULL)),IF(LRLA-UTLA<ATLA-LRLA,LRLA*2-UTLA,IF(ATLA-LRLA<LRLA-UTLA,LRLA-(ATLA-LRLA),DRAWNULL))),DOTLINE,COLORRED{X~G_5-1~C~N~{};