通达信持仓K线趋势主图未加密选股指标公式源码

源码正文：

A:=DRAWLINE(LOW<=LLV(LOW,120),LOW,HHV(H,6)<=HHV(H,10),LLV(LOW,6),1), COLORYELLOW ,LINETHICK2{XG51};
TY:=C{XG51};
成本:=(ma(CLOSE,60)+MA(CLOSE,70)+MA(CLOSE,90)+MA(CLOSE,108))/4,COLORWHITE,LINETHICK2{XG51};
MA0:MA(C,0)COLORBLUE,LINETHICK2;
K:=(C+H+L)/3{XG51};
D:=MA(K,4){XG51};
阻力:=HHV(D,55),COLORBLUE,LINETHICK2{XG51};
顶部:=HHV(H*0.98,55)COLORFFFFFF,LINETHICK2{XG51};
DRAWTEXT(REF(C,1)<D AND C>D AND D<REF(D,1),L*0.98, 'D'),COLORBLUE,LINETHICK2 {XG51};
TYP:= (HIGH + LOW +2* C)/4{XG51};
均线:=ema(TYP,3),LINETHICK2,COLORRED{XG51};
均线上轨:=HHV(均线,14),LINETHICK2,COLORBLUE{XG51};
均线下轨:=LLV(均线,14),LINETHICK2,COLORCYAN{XG51};
角度:=ATAN((均线/REF(均线,1)-1)*100)*180/3.1416{XG51};
stICKLINE(角度>0,O ,C ,0.5,0 ),COLORWHITE{XG51};
STICKLINE(角度<0,O ,C,0.5 ,0 ),COLORGREEN{XG51};
STICKLINE(角度<0,O,C,3,0),COLORFF6600{XG51};
STICKLINE(角度<0,O,C,2,0),COLORFF9900{XG51};
STICKLINE(角度<0,O,C,1.2,0),COLORFFCC00{XG51};
STICKLINE(角度<0,O,C,0.2,0),COLORGREEN{XG51};
STICKLINE(角度>0,O,C,3,0),COLOR000099{XG51};
STICKLINE(角度>0,O,C,2,0),COLOR0000CC{XG51};
STICKLINE(角度>0,O,C,1.3,0),COLOR0000FF{XG51};
STICKLINE(角度>0,O,C,0.3,0),COLORCC66FF{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(LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND crOSS(DX,MA(DX,2)),1,0){XG51};
DRAWICON(FILTER(买=1,5),L*0.97,23){XG51};
EMA5:EMA(C,5);EMA34:EMA(C,34){XG51};
KS:=(1-C/SMA(C,13,1))*100;RKS:=REF(KS,1){XG51};
MLS:=RKS/KS>1.23 AND RKS>10 AND C/REF(C,1)>1.02{XG51};
超跌:STICKLINE(KS>=10,H,L,0,1),COLORRED,LINETHICK2;
反弹:STICKLINE(MLS=1,H,L,0,1),COLORLIMAGENTA,LINETHICK2;
牛线:EMA(C,13)COLORWHITE,LINETHICK2{XG51};
熊线:EMA(KS*C/100+牛线,3)COLORYELLOW,LINETHICK2{X^G?5~1^C^N^{};

源码正文：

A:=ma(CLOSE,17)+Abs(MA(CLOSE,17)-REF(MA(CLOSE,17),1)){XG51};
B:=MA(CLOSE,17)+MA(CLOSE,17)-REF(MA(CLOSE,17),1){XG51};
分水岭:IF(MA(CLOSE,17)<B,B,MA(CLOSE,17)),COLORFF00FF,LINETHICK2{XG51};
操作线:分水岭-(ema(C,3)-分水岭),COLOR00FFFF,LINETHICK2{XG51};
PM:MA(C,5),COLORRED,LINETHICK2{XG51};
IF(PM>REF(PM,1),PM,DRAWNULL),COLORWHITE,LINETHICK2{XG51};
IF(PM=REF(PM,1),PM,DRAWNULL),COLORWHITE,LINETHICK2{XG51};
IF(PM<REF(PM,1),PM,DRAWNULL),COLORFF9900,LINETHICK2{XG51};
S:=(PM>操作线){XG51};
DD:=分水岭<REF(分水岭,1){XG51};
IF(DD,分水岭,DRAWNULL),COLOR00FF00,LINETHICK2{XG51};
DRAWICON(crOSS(分水岭,操作线),分水岭-0.1,1);
A1:=BArslAst(REF(CROSS("macd.dif","MacD.DEA"),1)){XG51};
B1:=REF(C,A1+1)>C AND REF("MACD.DIF",A1+1)<"MACD.DIF" AND CROSS("MACD.DIF","MACD.DEA"){XG51};
DRAWTEXT(B1>0,L-0.02,'★M'),COLOR00FFFF;
A2:=BARSLAST(REF(CROSS("kdj.K","kdj.D"),1)){XG51};
B2:=REF(C,A2+1)>C AND REF("KDJ.K",A2+1)<"KDJ.K" AND CROSS("KDJ.K","KDJ.D"){XG51};
DRAWTEXT(B2,L-0.10,'◎K'),COLORFF00FF{XG51};
A3:=BARSLAST(REF(CROSS("rsi.RSI1","RSI.RSI2"),1)){XG51};
B3:=REF(C,A3+1)>C AND REF("RSI.RSI1",A3+1)<"RSI.RSI1" AND CROSS("RSI.RSI1","RSI.RSI2"){XG51};
DRAWTEXT(B3>0,L-0.18,'◆R'),COLOR0000FF{XG51};
C1:=BARSLAST(REF(CROSS("MACD.DEA","MACD.DIF"),1)){XG51};
D1:=REF(C,C1+1)<C AND REF("MACD.DIF",C1+1)>"MACD.DIF" AND CROSS("MACD.DEA","MACD.DIF"){XG51};
DRAWTEXT(D1>0,H+0.16,'★M'),COLOR00FF00{XG51};
C2:=BARSLAST(REF(CROSS("KDJ.D","KDJ.K"),1)){XG51};
D2:=REF(C,C2+1)<C AND REF("KDJ.K",C2+1)>"KDJ.K" AND CROSS("KDJ.D","KDJ.K"){XG51};
DRAWTEXT(D2>0,H+0.08,'◎K'),COLORFFFFCC;
C3:=BARSLAST(REF(CROSS("RSI.RSI2","RSI.RSI1"),1)){XG51};
D3:=REF(C,C3+1)<C AND REF("RSI.RSI1",C3+1)>"RSI.RSI1" AND CROSS("RSI.RSI2","RSI.RSI1"){XG51};
DRAWTEXT(D3>0,H+0.04,'◆R'),COLORFF9900;{X=G-5!1=C=N={};