通达信小番茄主图未加密选股指标公式源码

源码正文：

P1:=5{XG51};
P2:=4{XG51};
M5:ma(C,5){XG51};
M10:MA(C,10)COLOR0080FF{XG51};
M20:=MA(C,20){XG51};
MA250:MA(CLOSE,250),COLOR808080{XG51};
MA120:MA(CLOSE,120),COLOR808080;RSV:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100{XG51};
K1:=SMA(RSV,3,1){XG51};
D1:=SMA(K1,3,1){XG51};
QR:=(H+L+2*C)/4{XG51};
A1:=COst(1.91){XG51};
A2:=COST(3.82){XG51};
A3:=COST(5){XG51};
A4:=COST(6.18){XG51};
A5:=COST(8.09){XG51};
A7:=C-REF(C,1){XG51};
A8:=100*ema(EMA(A7,6),6)/EMA(EMA(Abs(A7),6),6);SHORT:=7; LONG:=19{XG51};
TFXXS:=INTPART(K1)+INTPART(D1){XG51};
TGL:=(TFXXS-REF(TFXXS,1)){XG51};
VAR1:=REF((LOW+OPEN+CLOSE+HIGH)/4,1){XG51};
VAR2:=SMA(ABS(LOW-VAR1),13,1)/SMA(MAX(LOW-VAR1,0),10,1){XG51};
VAR3:=EMA(VAR2,10){XG51};
VAR4:=LLV(LOW,33){XG51};
VAR5:=EMA(IF(LOW<=VAR4,VAR3,0),3){XG51};
VAR21:=SMA(ABS(HIGH-VAR1),13,1)/SMA(MIN(HIGH-VAR1,0),10,1){XG51};
VAR31:=EMA(VAR21,10){XG51};
VAR41:=HHV(HIGH,33){XG51};
VAR51:=EMA(IF(HIGH>=VAR41,VAR31,0),3){XG51};
VAR78:=C/expma(C,5);RMA:=EMA(CLOSE,SHORT){XG51};
NMA:=EMA(CLOSE,LONG){XG51};
UP:=DRAWLINE(L=LLV(L,BArslAST(crOSS(NMA,RMA))+1),LLV(L,BARSLAST(CROSS(NMA,RMA))+1),H=HHV(H,BARSLAST(CROSS(RMA,NMA))+1),HHV(H,BARSLAST(CROSS(RMA,NMA))+1),0){XG51};
DOWN:=DRAWLINE(H=HHV(H,BARSLAST(CROSS(RMA,NMA))+1),HHV(H,BARSLAST(CROSS(RMA,NMA))+1),L=LLV(L,BARSLAST(CROSS(NMA,RMA))+1),LLV(L,BARSLAST(CROSS(NMA,RMA))+1),0){XG51};
小番茄买进:=(LLV(A8,2)=LLV(A8,7) AND COUNT(A8<0,2) AND CROSS(A8,MA(A8,2))) AND REF(DOWN,1)<REF(DOWN,2) AND UP>REF(DOWN,1){XG51};
COSTT:=(A1+A2+A3+A4+A5)/5{XG51};
COSTT1:=C/COSTT{XG51};
VARD1:=(2*INDEXC+INDEXH+INDEXL)/4{XG51};
VARD2:=LLV(INDEXL,21){XG51};
VARD3:=HHV(INDEXH,8){XG51};
MIJI:=EMA((VARD1-VARD2)/(VARD3-VARD2)*100,9){XG51};
MIJI1:=MIJI-VAR78{XG51};
MIJI2:=MIJI1-REF(MIJI1,1){XG51};
MIJI3:=MIJI-REF(MIJI,1){XG51};
DAPAN:=COSTT1-(MIJI3+0.618*MIJI2)/16.18{XG51};
X1:=(FInaNCE(11)-FINANCE(15))/FINANCE(10)*1.2{XG51};
X2:=(FINANCE(31)+FINANCE(17))/FINANCE(10)*1.4{XG51};
X3:=FINANCE(23)/FINANCE(10)*3.3{XG51};
X4:=FINANCE(19)/FINANCE(15)*0.6{XG51};
X5:=FINANCE(20)/FINANCE(15)*0.999{XG51};
YaoGU:=X1+X2+X3+X4+X5{XG51};
XJF:=CON2STR(FINANCE(25)/FINANCE(15),3){XG51};
YZZ:=CON2STR((FINANCE(19)-FINANCE(22)-FINANCE(27))/FINANCE(19),2){XG51};
VARR1:=LLV(LOW,P1){XG51};
VARR2:=HHV(HIGH,P1){XG51};
K:=EMA((CLOSE-VARR1)/(VARR2-VARR1)*100,P2),COLORCYAN,LINETHICK1{XG51};
D:=EMA(0.667*REF(K,1)+0.333*K,2),COLORWHITE,LINETHICK1{XG51};
DRAWTEXT_FIX(ISLASTBAR AND TGL>=0 AND TGL>REF(TGL,1),0.99,0.01,1,'资金状况：流入加快'),COLOR0202FF{XG51};
DRAWTEXT_FIX(ISLASTBAR AND TGL>=0 AND TGL<=REF(TGL,1),0.99,0.01,1,'资金状况：流入减慢'),COLOR1876E9{XG51};
DRAWTEXT_FIX(ISLASTBAR AND TGL<0 AND TGL>REF(TGL,1),0.99,0.01,1,'资金状况：流出减慢'),COLOR13B79A{XG51};
DRAWTEXT_FIX(ISLASTBAR AND TGL<0 AND TGL<=REF(TGL,1),0.99,0.01,1,'资金状况：流出加快'),COLOR00CA00{XG51};
DRAWTEXT_FIX(ISLASTBAR AND VAR5>REF(VAR5,1),0.99,0.15,1,'典型吸筹行为'),COLOR1876E9{XG51};
DRAWTEXT_FIX(ISLASTBAR AND VAR5<REF(VAR5,1),0.99,0.15,1,'典型洗盘行为'),COLORC08000{XG51};
DRAWTEXT_FIX(ISLASTBAR AND VAR5=REF(VAR5,1),0.99,0.15,1,'无特殊行为'),COLORC0C0C0{XG51};
DRAWTEXT_FIX(ISLASTBAR AND VAR51>REF(VAR51,1),0.99,0.08,1,'主力正在出货'),COLOR00CA00{XG51};
DRAWTEXT_FIX(ISLASTBAR AND VAR51=REF(VAR51,1),0.99,0.08,1,'主力无大动作'),COLORC0C0C0{XG51};
DRAWTEXT_FIX(ISLASTBAR AND DAPAN<COSTT1,0.99,0.22,1,'受大盘拉动'),COLOR0202FF{XG51};
DRAWTEXT_FIX(ISLASTBAR AND DAPAN>=COSTT1,0.99,0.22,1,'受大盘压制'),COLOR00CA00{XG51};
DRAWTEXT_FIX(YAOGU<=0,0.99,0.99,1,'拉升潜力：难于登天'),COLOR00FF00{XG51};
DRAWTEXT_FIX(YAOGU>0 AND YAOGU<=1.2,0.99,0.99,1,'拉升潜力：难度较大'),COLOR3A8B5C{XG51};
DRAWTEXT_FIX(YAOGU>1.2 AND YAOGU<=2.6,0.99,0.99,1,'拉升潜力：尚可一试'),COLOR4747B8{XG51};
DRAWTEXT_FIX(YAOGU>2.6 AND YAOGU<=5.8,0.99,0.99,1,'拉升潜力：较为容易'),COLOR2424DB{XG51};
DRAWTEXT_FIX(YAOGU>5.8,0.99,0.99,1,'拉升潜力：轻而易举'),COLOR0000FF{XG51};
DRAWTEXT_FIX(XJF>=1618,0.99,0.90,1,'过于保守'),COLOR4747B8{XG51};
DRAWTEXT_FIX(XJF>=618 AND XJF<1618,0.99,0.90,1,'保守求稳'),COLOR4747B8{XG51};
DRAWTEXT_FIX(XJF>=100 AND XJF<618,0.99,0.90,1,'收支平衡'),,COLOR0000FF{XG51};
DRAWTEXT_FIX(XJF<100,0.99,0.90,1,'负债过多'),COLOR00FF00{XG51};
DRAWTEXT_FIX(YZZ<85,0.99,0.82,1,'资产质地差'),COLOR00FF00{XG51};
DRAWICON(小番茄买进,H,25);C2:=REF(C,1){XG51};
跌停:=IF((C2-C)*100/C2>=(10-0.01*100/C2),1,0){XG51};
STICKLINE(跌停,O,C,0.5,0),COLOR28D04F{XG51};
STICKLINE(跌停,H,L,0.5,0),COLOR28D04F{XG51};
STICKLINE(跌停,H,L,0.5,0),COLOR28D04F{XG51};
STICKLINE(小番茄买进=1,L,L*1.003,1.71*H,1)COLOR00FFFF{XG51};
DRAWTEXT(小番茄买进,L*0.98,'买'),COLORBLUE{XG51};
STICKLINE(小番茄买进=1,C,O,2,0),COLORAA00AA{XG51};
STICKLINE(小番茄买进=1,H,L,0,0),COLORAA00AA{X-G-5_1-C-N-{};

源码正文：

LOWV:=LLV(LOW,9){XG51};
HIGHV:=HHV(HIGH,9){XG51};
RSV:=ema((CLOSE-LOWV)/(HIGHV-LOWV)*100,3){XG51};
K:=Ema(RSV,3){XG51};
HD:MA(K,3){XG51};
dif:=EMA(CLOSE,6)-EMA(CLOSE,13){XG51};
DEA:=EMA(DIF,5){XG51};
金叉:=(crOSS(K,HD) AND CROSS(DIF,DEA)) OR (CROSS(REF(K,1),REF(HD,1)) AND CROSS(DIF,DEA)) OR (CROSS(K,HD) AND CROSS(REF(DIF,1),REF(DEA,1))){XG51};
DRAWICON(金叉,HD,1){XG51};
死叉:=(CROSS(HD,K) AND CROSS(DEA,DIF)) OR (CROSS(REF(HD,1),REF(K,1)) AND CROSS(DEA,DIF)) OR (CROSS(HD,K) AND CROSS(REF(DEA,1),REF(DIF,1))){XG51};
DRAWICON(死叉,HD,2){XG51};
20;50;90{X.G=5*1.C.N.{};