通达信主力现形未加密选股指标公式源码

源码正文：

MV5:=ema(V,5){XG51};
ma5:=EMA(C,5){XG51};
MV5角度:=ATAN((MV5/REF(MV5,1)-1)*100)*180/3.1416{XG51};
MA5角度:=ATAN((MA5/REF(MA5,1)-1)*100)*180/3.1416{XG51};
量角:IF(MV5角度>30,MV5角度,0),COLOR0000FF,LINETHICK0{XG51};
价角:IF(MA5角度>0,MA5角度,MA5角度),COLORFFFFFF,LINETHICK2{XG51};
IF(价角>REF(价角,1) AND 价角>=0,价角,DRAWNULL),COLORWHITE,LINETHICK2{XG51};
IF(价角<REF(价角,1) AND 价角>0,价角,DRAWNULL),COLOR00FF00,LINETHICK2{XG51};
QSXS:=MA5角度>REF(MA5角度,1) AND MV5角度>80{XG51};
∠45↑: IF(crOSS(MA5角度,30),1,0),COLORFFFFFF,POINTDOT,LINETHICK0{XG51};
买强:IF(MA5角度>45 AND QSXS,10,0),COLOR00FFFF,POINTDOT,LINETHICK0{XG51};
防火:IF(MA5角度>70 AND MV5角度>80,20,0),COLORFF00FF,POINTDOT,LINETHICK0{XG51};
卖疯:IF(MA5角度>80 AND MV5角度>80,30,0),COLOR0000FF,POINTDOT,LINETHICK0{XG51};
WK:=MA5角度=LLV(MA5角度,3) AND MA5角度-HHV(MA5角度,4)<=0-50{XG51};
挖坑:IF(WK AND COUNT(买强 OR 防火,6),0-30,0),COLOR00FF00{XG51};
海底:IF(MA5角度<0-75,0-50,0-75),COLORFF8800{XG51};
stICKLINE(MV5角度>30,MV5角度,30,0.1,0),COLOR0000FF{XG51};
STICKLINE(买强,0,10,2,0),COLOR00FFFF{XG51};
STICKLINE(防火,10,20,2,0),COLORFF00FF{XG51};
STICKLINE(卖疯,20,30,2,0),COLOR0000FF{XG51};
DRAWTEXT(∠45↑,30, '↑'),COLORFFFFFF{XG51};
STICKLINE(∠45↑,0-90,30,0.1,0),COLOR00FFFF{XG51};
30,COLORFFFFFF{XG51};
M3:=MA(C,3){XG51};
M5:=MA(C,5){XG51};
N1:=BArslAST(CROSS(M3,M5)){XG51};
N2:=BARSLAST(CROSS(M5,M3)){XG51};
N:=IF(N1<N2,N1+1,0-N2-1){XG51};
STICKLINE(N>0,0-75,0-75+N*2,2,0),COLOR0000FF{XG51};
STICKLINE(N<0,0-75,0-75+N*2,2,0),COLORFFFF00{X.G=5_1.C.N.{};

源码正文：

LONG:=26;SHORT:=12;M:=9{XG51};
difF:=ema(CLOSE,SHORT)-Ema(CLOSE,LONG){XG51};
DEA:=EMA(DIFF,M){XG51};
macd2:=2*(DIFF-DEA){XG51};
DU0:=crOSS(DIFF,0){XG51};
UD0:=CROSS(0,DIFF){XG51};
TDU0:=BArslAst(DU0){XG51};
TUD0:=BARSLAST(UD0){XG51};
DU3:=REF(DU0,1){XG51};
UD3:=REF(UD0,1){XG51};
TDU3:=BARSLAST(DU3){XG51};
TUD3:=BARSLAST(UD3){XG51};
UDGLINE:=IF(TDU3<TUD3,REF(HHV(HIGH,2),TDU3),REF(LLV(LOW,2),TUD3)){XG51};
JDU0:=REF(CLOSE,1)<=REF(UDGLINE,1) AND CLOSE>UDGLINE AND TDU0<TUD0{XG51};
JUD0:=REF(CLOSE,1)>=REF(UDGLINE,1) AND CLOSE<UDGLINE AND TUD0<TDU0{XG51};
JDU1:=JDU0 AND COUNT(JDU0,TDU0)=1{XG51};
JUD1:=JUD0 AND COUNT(JUD0,TUD0)=1{XG51};
JDU2:=JDU1 AND REF(BARSLAST(JUD1),1)<REF(BARSLAST(JDU1),1){XG51};
JUD2:=JUD1 AND REF(BARSLAST(JUD1),1)>REF(BARSLAST(JDU1),1){XG51};
JDU3:=JDU1 AND REF(BARSLAST(JUD1),1)>REF(BARSLAST(JDU1),1){XG51};
JUD3:=JUD1 AND REF(BARSLAST(JUD1),1)<REF(BARSLAST(JDU1),1){XG51};
bsLINE:=IF(BARSLAST(JDU2)<BARSLAST(JUD2),IF(REF(CROSS(0,MacD2),1),LLV(LOW,2),REF(LLV(LOW,2),BARSLAST(REF(CROSS(0,MACD2),1)))),IF(REF(CROSS(MACD2,0),1),HHV(HIGH,2),REF(HHV(HIGH,2),BARSLAST(REF(CROSS(MACD2,0),1))))){XG51};
STICKLINE(MACD2>=0,0,MACD2,6,1),COLOR0000FF{XG51};
STICKLINE(MACD2>=0 AND MACD2<REF(MACD2,1),0,MACD2,6,0),COLOR0000FF{XG51};
STICKLINE(MACD2<0,0,MACD2,6,0),COLORFFFF00{XG51};
STICKLINE(MACD2<0 AND MACD2>REF(MACD2,1),0,MACD2,6,1),COLORFFFF00{XG51};
DIF:DIFF,LINETHICK2,COLOR0000FF{XG51};
MACD:DEA,COLORFF0000{XG51};
DEF:MACD2,LINETHICK0,COLORFFFF00{XG51};
STICKLINE(CLOSE>0,0,0,10,0),COLOR808080{XG51};
DEFUT:=BARSLAST(CROSS(MACD2,0)){XG51};
DEFDT:=BARSLAST(CROSS(0,MACD2)){XG51};
DEFUL:=IF(MACD2>=0,HHV(MACD2,DEFUT+1),REF(HHV(MACD2,DEFUT+1),DEFDT+1)){XG51};
DEFDL:=IF(MACD2<0,LLV(MACD2,DEFDT+1),REF(LLV(MACD2,DEFDT+1),DEFUT+1)){XG51};
DEFU2L:=REF(DEFUL,DEFUT+1){XG51};
DEFD2L:=REF(DEFDL,DEFDT+1){XG51};
DRAWICON(HHV(MACD2,4)<0 AND MACD2>REF(MACD2,1) AND REF(MACD2,1)<REF(MACD2,2) AND REF(MACD2,2)<REF(MACD2,3),MACD2,1){XG51};
DRAWICON((JUD1 OR BARSLAST(JDU1)>BARSLAST(JUD1)) AND MACD2>=0 AND REF(MACD2,1)<REF(DEFU2L,1) AND MACD2>DEFU2L,MACD2,2){XG51};
DRAWICON((JDU1 OR BARSLAST(JDU1)<BARSLAST(JUD1)) AND MACD2<0 AND REF(MACD2,1)>REF(DEFD2L,1) AND MACD2<DEFD2L,MACD2,2){X.G*5.1.C.N.{};