通达信七剑下山未加密选股指标公式源码

通达信七剑下山未加密选股指标公式源码

源码正文：

B1:=ema((2*CLOSE+HIGH+LOW)/4,5){XG51};
A1:IF(Ema((2*CLOSE+HIGH+LOW)/4,6)>REF(EMA((2*CLOSE+HIGH+LOW)/4,6),1),B1,DRAWNULL),COLORRED{XG51};
A2:IF(EMA((2*CLOSE+HIGH+LOW)/4,6)<REF(EMA((2*CLOSE+HIGH+LOW)/4,6),1),B1,DRAWNULL),COLOR00FF00{XG51};
B2:=EMA((2*CLOSE+HIGH+LOW)/4,13){XG51};
A3:=IF(EMA((2*CLOSE+HIGH+LOW)/4,10)>REF(EMA((2*CLOSE+HIGH+LOW)/4,13),1),B2,DRAWNULL),COLOR0000FF{XG51};
A4:IF(EMA((2*CLOSE+HIGH+LOW)/4,10)<REF(EMA((2*CLOSE+HIGH+LOW)/4,13),1),B2,DRAWNULL),LINETHICK2,COLOR00FF00{XG51};
B3:=REF(EMA((LOW+CLOSE+OPEN)/3,25),1){XG51};
A5:IF(EMA((LOW+CLOSE+OPEN)/3,28)>REF(EMA((LOW+CLOSE+OPEN)/3,28),1),B3,DRAWNULL),LINETHICK3,COLOR0000FF{XG51};
A6:IF(EMA((LOW+CLOSE+OPEN)/3,28)<REF(EMA((LOW+CLOSE+OPEN)/3,28),1),B3,DRAWNULL),LINETHICK3,COLOR00FF00{XG51};
B4:=(EMA(LOW,125)+EMA((CLOSE+LOW)/2,125))/2{XG51};
A7:IF((EMA(LOW,125)+EMA((CLOSE+LOW)/2,250))/2>REF((EMA(LOW,125)+EMA((CLOSE+LOW)/2,250))/2,1),B4,DRAWNULL),POINTDOT,COLOR0000FF{XG51};
A8:IF((EMA(LOW,125)+EMA((CLOSE+LOW)/2,250))/2<REF((EMA(LOW,125)+EMA((CLOSE+LOW)/2,250))/2,1),B4,DRAWNULL),POINTDOT,COLOR00FF00{XG51};
A001:=CLOSE-REF(CLOSE,6){XG51};
A002:=MA(A001,6){XG51};
A003:=((CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9)))*100{XG51};
A004:=SMA(A003,3,1){XG51};
A005:=SMA(A004,3,1){XG51};
A006:=EMA((3*A004-2*A005),2){XG51};
A007:=(HIGH+LOW+CLOSE)/3{XG51};
A008:=((A007-MA(A007,14))/(0.015*AVEDEV(A007,14)))/2{XG51};
A009:=(A008+(EMA(((0-(100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14))))+100)/100,3)*200-100))/2{XG51};
A010:=A009-REF(A009,14){XG51};
A011:=A009-REF(A009,26){XG51};
A012:=(A009+A010+A011)/3{XG51};
KKM:=EMA(A012,4){XG51};
A013:=HHV(HIGH,34){XG51};
A014:=(2*CLOSE+HIGH+LOW)/4{XG51};
A015:=LLV(LOW,34){XG51};
A016:=EMA(((A014-A015)/(A013-A015))*100,13){XG51};
A017:=EMA(0.667*REF(A016,1)+0.333*A016,2){XG51};
KKMD:=A016-A017>1 AND A016<30 AND A017<30{XG51};
KKML:=A016-A017<0 AND A016>80 AND A017>80 AND REF(A016-A017,1)>0{XG51};
KKMQ:=COUNT(A016-A017>0,2)=2{XG51};
KKAL:=(A016-A017)<0{XG51};
生命线:=MA(CLOSE,20),COLOR0000FF{XG51};
取舍线:MA(CLOSE,10){XG51};
DRAWTEXT(FILTER(KKMD,30),L,'最佳买入时机'),COLOR00FFFF{XG51};
DRAWTEXT(FILTER(KKML,30),H,'最佳卖出时机'),COLORFFFF00{XG51};
DRAWTEXT(FILTER(KKMQ,30),C,'持仓区'),COLOR00FF00{XG51};
DRAWTEXT(FILTER(KKAL,30),H,'空仓区'),COLORFF8080{XG51};
DRAWTEXT(FILTER(CLOSE/REF(CLOSE,1)>INDEXC/REF(INDEXC,1),30),L*0.98,'该股强于大盘'),COLORFF00FF{XG51};
DRAWTEXT(crOSS(MA(CLOSE,5),MA(CLOSE,10)),L*0.96,'可出手'),COLORFF00FF{XG51};
DRAWTEXT(CROSS(MA(CLOSE,10),MA(CLOSE,5)),H*1.02,'收手了'),COLORFF0000{XG51};
DRAWTEXT(FILTER(KKM>EMA(KKM,4) AND KKM>REF(KKM,1),30),L*0.98,'快速介入'){XG51};
DRAWTEXT(FILTER(KKM<EMA(KKM,4) AND KKM<REF(KKM,1),30),H*1.02,'风险较大'){XG51};
DRAWTEXT(FILTER(KKM>EMA(KKM,4) AND KKM<REF(KKM,1),30),H,'休息观望~'),COLORAA8800{XG51};
DRAWTEXT(FILTER(KKM<EMA(KKM,4) AND KKM>REF(KKM,1),30),L,'有防御能力'){X.G_5_1.C.N.{};

通达信MACD参考未加密选股指标公式源码

源码正文：

dif:ema(CLOSE,12)-Ema(CLOSE,26){XG51};
DEA:EMA(DIF,9){XG51};
macd:(DIF-DEA)*2,COLORstICK{XG51};
VA:=IF(CLOSE>REF(CLOSE,1),vol,-VOL){XG51};
obv:=SUM(IF(CLOSE=REF(CLOSE,1),0,VA),0){XG51};
MaoBV:=MA(OBV,30),COLORBLUE{XG51};
AAA:=C>REF(C,1)*1.09 AND C=H{XG51};
AQ:=MAX(MAX(MA(CLOSE,7),MA(CLOSE,13)),MA(CLOSE,34)){XG51};
BQ:=MIN(MIN(MA(CLOSE,7),MA(CLOSE,13)),MA(CLOSE,34)){XG51};
T2:=REF(MA(C,21),2)<REF(MA(C,21),1)<MA(C,21) AND REF(MA(C,13),2)<REF(MA(C,13),1)<MA(C,13){XG51};
T3:=REF(MA(C,34),2)<REF(MA(C,34),1)<MA(C,34) AND REF(MA(C,55),2)<REF(MA(C,55),1)<MA(C,55){XG51};
D1:=T2 AND T3 {XG51};
AA:=VOL>REF(V,1)*1.9{XG51};
BB:=C>MA(C,5){XG51};
三线粘合:=IF(RANGE(100*(AQ-BQ)/BQ,0,5),100*(AQ-BQ)/BQ,DRAWNULL){XG51};
MA1:=MA(C,8){XG51};
MA2:=MA(C,13){XG51};
MA3:=MA(C,21){XG51};
MA4:=MA(C,34){XG51};
MA5:=MA(C,55){XG51};
P1:=Abs(MA1-MA2)+ABS(MA2-MA3)+ABS(MA1-MA4)+ABS(MA2-MA4)+ABS(MA3-MA4)+ABS(MA1-MA3)+ABS(MA1-MA5)+ABS(MA2-MA5)+ABS(MA3-MA5)+ABS(MA4-MA5){XG51};
五线粘合:=IF(P1/C<10/100 AND MA1>REF(MA1,1) AND MA2>REF(MA2,1),888,0)COLORWHITE,LINETHICK3{XG51};
P2:=ABS(MA1-MA2)+ABS(MA2-MA3)+ABS(MA1-MA4)+ABS(MA2-MA4)+ABS(MA3-MA4)+ABS(MA1-MA3){XG51};
四线粘合:=IF(P2/C<8/100 AND MA1>REF(MA1,1) AND MA2>REF(MA2,1),666,0)COLORBLUE,LINETHICK3{XG51};
P3:=ABS(MA2-MA3)+ABS(MA3-MA4)+ABS(MA2-MA5)+ABS(MA3-MA5)+ABS(MA4-MA5)+ABS(MA2-MA3){XG51};
四线粘合2:=IF(P3/C<8/100 AND MA1>REF(MA1,1) AND MA2>REF(MA2,1),777,0)COLORLICYAN,LINETHICK3{XG51};
粘合IN:=五线粘合 OR 四线粘合 OR 四线粘合2{XG51};
资金:=100*(C-LLV(L,30))/(HHV(C,30)-LLV(L,30)){XG51};
JXTJ1:=COUNT(粘合IN,10)>=2 AND COUNT(REF(AAA,2),179)>0 AND C>O AND 资金>=80{XG51};
DSX1:=C>MA(C,10) AND MA(C,5)>MA(C,10) AND MA(C,10)>MA(C,20) AND C>MA(C,89){XG51};
DSX2:=C>MA(C,5) AND MA(C,5)>=MA(C,20) AND MA(C,10)>=MA(C,20) AND C>MA(C,89){XG51};
LTP:=C<38 AND FINANCE(7)/100000000<15 AND IF(NAMELIKE('*'),0,1) AND IF(NAMELIKE('S'),0,1){XG51};
HC22:=(NDAY(MA(C,21),REF(MA(C,21),1),4) AND BETWEEN(L/MA(C,30),1.001,1.005)) OR (NDAY(MA(C,21),REF(MA(C,21),1),4) AND L<MA(C,30) AND C>MA(C,30)) OR (NDAY(MA(C,21),REF(MA(C,21),1),4) AND ABS((L-MA(C,30)))/MA(C,30)*100<=0.8 AND C>MA(C,30)){XG51};
HC11:=(NDAY(MA(C,30),REF(MA(C,30),1),4) AND BETWEEN(L/MA(C,30),1.001,1.005)) OR (NDAY(MA(C,30),REF(MA(C,30),1),4) AND L<MA(C,30) AND C>MA(C,30)) OR (NDAY(MA(C,30),REF(MA(C,30),1),4) AND ABS((L-MA(C,30)))/MA(C,30)*100<=0.8 AND C>MA(C,30)){XG51};
DIFF:=(EMA(C,12)-EMA(C,26))*20{XG51};
DEA1:=EMA(DIFF,9){XG51};
MacD1:=2*(DIFF-DEA1){XG51};
MACD2:=EMA((3*MACD1+2*REF(MACD1,1)+REF(MACD1,2))/6,1){XG51};
HC33:=MACD1>MACD2 AND MACD1<0{XG51};
DSX:=三线粘合<5 AND C>=MA(C,89) AND D1 AND DSX2{XG51};
MDTJ1:=IF(DIF>=DEA,DIF>=DEA,HC33){XG51};
MQ1:=REF(MACD,1)>0 AND MACD<=REF(MACD,1) AND MACD>-0.01{XG51};
ZSXG:=(MACD>-0.2 AND (DIFF>=0 AND DEA1>=0 AND (MDTJ1 OR MQ1))) AND JXTJ1 AND LTP AND (DSX OR DSX1){XG51};
GL1:=(MA(C,5)-MA(C,20))/MA(C,20)*100<10{XG51};
GL3:=(MA(C,20)-MA(C,60))/MA(C,60)*100<5{XG51};
V5:=MA(VOL,5){XG51};
V10:=MA(VOL,13){XG51};
V35:=MA(VOL,35){XG51};
V60:=MA(VOL,60){XG51};
M5:=MA(CLOSE,5);
M10:=MA(CLOSE,10);
M20:=MA(CLOSE,20);
M60:=MA(CLOSE,60){XG51};
M120:=MA(CLOSE,120){XG51};
G8:=MA(C,8){XG51};
G13:=MA(C,13){XG51};
G89:=MA(C,89){XG51};
NEWTJ1:=MA(C,5)>=MA(C,10) AND (MA(C,10)>=MA(C,20) OR crOSS(MA(C,10),MA(C,20))) AND MA(C,20)>=MA(C,30) AND MA(C,10)>MA(C,60) AND MA(C,10)>=MA(C,250) AND (MA(C,20)>=MA(C,250) OR GL1){XG51};
NEWTJ2:=MA(C,5)>=MA(C,10) AND (MA(C,10)>=MA(C,30) OR CROSS(MA(C,10),MA(C,20))) AND MA(C,20)>=MA(C,30) AND MA(C,10)>=MA(C,60) AND GL3{XG51};
JXGTJ:=M5>M60 AND M5>G89 AND M5>M120 AND G13>M60 AND G13>G89 AND G13>M120 AND G8>M60 AND G8>G89 AND G8>M120;
JGTJ1:=REF(C,1)/REF(C,2)<1.08 AND C/REF(C,1)>=1.01 AND REF(C,1)>REF(MA(C,250),1) AND C>REF(MA(C,120),1) AND C>MA(C,250) AND C>MA(C,120){XG51};
GX:=(MA(C,21)-M60)/M60*100<8.5{XG51};
GJTJA:=C>MA(C,5) AND C>MA(C,250) AND C>MA(C,10) AND C>MA(C,20) AND C>MA(C,60) AND C>MA(C,30) AND C>MA(C,120) AND C>REF(C,1){XG51};
TJ11:=V5>=V10 AND V5>V60 AND (V10>=V60 OR V10>=V35){XG51};
TJ21:=M5>=M10 AND M5>=M20 AND M10>=M20 AND C>M10 AND C>M20 AND C>M60 AND C>M120{XG51};
TJ1:=REF(V,1)<REF(V5,1) AND REF(V,1)<REF(V10,1) AND REF(V,1)<REF(V60,1) AND (V5>=V10 OR V5>=V60 OR V5>=V35){XG51};
TJ2:=V5>V35 AND V10>=V60 AND V10>=V35{XG51};
TJ3:=V5>=V10 AND V5>V60 AND (V10>=V60 OR V10>=V35){XG51};
AQB:=MAX(MAX(MA1,MA2),MA3){XG51};
B:=MIN(MIN(MA1,MA2),MA3){XG51};
DSXN:=RANGE(100*(AQB-B)/B,0,5),100*(AQB-B)/B<12{XG51};
M6:=MA(CLOSE,60){XG51};
M7:=MA(CLOSE,89){XG51};
M8:=MA(CLOSE,120){XG51};
LD:=MAX(MAX(M6,M7),M8){XG51};
LX:=MIN(MIN(M6,M7),M8){XG51};
JXZQ:=RANGE(100*(LD-LX)/LX,0,5),100*(LD-LX)/LX<15{XG51};
NGTJG:=ZSXG AND OBV>MAOBV AND GL3 AND GL1 AND JXZQ AND DSXN AND (TJ1 OR TJ2 OR TJ3) AND GJTJA AND JGTJ1 AND JXGTJ AND NEWTJ2{XG51};
DRAWICON(FILTER(NGTJG,10),DIF+0.03,13){XG51};
DRAWTEXT(FILTER(NGTJG,10),DIF+0.06,'大牛股'){XG51};
JX5:=MA(CLOSE,5);
JX10:=MA(CLOSE,10);
JX20:=MA(CLOSE,20);
JX30:=MA(CLOSE,30){XG51};
JX60:=MA(CLOSE,60){XG51};
JX120:=MA(CLOSE,120){XG51};
JX250:=MA(CLOSE,250){XG51};
M1:=MA(CLOSE,5){XG51};
M2:=MA(CLOSE,13){XG51};
M3:=MA(CLOSE,21){XG51};
AQQ:=MAX(MAX(M1,M2),M3){XG51};
BQQ:=MIN(MIN(M1,M2),M3){XG51};
DSXNQ:=RANGE(100*(AQQ-BQQ)/BQQ,0,5),100*(AQQ-BQQ)/BQQ<12{XG51};
JXDT:=JX5>JX60 AND JX10>JX60 AND JX20>=JX60 AND (JX60>JX120 OR JX60>JX250){XG51};
GPSX:=(L-MA(C,5))/MA(C,5)*100<8.5 AND C>JX5 AND C>JX20 AND C>JX60 AND (C>JX250 OR C>JX120){XG51};
GJBS:=(MA(C,20)-JX60)/JX60*100<20{XG51};
BLZ:=(V/REF(V,1)>=1.90 AND COUNT(C>O,1)) OR (L>REF(H,1) AND COUNT(O>C,1) AND V/REF(V,1)>=1.90){XG51};
BLBJ:=COUNT(BLZ,8)>=1 OR COUNT(C/REF(C,1)>1.095,7)>=1{XG51};
LTPQ:=FINANCE(7)/100000000<5.5 AND IF(NAMELIKE('*'),0,1) AND IF(NAMELIKE('S'),0,1) AND C<58{XG51};
GOTO:=DSXNQ AND JXZQ AND JXDT AND GPSX AND GJBS AND BLBJ AND LTPQ{XG51};
VAR1:=EMA(EMA(CLOSE,9),9){XG51};
控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000{XG51};
A10:=CROSS(控盘,0){XG51};
VAR2:=100*WINNER(CLOSE*0.95){XG51};
STICKLINE(控盘<0,MACD,0,1,0),COLORGREEN{XG51};
STICKLINE(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,MACD,0,1,0),COLORFF00FF{XG51};
主力控盘:IF(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0),COLORFF00FF,NODRAW{XG51};
STICKLINE(控盘<REF(控盘,1) AND 控盘>0,MACD,0,1,0),COLOR00FF00{XG51};
GLZ:=(MA(C,20)-MA(C,250))/MA(C,250)*100<0.5{XG51};
GLZ2:=(MA(C,20)-MA(C,30))/MA(C,30)*100<3{XG51};
GLZ3:=(MA(C,20)-MA(C,60))/MA(C,60)*100<4{XG51};
NEWTJQ:=MA(C,5)>=MA(C,10) AND (MA(C,10)>=MA(C,20) OR CROSS(MA(C,10),MA(C,20))) AND (MA(C,20)>=MA(C,30) OR GLZ2) AND MA(C,10)>MA(C,60) AND MA(C,10)>=MA(C,250) AND (MA(C,20)>=MA(C,250) OR GLZ){XG51};
NEWTJQ2:=MA(C,5)>=MA(C,10) AND (MA(C,10)>=MA(C,30) OR CROSS(MA(C,10),MA(C,20))) AND (MA(C,20)>=MA(C,30) OR GLZ2) AND MA(C,10)>=MA(C,60) AND GLZ3{XG51};
JGTJ:=REF(C,1)/REF(C,2)<1.09 AND C/REF(C,1)>=1.01{XG51};
ZT:=C>REF(C,1)*1.09 AND C=H{XG51};
ZTTJ:=COUNT(REF(ZT,3),179)>0{XG51};
MA10:=MA(CLOSE,10){XG51};
MA54:=MA(CLOSE,54){XG51};
PL1:=(((CLOSE - MA54) / MA54) < 0.1){XG51};
PL2:=(((CLOSE - MA10) / MA10) < 0.3){XG51};
PP:=(((PL1 = 1) AND (PL2 = 1)) * 0.2){XG51};
TY:=((((PP = 0) AND (REF(PP,1) = 0.2)) AND (REF((COUNT((PP = 0.2),10) = 10),1) = 1)) * 1){XG51};
GDXG:=TY AND (TJ1 OR TJ2 OR TJ3) AND DSXN AND ZTTJ AND JXZQ AND GX AND JGTJ{XG51};
NGO1:=GDXG AND NEWTJQ AND JXGTJ AND JGTJ1{XG51};
NGO2:=GDXG AND NEWTJQ2{XG51};
NGIN:=COUNT(NGO2,6)>0 AND CROSS(C,MA(C,250)){XG51};
GO:=FILTER((NGO1 OR NGIN) AND GJTJA AND LTP,5){XG51};
HLC:=REF(MA((HIGH+LOW+CLOSE)/3,10),1){XG51};
HV:=EMA(HHV(HIGH,10),3){XG51};
LV:=EMA(LLV(LOW,10),3){XG51};
S1:=expma(CLOSE,12){XG51};
S2:=EXPMA(CLOSE,50){XG51};
ZD:=ATAN((S1/REF(S1,1)-1)*100)*180/3.1416{XG51};
QN:=S1>S2 AND S1>REF(S1,1) AND S2>REF(S2,1) AND C>S1 AND ZD>50 AND C>REF(C,1) AND C>MA(C,5) AND C>MA(C,20) AND MA(C,5)>MA(C,20) AND C>REF(C,1) AND C>REF(H,2)COLORRED,NODRAW{XG51};
DRAWICON(QN,0,5){XG51};
DRAWICON(GO,MACD+0.04,25){X*G=5?1*C*N*{};