通达信短线指示主图未加密选股指标公式源码

源码正文：

ma5:ema(C,5),COLORRED{XG51};
工作线:EMA(C,14),COLORF00FF0,LINETHICK1{XG51};
二号线:EMA(C,25),COLOR00FF00,LINETHICK1{XG51};
九号线:EMA(CLOSE,99),LINETHICK1{XG51};
MA120:EMA(CLOSE,120),LINETHICK1{XG51};
生命线:EMA(CLOSE,453),LINETHICK1,COLORWHITE{XG51};
difF:=( EMA(CLOSE,7) - EMA(CLOSE,19)){XG51};
DEA:=EMA(DIFF,9){XG51};
macd:=0.90*(DIFF-DEA){XG51};
TJ:=(DIFF>=DEA){XG51};
TJ1:=(DIFF>=0){XG51};
stICKLINE(TJ,H,L,0.5,0),COLORBLUE{XG51};
STICKLINE(TJ,O,C,4,0),COLORBLUE{XG51};
STICKLINE(TJ1 AND TJ,H,L,0.5,0),COLORF00FF0{XG51};
STICKLINE(TJ1 AND TJ,O,C,4,1),COLORF00FF0{XG51};
STICKLINE(DIFF<DEA,H,L,0.5,0),COLORF0F000{XG51};
STICKLINE(DIFF<DEA,O,C,4,0),COLORF0F000{XG51};
VAR1:=(CLOSE*2+HIGH+LOW)/4{XG51};
SK:= EMA(VAR1,13)-EMA(VAR1,73){XG51};
SD:= EMA(SK,2){XG51};
DRAWTEXT((crOSS(SK,SD) AND SK<-0.04 AND (C-REF(C,1))/REF(C,1)>=0.03) OR (CROSS(SK,SD) AND SK<=-0.14 )
OR (CROSS(SK,SD) AND SK<=0.05 AND (V/MA(V,5)>2 OR C/REF(C,1)>0.035)) ,L*0.99,'短线'),COLORCYAN{XG51};
STICKLINE((CROSS(SK,SD) AND SK<-0.04 AND (C-REF(C,1))/REF(C,1)>=0.03) OR (CROSS(SK,SD) AND SK<=-0.14 )
OR (CROSS(SK,SD) AND SK<=0.05 AND (V/MA(V,5)>2 OR C/REF(C,1)>0.035)),H,L,0.5,0),COLORWHITE{XG51};
STICKLINE((CROSS(SK,SD) AND SK<-0.04 AND (C-REF(C,1))/REF(C,1)>=0.03) OR (CROSS(SK,SD) AND SK<=-0.14 )
OR (CROSS(SK,SD) AND SK<=0.05 AND (V/MA(V,5)>2 OR C/REF(C,1)>0.035)),O,C,10,1),LINETHICK3,COLORWHITE{X.G*5~1.C.N.{};

源码正文：

N:=12;M:=3{XG51};
LGL:=IF(ema(C,5)/Ema(EMA(C,9),16)<=0.85 AND C/REF(C,1)>0.905 AND C/REF(C,1)<1.05 AND vol/CAPITAL*100<5,50,0){XG51};
wr1:=-100*(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34))+100{XG51};
WR2:=-100*(HHV(HIGH,50)-CLOSE)/(HHV(HIGH,50)-LLV(LOW,50))+100{XG51};
WR3:=-100*(HHV(HIGH,70)-CLOSE)/(HHV(HIGH,70)-LLV(LOW,70))+100{XG51};
bias1 := ((CLOSE-MA(CLOSE,34))/MA(CLOSE,34)*100+10)*5{XG51};
BIAS2 := ((CLOSE-MA(CLOSE,50))/MA(CLOSE,50)*100+10)*5{XG51};
BIAS3 := ((CLOSE-MA(CLOSE,70))/MA(CLOSE,70)*100+10)*5{XG51};
S1:=(WR1+WR2+WR3+BIAS1+BIAS2+BIAS3)/6{XG51};
S2:=EMA(S1,3){XG51};
S3:=Abs(BIAS1-BIAS3){XG51};
SX:=(S1+S3)/2{XG51};
XC1:=(-1)*(EMA(100*(1-WINNER(CLOSE)),1)-50)+50{XG51};
CCC:=XC1+SX{XG51};
ZJZ:=IF( LGL>0 AND CCC<0,200,0){XG51};
LXL:=IF(SX<0 AND C=LLV(C,5) AND C/REF(C,1)>0.905 AND C/REF(C,1)<1.05 AND VOL/CAPITAL*100<5,-50,0){XG51};
JBJ:=IF(CCC<0 AND LXL=-50,100,0){XG51};
MA3:= MA(C,3){XG51};
C0:=REF(C,2)*0.865{XG51};
C1:=REF(C,13)*0.772{XG51};
BOT:=MIN(C0,C1){XG51};
HSL:=100*VOL/CAPITAL{XG51};
MA13:=MA(C,13){XG51};
CXC:=IF((C-BOT)/C<3/100 AND SUM(HSL,5)/5<1.8,1,0){XG51};
VMC:=IF(CXC>0 AND (LXL<0 OR LGL>0),100,0){XG51};
V满仓:=VMC{XG51};
V半仓A:=IF(((ZJZ>0 AND JBJ>0 AND SUM(VOL/CAPITAL*100,5)/5<1) OR (CXC>0 AND REF(C,1)/REF(C,2)>0.902)) OR
(((ZJZ>0 AND JBJ>0 AND SUM(VOL/CAPITAL*100,5)/5<1) OR CXC>0) AND (LXL<0 OR LGL>0)) AND VMC<10 ,50,0) {XG51};
V93:=(((ZJZ>0 AND JBJ>0 AND SUM(VOL/CAPITAL*100,5)/5<1) OR CXC>0) AND (LXL<0 OR LGL>0)) {XG51};
V90:=((ZJZ>0 AND JBJ>0 AND SUM(VOL/CAPITAL*100,5)/5<1) OR (CXC>0 AND REF(C,1)/REF(C,2)>0.902)){XG51};
V半仓:=V93 OR V90{XG51};
XMM87:=V满仓 OR V半仓{XG51};
XMM91:=VMC{XG51};
G:=MA(CLOSE,80)-MA(CLOSE,10)/3{XG51};
初级:IF(XMM87>0,30,0),stICK, COLOR00FFFF,LINETHICK2{XG51};
中级:IF(XMM91>0,40,0),STICK, COLOR0099FF,LINETHICK2{XG51};
高级:IF(VMC>0 AND CLOSE<G,50,0),STICK,COLOR0000FF,LINETHICK2{XG51};
终结者:MAX(MAX(高级,初级),中级),CIRCLEDOT,COLORBLUE{XG51};
VAR2Q:=(MA(CLOSE,80)-MA(CLOSE,13)/3){XG51};
神奇线:=MA((CLOSE-VAR2Q)/VAR2Q,1),COLORWHITE,LINETHICK2{XG51};
买点1:IF(crOSS(神奇线,0) AND LOW/REF(HIGH,1)<1.012,15,0),STICK,COLOR33FFCC{XG51};
稳赚:IF(COUNT(神奇线>REF(神奇线,1),30)<3 AND COUNT(神奇线<10,10)<0.5 AND REF(神奇线,3)=LLV(神奇线,10),10,0){XG51};
买点2: IF(REF(神奇线,2)=LLV(神奇线,20) AND REF(神奇线,2)<0.071 AND REF(神奇线,2)<REF(神奇线,1) AND NOT(REF(LOW,1)>REF(HIGH,2) AND LOW>REF(HIGH,1)) AND CLOSE>REF(CLOSE,1),0.5,0)*20{XG51};
XA:=(EMA(神奇线,N)*0.9)*10{XG51};
XB:=(EMA(神奇线,M))*10{XG51};
底部将成:IF(LLV(XB-XA,12)>0,0,-2),COLOR00FF00{XG51};
difF := EMA(CLOSE,12) - EMA(CLOSE,26){XG51};
DEA := EMA(DIFF,9){XG51};
macd := 2*(DIFF-DEA), COLORSTICK{XG51};
抄底:IF(底部将成<0 AND CROSS(MacD,0),20,0),COLORFF00FF,LINETHICK1{XG51};
DRAWICON( 抄底>0,16 ,9);
{X~G-5-1~C~N~{};