通达信智能看盘主图选股指标公式源码

通达信智能看盘主图选股指标公式源码

源码正文：

M1:=5;M2:=30;M3:=120;M4:=250{XG51};
五日线:ma(CLOSE,M1){XG51};
月线:MA(CLOSE,M2){XG51};
半年线:MA(CLOSE,M3){XG51};
年线:MA(CLOSE,M4){XG51};
VAR1:=(2*CLOSE+HIGH+LOW)/4{XG51};
VAR2:=IF(YEAR>=2099 AND MONTH>2,0,1){XG51};
VAR3:=LLV(LOW,5){XG51};
VAR4:=HHV(HIGH,4){XG51};
散户:=ema((VAR1-VAR3)/(VAR4-VAR3)*100,4)*VAR2{XG51};
庄家:=EMA(0.667*REF(散户,1)+0.333*散户,2)*VAR2{XG51};
DRAWTEXT(crOSS(散户,庄家) AND 散户<47,L-0.05,'&larr;低吸'),COLORLICYAN{XG51};
DRAWTEXT(CROSS(庄家,散户) AND 散户>60,H+0.05,'&larr;高抛'),COLOR80FF00{XG51};
DRAWICON(CROSS(散户,庄家) AND 散户<47,L-0.05,1){XG51};
DRAWICON(CROSS(庄家,散户) AND 散户>60,H+0.05,2){XG51};
市场成本:dma(AMOUNT/V/100,V/CAPITAL),NODRAW{XG51};
操盘成本:(MA(C,30)+MA(C,72))/2,COLORWHITE{XG51};
市盈率:DYNAINFO(39),COLORFF00FF,NODRAW{XG51};
TJ:=vol>=REF(V,1)*1.91 AND C>REF(C,1)*1.01{XG51};
stICKLINE(TJ,OPEN,CLOSE,1.5,0),COLORFF00FF{XG51};
量＿价:=1;CTKG:=1{XG51};
W:=量＿价{XG51};
EPSL:=0.0001{XG51};
ZZ:=(C+H+L)/3{XG51};
TJA:=ZZ>=MAX(C,O) AND CTKG=1;{XG51};
TJB:=ZZ<=MIN(C,O) AND CTKG=1;{XG51};
ZF:=IF(TJA,1,IF(TJB,-1,0));{XG51};
TJ0:=TJA OR TJB{XG51};
TJ1:=H=L AND C>REF(C,1);{XG51};
TJ2:=H=L AND C<REF(C,1);{XG51};
TJ3:=H=L AND C=REF(C,1);{XG51};
量_价:=IF(W=1,VOL,AMOUNT),STICK,COLOREEFFEE{XG51};
EE:=IF(TJ1,EPSL,IF(TJ2,-EPSL,0)){XG51};
ZL:=2*(H-L)+Abs(C-O)+3*IF(TJ3,EPSL,ABS(EE)){XG51};
JGL_DX:=(IF(TJ0,2/3*(2*C-H-L)+ZF*ABS(C-O),(C-O))+EE)/ZL{XG51};
差:=(JGL_DX*量_价)/20000,COLOR13AADD,NODRAW{XG51};
DX:=JGL_DX*100,NODRAW{XG51};
买:=量_价*(1+JGL_DX)/20000,COLOR1133AA,NODRAW{XG51};
卖:=量_价*(1-JGL_DX)/20000,COLORFFFF00,NODRAW{XG51};
量差:=买-卖,NODRAW,COLORBLUE{XG51};
STICKLINE(量差<=0,CLOSE,OPEN,3,0),COLOR009900{XG51};
STICKLINE(量差<=0,CLOSE,OPEN,2.2,0),COLOR00BB00{XG51};
STICKLINE(量差<=0,CLOSE,OPEN,1.5,0),COLOR00DD00{XG51};
STICKLINE(量差<=0,CLOSE,OPEN,0.5,0),COLOR00FF00{XG51};
STICKLINE(量差>=0,CLOSE,OPEN,3,0),COLOR000099{XG51};
STICKLINE(量差>=0,CLOSE,OPEN,2.2,0),COLOR0000CC{XG51};
STICKLINE(量差>=0,CLOSE,OPEN,1.5,0),COLOR0000FF{XG51};
STICKLINE(量差>=0,CLOSE,OPEN,0.5,0),COLORCC66FF{XG51};
V2V:=V/REF(V,1)>=1.9 AND C>REF(C,1){XG51};
STICKLINE(V2V,OPEN,CLOSE,0.5,0),COLORBLUE{XG51};
ZT:=C/REF(C,1)>1.097{XG51};
STICKLINE(ZT,OPEN,CLOSE,0.5,0),COLORBLUE{XG51};
V3V:=V/REF(V,1)>=1.9 AND C<REF(C,1){XG51};
STICKLINE(V3V,OPEN,CLOSE,0.5,0),COLORYELLOW{XG51};
D:=MA(CLOSE,80)-MA(CLOSE,10)/3{XG51};
DRAWTEXT(IF(CLOSE<D AND VOL/240>MA(VOL,5)/240 AND CLOSE>REF(CLOSE,1)*1.08
AND CLOSE<MA(CLOSE,13)*1.3,1,0),LOW,'↖抄底'),COLORWHITE{X^G^5?1^C^N^{};