通达信红色轨道主图未加密选股指标公式源码

源码正文：

ma5:MA(CLOSE,5){XG51};
MA10:MA(CLOSE,10){XG51};
MA30:MA(CLOSE,30){XG51};
MA60:MA(CLOSE,60){XG51};
红轨道:=MA(MA(CLOSE,3),1),LINETHICK1,COLORBLUE{XG51};
绿轨道:=MA(MA(CLOSE,3),3){XG51};
上升:IF(红轨道>=绿轨道,绿轨道,DRAWNULL),COLORWHITE,LINETHICK3{XG51};
AA1:=3*SMA((C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100,3,1)-2*SMA(SMA((C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100,3,1),3,1){XG51};
加仓:=IF(crOSS(AA1,REF(AA1+0.01,1)) AND LLV(AA1,2)=LLV(AA1,8) AND BETWEEN(AA1,20,60),1,0){XG51};
波段底:=(3)*(SMA(((CLOSE - LLV(LOW,27))/(HHV(HIGH,27) - LLV(LOW,27)))*(100),5,1)) -
(2)*(SMA(SMA(((CLOSE - LLV(LOW,27))/(HHV(HIGH,27) - LLV(LOW,27)))*(100),5,1),3,1)){XG51};
DRAWICON(加仓,L*0.97,7){XG51};
DRAWICON(CROSS(波段底,3),L*0.97,1){XG51};
A:=(3*C+L+O+H)/6{XG51};
X:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+
14*REF(A,6)+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12)
+7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+
REF(A,20))/210{XG51};
mtm:=C-REF(C,1){XG51};
DX:=100*ema(EMA(MTM,6),6)/EMA(EMA(Abs(MTM),6),6){XG51};
CB:=EMA(X,13){XG51};
卖:=IF(HHV(DX,2)=HHV(DX,7) AND COUNT(DX>50,2) AND CROSS(MA(DX,2),DX),1,0){XG51};
DRAWTEXT(FILTER(卖=1,1),HIGH*1.02,'卖'),COLORRED{XG51};
买:=IF(LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2)),1,0){XG51};
DRAWTEXT(FILTER(买=1,5),LOW-0.03,'买'),COLORWHITE{XG51};
RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100{XG51};
K:=SMA(RSV,3,1){XG51};
D:=SMA(K,3,1){XG51};
J:=3*K-2*D{XG51};
BDGD:=HHV(J,2)=HHV(J,8) AND J>80{XG51};
注意:=IF(CROSS(REF(J-0.01,1),J) AND REF(BDGD,1),1,0){XG51};
DRAWTEXT(注意 AND 卖!=1,HIGH*1.02,'减'),COLORLIGREEN{XG51};
加仓A:=SMA(EMA((C-REF(C,1))/REF(C,1),5)*100,3,1)*10{XG51};
DRAWTEXT(FILTER((CROSS(加仓A,0) OR CROSS(CLOSE,CB)) AND 买!=1,3),LOW-0.03,'加'),COLOR0080FF{XG51};
MA18:=MA(C,18){XG51};
跟:=IF(MA18>=REF(MA18,3) AND CROSS(CLOSE,MA18),1,0){XG51};
DRAWTEXT(MA18>=REF(MA18,3) AND CROSS(CLOSE,MA18),LOW*0.96,'跟'),COLOR7F52AF{XG51};
买价:=((C-REF(MA5,1))/5+MA5)*1.004;
买条件:=CROSS(C,买价) AND 买价>REF(买价,1);
醉白K买进:IF(买条件,L,H),COLORRED,POINTDOT;
stICKLINE(买条件,H,L,0,1),COLORRED,LINETHICK2;
STICKLINE(买条件,O,C,4,1),COLORRED,LINETHICK2;
加码价:=((C-REF(MA10,1))/20+MA10)*1.004;
加码条件:=CROSS(C,加码价) AND 加码价>REF(加码价,1);
醉黄K加码:IF(加码条件,L,H),COLORBLUE,POINTDOT;
STICKLINE(加码条件,H,L,0,1),COLORBLUE,LINETHICK2;
STICKLINE(加码条件,O,C,4,1),COLORBLUE,LINETHICK2{X_G_5_1_C_N_{};

源码正文：

ZT1:=C/REF(C,1)>1.0975 AND C=H;TS:=BArslAst(ZT1){XG51};
ZJ:=IF(TS<=16,DRAWLINE(ZT1,(H+L)/2,ISLASTBAR,REF((H+L)/2,TS),1),DRAWNULL){XG51};
ma30:=MA(C,30);CPXA:=(3*CLOSE+OPEN+LOW+HIGH)/6{XG51};
CPXB:=(20*CPXA+19*REF(CPXA,1)+18*REF(CPXA,2)+17*REF(CPXA,3)+16*REF(CPXA,4)+15*REF(CPXA,5)+14*REF(CPXA,6)+13*REF(CPXA,7)+12*REF(CPXA,8)+11*REF(CPXA,9)+10*REF(CPXA,10)+9*REF(CPXA,11)+8*REF(CPXA,12)+7*REF(CPXA,13)+6*REF(CPXA,14)+5*REF(CPXA,15)+4*REF(CPXA,16)+3*REF(CPXA,17)+2*REF(CPXA,18)+1*REF(CPXA,19))/210{XG51};
ZT:=IF(REF(C,1)*1.1-C<0.01 ,1,0);LC:=REF(CLOSE,1){XG51};
CZX:=SMA(MAX(CLOSE-LC,0),2,1)/SMA(Abs(CLOSE-LC),2,1)*100{XG51};
ZCX:=45;ZCX2:=50;CDX:=20{XG51};
PP2:=CZX<ZCX2 AND REF(CZX,1)>ZCX2 ;PP:=CZX<ZCX AND REF(CZX,1)>ZCX ;PP3:=CZX<CDX AND REF(CZX,1)>CDX{XG51};
HH:=COUNT(ZT,9)>=1{XG51};
DDDD:=(PP2 AND HH OR PP AND HH OR PP3 AND HH){XG51};
A:=SMA(L,4,3) ;ZF:=(C-REF(C,1))/REF(C,1)*100{XG51};
ZT9:=INTPART(SUM(ZF>9.9,9)){XG51};
LSMR:=IF (((A AND REF(PP,1) AND HH AND ZT9) OR (A AND REF(PP3,1) AND HH AND ZT9) OR (A AND REF(PP2,1) AND HH AND ZT9)),1,0 ){XG51};
LT:=(CAPITAL/100)/10000<=10{XG51};
XG1:LSMR AND REF(LSMR,1) AND CZX>REF(CZX,1) AND LT{XG51};
XG2:LSMR AND REF(LSMR,2) AND CZX>REF(CZX,1) AND LT{XG51};
XG3:REF(LSMR,1) AND CZX>REF(CZX,1) AND LT AND REF(CZX,1)<REF(CZX,2){XG51};
JD30:=ATAN((MA30/REF(MA30,1)-1)*100)*180/3.14159{XG51};
AA30:=JD30>5{XG51};
AA:=REF((H+L)/2,TS){XG51};
XG:XG1 OR XG2 OR XG3 AND C>MA30 AND C>CPXB AND C>AA{XG51};
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100{XG51};
K:=SMA(RSV,3,1){XG51};
D:=SMA(K,3,1){XG51};
第二波选股:COUNT(C/REF(C,1)>=1.09925,20)>=1
AND REF(K,1)<16 AND K>=REF(K,1),COLORWHITE{X=G_5_1=C=N={};