通达信牛熊抓牛神器未加密选股指标公式源码

通达信牛熊抓牛神器未加密选股指标公式源码

源码正文：

上升线:ema(CLOSE,3),COLORWHITE{XG51};
下降线:Ema(CLOSE,5),COLORCYAN{XG51};
中间线:EMA(下降线,5),COLORRED{XG51};
VAR1:=(HIGH+LOW+OPEN+2*CLOSE)/5{XG51};
VAR2:=REF(VAR1,1){XG51};
VAR3:=SMA(CLOSE-VAR2,6,1)/SMA(Abs(CLOSE-VAR2),6,1)*100{XG51};
VAR4:=(CLOSE-REF(OPEN,29))/REF(OPEN,29)*100{XG51};
VAR5:=EMA(0.667*REF(VAR4,1)+0.333*VAR4,5){XG51};
VAR6:=IF(vol>=1.3*MA(VOL,5) AND COUNT(VAR4>=VAR5 AND VAR4<(-17),3) AND REF(LOW,1)=LLV(LOW,120),1,0){XG51};
VAR7:=SMA(MAX(CLOSE-REF(CLOSE,1),0),6,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),6,1)*100{XG51};
VAR8:=SMA(MAX(VAR1-VAR2,0),10,1)/SMA(ABS(VAR1-VAR2),10,1)*100{XG51};
VAR9:=IF(COUNT(VAR8<20,5)>=1 AND COUNT(VAR1=LLV(VAR1,10),10)>=1 AND CLOSE>=OPEN*1.038 AND VOL>MA(VOL,5)*1.2,1,0){XG51};
DRAWICON(FILTER(REF(VAR3,1)>81 AND VAR3<80 OR crOSS(82,VAR7),5),HIGH,2){XG51};
DRAWTEXT(FILTER(REF(VAR3,1)>81 AND VAR3<80 OR CROSS(82,VAR7),5),HIGH,1),COLORBLUE{XG51};
DRAWTEXT(FILTER(VAR9 OR VAR6,5),LOW*0.98,2),COLORWHITE{XG51};
DRAWICON(FILTER(CROSS(上升线,下降线) AND 中间线>=REF(中间线,1) AND VAR3<50,5),上升线,1){XG51};
DRAWTEXT(FILTER(CROSS(上升线,下降线) AND 中间线>=REF(中间线,1) AND VAR3<50,5),LOW*0.98,2),COLORBLACK{XG51};
MA5:MA(CLOSE,5),COLORRED{XG51};
MA10:MA(CLOSE,10),COLORBLUE{XG51};
MA30:MA(CLOSE,30),COLORLIMAGENTA{XG51};
MA60:MA(CLOSE,60),COLORWHITE{XG51};
MA120:MA(CLOSE,120),COLORGREEN{XG51};
DRAWTEXT(CROSS(EMA(CLOSE,2),EMA(SLOPE(CLOSE,21)*20+CLOSE,42)),LOW*0.98,3),COLORF00FF0,LINETHICK3{XG51};
DRAWTEXT(CROSS(EMA(SLOPE(CLOSE,21)*20+CLOSE,42),EMA(CLOSE,2)),HIGH*1.02,4),COLORRED,LINETHICK3{XG51};
stICKLINE(EMA(CLOSE,2)>=EMA(SLOPE(CLOSE,21)*20+CLOSE,42),LOW,HIGH,0,0),COLORWHITE{XG51};
STICKLINE(EMA(CLOSE,2)>=EMA(SLOPE(CLOSE,21)*20+CLOSE,42),CLOSE,OPEN,3,0),COLOR0000AA{XG51};
STICKLINE(EMA(CLOSE,2)>=EMA(SLOPE(CLOSE,21)*20+CLOSE,42),CLOSE,OPEN,2,0),COLOR0000CC{XG51};
STICKLINE(EMA(CLOSE,2)<EMA(SLOPE(CLOSE,21)*20+CLOSE,42),CLOSE,OPEN,2,0),COLORCCCC00{XG51};
STICKLINE(EMA(CLOSE,2)<EMA(SLOPE(CLOSE,21)*20+CLOSE,42),CLOSE,OPEN,3,0),COLORAAAA00{XG51};
STICKLINE(EMA(CLOSE,2)<EMA(SLOPE(CLOSE,21)*20+CLOSE,42),LOW,HIGH,0,0),COLORGREEN{XG51};
STICKLINE(CROSS(EMA(CLOSE,2),EMA(SLOPE(CLOSE,21)*20+CLOSE,42)) OR CROSS(EMA(SLOPE(CLOSE,21)*20+CLOSE,42),EMA(CLOSE,2)),LOW,HIGH,0,0),COLORBLUE{XG51};
STICKLINE(CROSS(EMA(CLOSE,2),EMA(SLOPE(CLOSE,21)*20+CLOSE,42)) OR CROSS(EMA(SLOPE(CLOSE,21)*20+CLOSE,42),EMA(CLOSE,2)),OPEN,CLOSE,3,0),COLOR00AAAA{XG51};
STICKLINE(CROSS(EMA(CLOSE,2),EMA(SLOPE(CLOSE,21)*20+CLOSE,42)) OR CROSS(EMA(SLOPE(CLOSE,21)*20+CLOSE,42),EMA(CLOSE,2)),OPEN,CLOSE,2,0),COLOR00CCCC{X_G_5_1_C_N_{};

通达信VMACD未加密选股指标公式源码

源码正文：

N:=1{XG51};
DRAWGBK(DATE>900101,RGB(110,95,0),RGB(0,20,0),0,'01',0){XG51};
stICKLINE(C>0,0,0,10,0),COLORBROWN{XG51};
ZXJ:=IF((H-maX(C,O))>((MIN(C,O)-L)) AND C>L,((H+2*L)/3+3*C+2*O)/6,
IF((H-MAX(C,O))<((MIN(C,O)-L)) AND C<H,((2*H+L)/3+3*C+2*O)/6,((H+L)/2+3*C+2*O)/6)){XG51};
均价:=IF(PERIOD>=6 AND PERIOD<10,AMOUNT/(vol*100),ZXJ){XG51};
重心:=IF(SETCODE=0,ZXJ,(ZXJ+均价)/2){XG51};
VV:=AMOUNT/100000000{XG51};
LB:=(MA(VV,1)/HHV(VV,0)+MA(VV,1)/HHV(VV,IF(N=0,0,IF(N=1,738,IF(N=2,369,184)))))/2{XG51};
XS:=2{XG51};
S:=IF((H-MAX(C,O))>Abs(C-O)AND (MIN(C,O)-L)<ABS(C-O),(H*0.118+C*0.809+IF(H=C,C,重心)*0.073),(H*0.073+C*0.809+IF(H=C,C,重心)*0.118)){XG51};
X:=IF((MIN(C,O)-L)>ABS(C-O)AND (H-MAX(C,O))<ABS(C-O),(L*0.118+C*0.809+IF(L=C,C,重心)*0.073),(L*0.073+C*0.809+IF(L=C,C,重心)*0.118)){XG51};
SX:=IF(C>REF(C,1)AND H>REF(H,1)AND 重心>REF(重心,1),S,IF(C<REF(C,1)AND L<REF(L,1)AND 重心<REF(重心,1),X,C)){XG51};
QR:=(0.809*C+0.191*SX){XG51};
obv:=SUM(IF(QR>REF(QR,1),VV,IF(QR<REF(QR,1),-VV,0)),180){XG51};
WOBV:=(WMA(OBV,2)+WMA(OBV,4)+WMA(OBV,8))/3{XG51};
SaoBV:=(WMA(WOBV,24)+WMA(WOBV,6)+WMA(WOBV,12))/3,COLORFAABEC{XG51};
SBOBV:=(WMA(SAOBV,24)+WMA(SAOBV,6)+WMA(SAOBV,12))/3{XG51};
SKOBV:=(WMA(SBOBV,24)+WMA(SBOBV,6)+WMA(SBOBV,12))/3{XG51};
SOOBV:=(WMA(SKOBV,24)+WMA(SKOBV,6)+WMA(SKOBV,12))/3{XG51};
SWOBV:=((WOBV+SBOBV)/2+SAOBV)/2,LINETHICK2{XG51};
DLV21:=ema(SWOBV,13){XG51};
DLV36:=EMA(SWOBV,34){XG51};
DLV60:=EMA(SWOBV,55){XG51};
ROBY:=dma(SWOBV,LB/XS){XG51};
SOBV:=DMA(SWOBV,LB/XS/XS){XG51};
YOBV:=DMA(SWOBV,LB/XS/XS/XS){XG51};
SSOBC:=DMA(SWOBV,LB/XS/XS/XS/XS),COLORFAABEC,COLORWHITE,LINETHICK2{XG51};
LOBV:=DMA(SWOBV,LB/XS/XS/XS/XS/XS),COLOR00BB00{XG51};
QROBV:(((SOBV-SSOBC)/2+(YOBV-SSOBC))/2+(((WOBV-SBOBV)/2+SAOBV-SBOBV)/2+(SWOBV-DLV21)+((DLV21-DLV60)/2+DLV36-DLV60)/2))/4,COLOR00CCCC{XG51};
MQR:MA(QROBV,8),COLORBROWN{XG51};
DRAWBAND(QROBV,RGB(213,43,43),MQR,RGB(14,1,254)){XG51};
OBC:((SOBV-SSOBC+ROBY-YOBV)/2+(WOBV-SBOBV+(WOBV-SOOBV)/2+SAOBV-SKOBV)/3+DLV21-DLV60)/3,COLOR7F00FF,LINETHICK2{XG51};
MOBV:MA(OBC,4),COLORGREEN{XG51};
KOBV:=2*(OBC-MOBV){XG51};
DOBV:2*(QROBV-MQR),COLORSTICK{XG51};
macdOBV:(KOBV+DOBV)/2,COLORSTICK,COLORWHITE{XG51};
STICKLINE(MacDOBV>=0,0,MACDOBV,5,1),COLORWHITE{XG51};
STICKLINE(MACDOBV<0,0,MACDOBV,5,1),COLOR00BB00{XG51};
STICKLINE(DOBV>=0,0,DOBV,0,0),COLOR00CCCC{XG51};
STICKLINE(DOBV<0,0,DOBV,0,0),COLORGREEN{XG51};
OBVH1:=REF(MACDOBV/2,BArslAST(MACDOBV=HHV(MACDOBV,34))),COLOR0099FF,LINETHICK1{XG51};
OBVH2:REF(MACDOBV/2,BARSLAST(MACDOBV=HHV(MACDOBV,72))),COLORRED,LINETHICK1{XG51};
OBVL1:=REF(MACDOBV/2,BARSLAST(MACDOBV=LLV(MACDOBV,34))),COLORBROWN,LINETHICK2{XG51};
OBVL2:=REF(MACDOBV/2,BARSLAST(MACDOBV=LLV(MACDOBV,144))),COLOR0099FF,LINETHICK2{XG51};
大行情:=NOT(REF(OBVH1,1)=REF(OBVH2,1)) AND OBVH1=OBVH2{XG51};
DRAWTEXT(MACDOBV>OBVH1,OBVL2*2,'*'),COLORRED{XG51};
DRAWTEXT(大行情,OBVH2*4,'★'),COLORWHITE{XG51};
QGOBV:=REF(HHV(MOBV,9),1),COLORFAABEC{XG51};
QDOBV:=REF(LLV(MOBV,9),1),COLORAAAA00{XG51};
资金粘:=(MAX(OBC,MAX(MOBV,QROBV))-MIN(OBC,MIN(MOBV,QROBV)))/ABS(MIN(OBC,MIN(MOBV,QROBV)))*10{XG51};
ZJGL:=(((OBC-MOBV)/ABS(MOBV)+(QROBV-MQR)/ABS(MQR)+((OBC-QROBV)/ABS(QROBV)+(MOBV-MQR)/ABS(MQR))/2)/3)*10{XG51};
DSGL:=(((OBC-MOBV)/ABS(MOBV)+(OBC-QGOBV)/ABS(QGOBV)+(MOBV-QDOBV)/ABS(QDOBV))/3)*10{XG51};
SGL:=(ZJGL+DSGL)/2{XG51};
DRAWTEXT(crOSS(ZJGL,0)AND OBC>REF(OBC,1),QROBV*0.8,'★'),COLORBLUE{XG51};
DRAWTEXT(CROSS(DSGL,0)AND OBC>REF(OBC,1) AND OBC>QROBV,QROBV*1.25,'★'),COLORRED{X-G+5_1-C-N-{};