通达信金牌中长线主图未加密选股指标公式源码

源码正文：

ma13:=MA(CLOSE,13){XG51};
ema30:EMA(CLOSE,30),COLORFFCCCC{XG51};
EMA60:EMA(CLOSE,60),COLORFF00FF{XG51};
EMA90:EMA(CLOSE,90),COLOR00FFFF{XG51};
EMA120:EMA(CLOSE,120),COLORFFCC66{XG51};
EMA250:EMA(CLOSE,250),COLORFF0000{XG51};
AA:=((((EMA30 + EMA60) + EMA90) + EMA120) / 4){XG51};
SX:=((AA * (1 / 100)) + AA){XG51};
XX:=(AA - (AA * (1 / 100))){XG51};
中粘A:=COUNT(((BETWEEN(EMA60,EMA90,XX) AND BETWEEN(EMA90,AA,EMA60)) AND BETWEEN(EMA120,EMA30,AA)),5){XG51};
UA:=((中粘A AND crOSS(CLOSE,EMA120)) AND CROSS(CLOSE,EMA30)){XG51};
中粘B:=COUNT((((BETWEEN(EMA30,EMA60,XX) AND BETWEEN(EMA60,AA,EMA30)) AND BETWEEN(EMA90,EMA120,AA)) AND BETWEEN(EMA120,SX,EMA90)),5){XG51};
UB:=((中粘B AND CROSS(CLOSE,EMA120)) AND CROSS(CLOSE,SX)){XG51};
中粘C:=COUNT((((BETWEEN(EMA120,AA,XX) AND BETWEEN(EMA90,EMA60,AA)) AND BETWEEN(EMA30,EMA60,AA)) AND BETWEEN(EMA60,SX,EMA30)),5){XG51};
UC:=((((中粘C AND CROSS(CLOSE,EMA120)) AND CROSS(CLOSE,EMA30)) AND CROSS(CLOSE,EMA90)) AND CROSS(CLOSE,EMA60)){XG51};
中粘D:=COUNT((((BETWEEN(EMA90,EMA120,XX) AND BETWEEN(EMA60,AA,EMA90)) AND BETWEEN(EMA120,AA,EMA90)) AND BETWEEN(SX,EMA30,AA)),5){XG51};
UD:=(((中粘D AND CROSS(CLOSE,EMA60)) AND CROSS(CLOSE,EMA120)) AND CROSS(CLOSE,AA)){XG51};
中粘E:=COUNT((((BETWEEN(EMA30,EMA120,XX) AND BETWEEN(EMA120,EMA30,AA)) AND BETWEEN(EMA90,EMA60,AA)) AND BETWEEN(EMA60,SX,EMA90)),5){XG51};
UE:=(((中粘E AND CROSS(CLOSE,EMA30)) AND CROSS(CLOSE,EMA120)) AND CROSS(CLOSE,EMA90)){XG51};
中粘F:=COUNT((((BETWEEN(EMA90,EMA60,XX) AND BETWEEN(EMA60,AA,EMA90)) AND BETWEEN(EMA120,AA,EMA90)) AND BETWEEN(EMA30,SX,AA)),5){XG51};
UF:=(((中粘F AND CROSS(CLOSE,EMA60)) AND CROSS(CLOSE,EMA120)) AND CROSS(CLOSE,EMA30)){XG51};
中粘G:=COUNT(((((BETWEEN(XX,AA,EMA30) AND BETWEEN(AA,EMA120,XX)) AND BETWEEN(EMA120,EMA60,AA)) AND BETWEEN(EMA60,EMA90,EMA120)) AND BETWEEN(EMA90,SX,EMA60)),5){XG51};
UG:=((中粘G AND CROSS(CLOSE,EMA30)) AND CROSS(CLOSE,EMA120)){XG51};
中粘H:=COUNT((((BETWEEN(EMA120,EMA30,XX) AND BETWEEN(EMA30,AA,EMA120)) AND BETWEEN(EMA90,EMA60,AA)) AND BETWEEN(EMA60,SX,EMA90)),5){XG51};
UH:=(((中粘H AND CROSS(CLOSE,EMA30)) AND CROSS(CLOSE,EMA90)) AND CROSS(CLOSE,EMA60)){XG51};
中粘Y:=COUNT(((((BETWEEN(EMA60,XX,EMA30) AND BETWEEN(XX,AA,EMA60)) AND BETWEEN(AA,SX,XX)) AND BETWEEN(SX,EMA90,AA)) AND BETWEEN(EMA90,EMA120,SX)),5){XG51};
UY:=((中粘Y AND CROSS(CLOSE,EMA60)) AND CROSS(CLOSE,EMA90)){XG51};
中粘T:=COUNT((((BETWEEN(XX,EMA90,EMA120) AND BETWEEN(EMA90,EMA30,XX)) AND BETWEEN(EMA30,EMA60,EMA90)) AND BETWEEN(EMA60,SX,EMA30)),5){XG51};
UT:=(中粘T AND CROSS(CLOSE,XX)){XG51};
中粘R:=COUNT(((BETWEEN(EMA60,SX,AA) AND BETWEEN(EMA90,SX,EMA60)) AND BETWEEN(EMA120,SX,EMA60)),5){XG51};
UR:=(((中粘R AND CROSS(CLOSE,EMA60)) AND CROSS(CLOSE,EMA90)) AND CROSS(CLOSE,EMA120)){XG51};
中粘W:=COUNT((((BETWEEN(EMA30,AA,XX) AND BETWEEN(EMA120,EMA60,EMA30)) AND BETWEEN(EMA60,EMA90,EMA120)) AND BETWEEN(EMA90,SX,EMA60)),5){XG51};
UW:=(中粘W AND CROSS(CLOSE,EMA120)){XG51};
中粘J:=COUNT(((BETWEEN(EMA90,SX,EMA120) AND BETWEEN(EMA60,SX,EMA120)) AND BETWEEN(SX,EMA30,EMA60)),5){XG51};
UJ:=((中粘J AND CROSS(CLOSE,EMA60)) AND CROSS(CLOSE,SX)){XG51};
中线粘:=((((((((((((UA OR UB) OR UC) OR UD) OR UE) OR UF) OR UG) OR UH) OR UY) OR UT) OR UR) OR UW) OR UJ){XG51};
stICKLINE(中线粘,LOW,(LOW - 0.09),4,0),COLOR00FFFF{XG51};
DRAWTEXT(中线粘,(LOW - 0.11),'中线粘'),COLOR00FFFF{XG51};
AAL:=((((EMA60 + EMA90) + EMA120) + EMA250) / 4){XG51};
SXL:=((AAL * (1 / 100)) + AAL){XG51};
XXL:=(AAL - (AAL * (1 / 100))){XG51};
长粘A:=COUNT((((BETWEEN(EMA60,XXL,EMA90) AND BETWEEN(EMA90,EMA60,AAL)) AND BETWEEN(EMA120,AAL,EMA250)) AND BETWEEN(EMA250,SXL,EMA120)),5){XG51};
WA:=((长粘A AND CROSS(CLOSE,EMA120)) AND CROSS(CLOSE,EMA250)){XG51};
长粘B:=COUNT((((BETWEEN(EMA90,AAL,XXL) AND BETWEEN(AAL,EMA90,EMA60)) AND BETWEEN(EMA60,AAL,EMA250)) AND BETWEEN(SXL,EMA60,EMA250)),5){XG51};
WB:=(((长粘B AND CROSS(CLOSE,EMA120)) AND CROSS(CLOSE,EMA90)) AND CROSS(CLOSE,EMA250)){XG51};
长粘C:=COUNT((((BETWEEN(EMA120,EMA90,XXL) AND BETWEEN(EMA90,AAL,EMA120)) AND BETWEEN(EMA60,EMA250,AAL)) AND BETWEEN(EMA250,SXL,EMA60)),5){XG51};
WC:=((长粘C AND CROSS(CLOSE,EMA120)) AND CROSS(CLOSE,EMA90)){XG51};
长粘D:=COUNT((((BETWEEN(EMA120,AAL,XXL) AND BETWEEN(EMA90,AAL,XXL)) AND BETWEEN(EMA60,SXL,AAL)) AND BETWEEN(EMA250,SXL,AAL)),5){XG51};
WD:=((长粘D AND CROSS(CLOSE,EMA60)) AND CROSS(CLOSE,EMA250)){XG51};
长粘E:=COUNT(((BETWEEN(EMA60,EMA90,XXL) AND BETWEEN(EMA90,EMA120,EMA60)) AND BETWEEN(SXL,EMA250,AAL)),5){XG51};
WE:=((长粘E AND CROSS(CLOSE,EMA120)) AND CROSS(CLOSE,EMA250)){XG51};
长粘F:=COUNT((((BETWEEN(XXL,EMA60,AAL) AND BETWEEN(EMA90,EMA250,AAL)) AND BETWEEN(EMA250,EMA120,EMA90)) AND BETWEEN(EMA120,SXL,EMA250)),5){XG51};
WF:=((长粘F AND CROSS(CLOSE,EMA60)) AND CROSS(CLOSE,EMA250)){XG51};
长粘G:=COUNT((((BETWEEN(EMA250,EMA60,XXL) AND BETWEEN(EMA60,EMA250,AAL)) AND BETWEEN(EMA90,EMA250,SXL)) AND BETWEEN(EMA120,SXL,EMA250)),5){XG51};
WG:=(((长粘G AND CROSS(CLOSE,EMA250)) AND CROSS(CLOSE,EMA60)) AND CROSS(CLOSE,EMA120)){XG51};
长粘H:=COUNT(((BETWEEN(EMA60,EMA90,EMA30) AND BETWEEN(EMA90,EMA120,EMA60)) AND BETWEEN(EMA120,AAL,EMA90)),5){XG51};
WH:=(((长粘H AND CROSS(CLOSE,EMA60)) AND CROSS(CLOSE,EMA90)) AND CROSS(CLOSE,EMA120)){XG51};
长粘:=(((((((WA OR WB) OR WC) OR WD) OR WE) OR WF) OR WG) OR WH){XG51};
STICKLINE(长粘,LOW,(LOW - 0.08),4,0),COLORFFCC66{XG51};
DRAWTEXT(长粘,(LOW - 0.1),'长线粘'),COLORFFCC66{X*G!5+1*C*N*{};

源码正文：

mms:=ma(SMA((L+H+2*C)/4-REF((L+H+2*C)/4,1),5,1)/SMA(Abs((L+H+2*C)/4-REF((L+H+2*C)/4,1)),5,1)*100,1)+50{XG51};
G1:=IF(-MMS>95,0,20){XG51};
UOO:=(-(((CLOSE-LLV(CLOSE,7))/(HHV(CLOSE,7)-LLV(CLOSE,7))*100=100)>0 AND G1)+1){XG51};
KS:=(((CLOSE - ema(CLOSE,13)) / EMA(CLOSE,13)) * (0 -100)){XG51};
KS1:=IF(BARSCOUNT(C)=1,C/10000,(1-C/SMA(C,13,1))*100){XG51};
X1:=EMA(((KS/ 10) + EMA(CLOSE,10)),3);AA:=-100*(X1-CLOSE)/X1{XG51};
ac:=(EMA(AA,5));ssl:=EMA(CLOSE,3);MMV:=EMA(((SLOPE(CLOSE,22) * 20) +CLOSE),55){XG51};
MM:=MA(MMV,1);SA:=(MM*0.985);SS:=(MA(CLOSE,5));DD:=(MA(CLOSE,13));GG:=(MA(CLOSE,21)){XG51};
X2:IF(((SSL>MM)),MM,SA),LINETHICK2,COLORFF00FF{XG51};
Y1:=dma(((CLOSE+ OPEN) / 2),(vol / (SMA(VOL,4,1)*4))){XG51};
上开:=O{XG51};
上收:=C{XG51};
上高:=H;上低:=L{XG51};
JJ:=(上开+上高+上低)/3;A:=EMA(JJ,4){XG51};
X3:A,COLORBLUE,LINETHICK1{XG51};
B:=REF(A,1){XG51};
stICKLINE(((SSL<MM)),X2,X3,0.01,0),COLORFFFF00{XG51};
VA1:=EMA(上收,8){XG51};
VA2:=EMA(上收,20){XG51};
选手Ａ:=MA(上收,3){XG51};
箱顶Ａ:=MA(REF(HHV(上收,6),1),3){XG51};
箱底Ａ:=MA(REF(LLV(上收,3),1),3){XG51};
T1:=MA(上收,20)>=REF(MA(上收,20),1){XG51};
T2:=crOSS(选手Ａ,箱底Ａ) AND 箱顶Ａ/箱底Ａ>100/100 AND T1{XG51};
T3:=CROSS(箱顶Ａ,选手Ａ) AND 箱顶Ａ/箱底Ａ>100/100{XG51};
选手:=MA(上收,2){XG51};
箱顶:MA(REF(HHV(上收,30),1),2),COLOR0000FF{XG51};
箱底:MA(REF(LLV(上收,30),1),2),COLOR00FF00{XG51};
T4:=CROSS(选手,箱底) AND 箱顶/箱底>110/100{XG51};
T5:=CROSS(箱顶,选手) AND 箱顶/箱底>110/100{XG51};
VAR1:=(上收-LLV(上低,27))/(HHV(上高,27)-LLV(上低,27))*100{XG51};
VAR2:=SMA(VAR1,3,1);VAR3:=SMA(VAR2,3,1);VAR4:=SMA(VAR3,3,1);MA20:=MA(C,20){XG51};
MA30:=MA(C,30);QSXS:=MA20>MA30 AND MA20>REF(MA20,1) AND MA30>REF(MA30,1){XG51};
ZF:=(C/REF(C,1)-1)*100;Tddf:=(L/REF(C,1)-1)*100<=-5 AND (REF(HHV(H,5),1)/L-1)*100>=10{XG51};
N1:=BArslAST(CROSS(C,MA(C,5)));N2:=BARSLAST(CROSS(MA(C,5),C)){XG51};
HM:=IF(N1<N2,N1+1,0)*QSXS;Z2:=HM=1 AND ZF>=0 AND C>O AND QSXS{XG51};
KX1:=ZF<=-3 AND C<O;XDSJ:=BARSLAST(KX1);KX2:=ZF>=3 AND C>O{XG51};
JBY:=KX2 AND XDSJ<=2 AND C>=REF(O*0.99,XDSJ) AND ZF>ABS(REF(ZF,XDSJ)*0.99){XG51};
Z3:=IF(FILTER(JBY,1) AND QSXS,5,0);DRAWTEXT(Z2 AND Z3 ,LOW*0.99,'送钱'),COLORFF0080{XG51};
涨家数:INDEXADV,NODRAW,COLORMAGENTA {XG51};
跌家数:INDEXDEC,NODRAW,COLORCYAN{XG51};
C3:=REF(C,1){XG51};
涨停:=IF((C-C3)*100/C3>=(10-0.01*100/C3),1,0){XG51};
STICKLINE(涨停,OPEN,CLOSE,2.5,0),COLORWHITE{XG51};
跌停:=IF((C3-C)*100/C3>=(10-0.01*100/C3),1,0){XG51};
STICKLINE(跌停,OPEN,CLOSE,2.5,0),COLORCYAN{X.G?5?1.C.N.{};