通达信六脉神剑+未加密选股指标公式源码

通达信六脉神剑+未加密选股指标公式源码

源码正文：

difF:=ema(CLOSE,8)-Ema(CLOSE,13){XG51};
DEA:=EMA(DIFF,5){XG51};
A1:=DIFF>DEA{XG51};
macd金叉:IF(A1,1,0),COLORWHITE{XG51};
RSV1:=(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100{XG51};
K:=SMA(RSV1,3,1){XG51};
D:=SMA(K,3,1){XG51};
DRAWICON(K>D,2,1){XG51};
DRAWICON(K<D,2,2){XG51};
DRAWTEXT(ISLAstBAR=1,2,'.kdj'),COLORFFFFFF{XG51};
A2:=K>D{XG51};
kdj金叉:IF(A2,2,0),COLORWHITE{XG51};
LC:=REF(CLOSE,1){XG51};
rsi1:=(SMA(MAX(CLOSE-LC,0),5,1))/(SMA(Abs(CLOSE-LC),5,1))*100{XG51};
RSI2:=(SMA(MAX(CLOSE-LC,0),13,1))/(SMA(ABS(CLOSE-LC),13,1))*100{XG51};
DRAWICON(RSI1>RSI2,3,1){XG51};
DRAWICON(RSI1<RSI2,3,2){XG51};
DRAWTEXT(ISLASTBAR=1,3,'.RSI'),COLORFFFFFF{XG51};
A3:=RSI1>RSI2{XG51};
RSI金叉:IF(A3,3,0),COLORWHITE{XG51};
RSV:=-(HHV(HIGH,13)-CLOSE)/(HHV(HIGH,13)-LLV(LOW,13))*100{XG51};
Lwr1:=SMA(RSV,3,1){XG51};
LWR2:=SMA(LWR1,3,1){XG51};
DRAWICON(LWR1>LWR2,4,1){XG51};
DRAWICON(LWR1<LWR2,4,2){XG51};
DRAWTEXT(ISLASTBAR=1,4,'.LWR'),COLORFFFFFF{XG51};
A4:=LWR1>LWR2{XG51};
LWR金叉:IF(A4,4,0),COLORWHITE{XG51};
bbi:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4{XG51};
DRAWICON(CLOSE>BBI,5,1){XG51};
DRAWICON(CLOSE<BBI,5,2){XG51};
DRAWTEXT(ISLASTBAR=1,5,'.BBI'),COLORFFFFFF{XG51};
A5:=CLOSE>BBI{XG51};
BBI金叉:IF(A5,5,0),COLORWHITE{XG51};
mtm:=CLOSE-REF(CLOSE,1){XG51};
mms:=100*EMA(EMA(MTM,5),3)/EMA(EMA(ABS(MTM),5),3){XG51};
MMM:=100*EMA(EMA(MTM,13),8)/EMA(EMA(ABS(MTM),13),8){XG51};
DRAWICON(MMS>MMM,6,1){XG51};
DRAWICON(MMS<MMM,6,2){XG51};
DRAWTEXT(ISLASTBAR=1,6,'.MTM'),COLORFFFFFF{XG51};
A6:=MMS>MMM{XG51};
MTM金叉:IF(A6,6,0),COLORWHITE{XG51};
涨买入:IF((A1 AND A2 AND A3 AND A4 AND A5 AND A6) AND REF(A1 AND A2 AND A3 AND A4 AND A5 AND A6,1)=0,7,0),COLORBLUE,LINETHICK2{XG51};
上涨:IF(A1 AND A2 AND A3 AND A4 AND A5 AND A6,7,0),COLORBLUE,LINETHICK2{XG51};
晴天:BArslASTCOUNT(A1 AND A2 AND A3 AND A4 AND A5 AND A6),LINETHICK0{XG51};
雨天:BARSLASTCOUNT(MacD金叉+KDJ金叉+RSI金叉+LWR金叉+BBI金叉+MTM金叉>0 AND MACD金叉+KDJ金叉+RSI金叉+LWR金叉+BBI金叉+MTM金叉<21 ),LINETHICK0{XG51};
雪天:BARSLASTCOUNT(MACD金叉+KDJ金叉+RSI金叉+LWR金叉+BBI金叉+MTM金叉=0),LINETHICK0;

选股公式:
DIFF:=EMA(CLOSE,8)-EMA(CLOSE,13){XG51};
DEA:=EMA(DIFF,5){XG51};
A1:=DIFF>DEA{XG51};
RSV1:=(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100{XG51};
K:=SMA(RSV1,3,1){XG51};
D:=SMA(K,3,1){XG51};
A2:=K>D{XG51};
LC:=REF(CLOSE,1){XG51};
RSI1:=(SMA(MAX(CLOSE-LC,0),5,1))/(SMA(ABS(CLOSE-LC),5,1))*100{XG51};
RSI2:=(SMA(MAX(CLOSE-LC,0),13,1))/(SMA(ABS(CLOSE-LC),13,1))*100{XG51};
A3:=RSI1>RSI2{XG51};
RSV:=-(HHV(HIGH,13)-CLOSE)/(HHV(HIGH,13)-LLV(LOW,13))*100{XG51};
LWR1:=SMA(RSV,3,1){XG51};
LWR2:=SMA(LWR1,3,1){XG51};
A4:=LWR1>LWR2{XG51};
BBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4{XG51};
A5:=CLOSE>BBI{XG51};
MTM:=CLOSE-REF(CLOSE,1){XG51};
MMS:=100*EMA(EMA(MTM,5),3)/EMA(EMA(ABS(MTM),5),3){XG51};
MMM:=100*EMA(EMA(MTM,13),8)/EMA(EMA(ABS(MTM),13),8){XG51};
A6:=MMS>MMM{XG51};
涨买入:IF((A1 AND A2 AND A3 AND A4 AND A5 AND A6) AND REF(A1 AND A2 AND A3 AND A4 AND A5 AND A6,1)=0,7,0){X?G^5~1?C?N?{};

通达信海市蜃楼未加密选股指标公式源码

源码正文：

天空:stICKLINE(1,0,120,6,0),COLORFFB06C{XG51};
海水:STICKLINE(1,0,-50,6,0),COLORFFB000{XG51};
VAR3Q:=SMA(Abs(L-REF(L,1)),3,1)/Sma(MAX(L-REF(L,1),0),3,1)*100{XG51};
VAR4Q:=ema(IF(C*1.3,VAR3Q*10,VAR3Q/10),3){XG51};
VAR5Q:=LLV(L,30){XG51};
VAR6Q:=HHV(VAR4Q,30){XG51};
VAR7Q:=IF(MA(C,58),1,0){XG51};
VAR8Q:=EMA(IF(L<=VAR5Q,(VAR4Q+VAR6Q*2)/2,0),3)/618*VAR7Q{XG51};
VAR9Q:=IF(VAR8Q>100,100,VAR8Q){XG51};
观景:IF(VAR9Q>-120,VAR9Q/3-50,DRAWNULL),COLORBLUE,NODRAW{XG51};
STICKLINE(VAR9Q>-120,-50,VAR9Q/3-50,4,1),COLORBLUE{XG51};
AA3:=(HHV(H,21)-C)/(HHV(H,21)-LLV(L,21))*100-10{XG51};
AA4:=(C-LLV(L,21))/(HHV(H,21)-LLV(L,21))*100{XG51};
AA5:=SMA(AA4,13,8){XG51};
AA55:=CEILING(SMA(AA5,13,8)){XG51};
AA6:=SMA(AA3,21,8){XG51};
海市蜃楼:IF(AA55-AA6>85,112.5,DRAWNULL),COLORFFFFFF,LINETHICK2,crOSSDOT{XG51};
difF :=EMA(C,12)-EMA(C,26){XG51};
DEA :=EMA(DIFF,9){XG51};
macd1 :=1000*((DIFF-DEA))/EMA(C,30){XG51};
MacD:=IF(MACD1<-50,-50,MACD1){XG51};
STICKLINE(MACD>=0,0,MACD,4,0),COLOR666666{XG51};
STICKLINE(MACD>=0 AND MACD>REF(MACD,1),0,MACD,4,0),COLORAAAAAA{XG51};
百年好和:IF(MACD1<0 AND MACD1>REF(MACD1,1),-MACD1,DRAWNULL),STICK,COLOREAEAEA{XG51};
龙K:=SMA(SMA((C-LLV(L,5))/(HHV(H,5)-LLV(L,5))*100,3,1),2,1){XG51};
龙D:=SMA(龙K,5,1){XG51};
STICKLINE(龙K>=龙D,龙D,龙K,4,0),COLOR000085{XG51};
STICKLINE(龙K<龙D,龙D,龙K,4,0),COLOR324800{XG51};
凤K:SMA((C-LLV(L,14))/(HHV(H,14)-LLV(L,14))*50-50,3,1),COLORWHITE{XG51};
凤D:SMA(凤K,3,1),COLORYELLOW{XG51};
龙行凤影:3*SMA((C-LLV(L,27))/(HHV(H,27)-LLV(L,27))*100,5,1)-2*SMA(SMA((C-LLV(L,27))/(HHV(H,27)-LLV(LOW,27))*100,5,1),3,1),COLORBLUE,LINETHICK2{XG51};
双起双飞:IF(龙行凤影<10,-30,-50),COLOR0000FF,LINETHICK2{XG51};
恭喜:IF(CROSS(EMA((C-LLV(L,10))/(HHV(H,25)-LLV(L,10))*4,4),0.3),-30,DRAWNULL),COLOR00CCFF,LINETHICK6,CIRCLEDOT{XG51};
发财:IF(CROSS(3.5,EMA((C-LLV(L,10))/(HHV(H,25)-LLV(L,10))*4,4)),100,DRAWNULL),COLORWHITE,LINETHICK6,CIRCLEDOT{X~G_5=1~C~N~{};