通达信expma指标周线选牛股(通达信公式)

通达信公式源码概况：

指标类别：通达信公式

授权方式： 免费版

指标评级： ★★★★★

指标分类： 策略

画线方法： 副图

一、通达信expma指标周线选牛股

VAR1:=(100-((90*(HHV(HIGH,21)-CLOSE))/(HHV(HIGH,21)-LLV(LOW,21))));VAR2:=(100-((90*(HHV(HIGH,21)-CLOSE))/(HHV(HIGH,21)-LLV(LOW,21))));VAR3:=(100-MA(((100*(HHV(HIGH,6)-CLOSE))/(HHV(HIGH,6)-LLV(LOW,6))),34));DRAWICON(CROSS(VAR2,MA(VAR3,6)),(LOW*0.97),8);DRAWICON(CROSS(MA(VAR3,6),VAR1),(HIGH*1.05),9);DRAWTEXT(CROSS(VAR2,MA(VAR3,6)),(LOW*0.97),'●买'),colorGreen,linethick1;DRAWTEXT(CROSS(MA(VAR3,6),VAR1),(HIGH*1.05),'▼减仓'),colorYellow,linethick1;牛熊线:EMA(MA(CLOSE,3),34),COLORFF00FF,LINETHICK2;STICKLINE(C<牛熊线ANDC>O,C,O,5,1),COLORffff00;STICKLINE(C<牛熊线ANDC<=O,C,O,5,1),COLORffff00;STICKLINE(C<牛熊线ANDC<=O,H,L,0,1),COLORffff00;STICKLINE(C<牛熊线ANDC>O,C,H,0,1),COLORffff00;STICKLINE(C<牛熊线ANDC>O,O,L,0,1),COLORffff00;TY:=C;A1:=REF(TY,10)=HHV(TY,2*10+1);B1:=FILTER(A1,10);C1:=BACKSET(B1,10+1);HD:=FILTER(C1,10);A2:=REF(TY,10)=LLV(TY,2*10+1);B2:=FILTER(A2,10);C2:=BACKSET(B2,10+1);LD:=FILTER(C2,10);A:=REF(C,BARSLAST(HD));Z:=REF(L,BARSLAST(LD));T1:=BARSLAST(HD)<BARSLAST(LD)ANDNOT(HD);T2:=BARSLAST(HD)>BARSLAST(LD)ANDNOT(LD);波段头:IF(T1,A,A),COLORYELLOW,LINETHICK2,POINTDOT;波段底:IF(T2,Z,Z),COLORWHITE,LINETHICK2,POINTDOT;  

RSV:=(CLOSE-LLV(LOW,M))/(HHV(HIGH,M)-LLV(LOW,M))*100;  

K:=SMA(RSV,M1,1);  

D:=SMA(K,M2,1);  

J:3*K-2*D;  

周J:="KDJ.J#WEEK";  

STICKLINE(周J>80,80,周J,1,0),COLORRED;  

STICKLINE(J>80,80,J,1,0),COLORRED;  

DRAWICON(REF(J,1)<0ANDJ>0,J,1);  

A:0,COLORCYAN;  

EXP1:=EXPMA(C,18);  

EXP2:=EXPMA(C,30);  

XG:REF(CROSS(EXP1,EXP2),5)&&BETWEEN(EXP1/REF(EXP1,5),0.99,1.01)&&  

BETWEEN(EXP2/REF(EXP2,5),0.99,1.01);  

AEXP12:EXPMA(CLOSE,12)COLORBLUE,LINETHICK1;  

AEXP21:EXPMA(CLOSE,21)COLORGREEN,LINETHICK2;  

AEXP50:EXPMA(CLOSE,50)COLORGREEN,LINETHICK2;  

IF(AEXP12>(REFV(AEXP12,1)),AEXP12,DRAWNULL),COLORRED,LINETHICK1;  

IF(AEXP21>(REFV(AEXP21,1)),AEXP21,DRAWNULL),COLORMAGENTA,LINETHICK2;  

A1:=EMA(C,14),COLORA2A200,LINETHICK1;  

A1X:=(A1-REF(A1,1))/REF(A1,1)*100,NODRAW;  

DRAWTEXT_FIX(1,0,0.07,0,'【所属板块】'),COLORWHITE;  

DRAWTEXT_FIX(1,0.07,0.07,0,DYBLOCK),COLOR0080FF;{地域}  

DRAWTEXT_FIX(1,0.122,0.07,0,GNBLOCK),COLORCFB53B;{概念}  

DRAWTEXT_FIX(1,0,0.19,0,'【莸利比例】'),COLORWHITE;  

DRAWNUMBER_FIX(1,0.09,0.19,0,CONST(WINNER(C)*100)),COLORYELLOW;  

DRAWTEXT_FIX(1,0.073,0,0,HYBLOCK),COLORRED;{行业}  

{DRAWTEXT_FIX(1,0.124,0,0,FGBLOCK),COLORYELLOW;}{风格}  

SAT:=IF((AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100>100,100,(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100);  

DRAWTEXT_FIX(1,0,0.31,0,'【量能饱和度】')COLORWHITE;  

DRAWNUMBER_FIX(1,0.1,0.31,0,CONST(SAT)),COLORYELLOW;  

突破:REF(EMA(C,14),1),NODRAW;  

距离:(C-突破)/突破*100,NODRAW;  

出击:IF(A1X>=0,REF(EMA(C,14),BARSLAST(CROSS(A1X,0))+1),DRAWNULL),COLORB000B0,LINETHICK1;  

休假:IF(A1X<0,REF(EMA(C,14),BARSLAST(CROSS(0,A1X))+1),DRAWNULL),COLORFFFF00,LINETHICK1;  

涨幅:IF(A1X>=0,(C-出击)/出击*100,DRAWNULL)NODRAW;  

跌幅:IF(A1X<0,(C-休假)/休假*100,DRAWNULL)NODRAW;  

TT:=240/FROMOPEN;比:=TT;AY2:=EMA(CLOSE,12)-EMA(CLOSE,26);  

AZ2:=EMA(AY2,9);LT2:=(AY2-AZ2);  

L211:=IF(LT2,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;  

ZGD:=HHV(H,80)*0.99;ZGD2:=CONST(ZGD);ZDD:=LLV(L211,80);ZDD2:=CONST(ZDD);  

YYA4:=MA(CLOSE,20);YYA5:=(CLOSE>MA(CLOSE,5));YYA6:=(MA(CLOSE,5)>MA(CLOSE,10));  

YYA7:=(CLOSE>MA(CLOSE,10));YYA8:=(MA(CLOSE,5)>MA(CLOSE,20));  

YYA9:=(CLOSE>MA(CLOSE,20));YYA10:=REF(YYA4,1);YYA11:=(YYA4>YYA10);  

YYAVX:=(((((IF(YYA5,10,(0-10))+IF(YYA6,10,(0-10)))+IF(YYA7,10,(0-10)))+IF(YYA8,10,(0-10)))+IF(YYA9,10,(0-10)))+IF(YYA11,10,(0-10)));  

DSLX:=(CLOSE/INDEXC);DSLX1:=MA(DSLX,5);DSLX2:=MA(DSLX,10);  

YYV1:=MA(VOL,5);YYV2:=MA(VOL,10);J1:=CONST(IF(YYAVX>0,200,100));  

J2:=CONST(IF(YYAVX>0,00,100));J3:=CONST(IF(YYAVX>0,100,100));  

ZGD3:=ZGD2;ZDD3:=ZDD2;ZGD4:=ZGD2;  

STICKLINE(CROSS(A1X,0),C,O,2,0),COLOR00FFFF;  

STICKLINE(CROSS(0,A1X),C,O,2,0),COLOR606000;  

情况1:=CONST(IF(((CROSS(YYAVX,1)AND(YYV1>=YYV2))AND(DSLX>=DSLX1)),1,0)),NODRAW;  

情况2:=CONST(IF(((CROSS(YYAVX,1)AND(YYV1<YYV2))AND(DSLX>=DSLX1)),1,0));  

情况3:=CONST(IF(((CROSS(YYAVX,1)AND(YYV1>YYV2))AND(DSLX<DSLX1)),1,0));  

情况4:=CONST(IF(((CROSS(YYAVX,1)AND(YYV1<=YYV2))AND(DSLX<DSLX1)),1,0));  

情况5:=CONST(IF(((CROSS(1,YYAVX)AND(YYV1>=YYV2))AND(DSLX>=DSLX1)),1,0));  

情况6:=CONST(IF(((CROSS(1,YYAVX)AND(YYV1<YYV2))AND(DSLX>=DSLX1)),1,0));  

情况7:=CONST(IF(((CROSS(1,YYAVX)AND(YYV1>=YYV2))AND(DSLX<DSLX1)),1,0));  

情况8:=CONST(IF(((CROSS(1,YYAVX)AND(YYV1<YYV2))AND(DSLX<DSLX1)),1,0));  

情况9:=CONST(IF(((((YYAVX>=1)AND(REF(YYAVX,1)>0))AND(YYV1>=YYV2))AND(DSLX>=DSLX1)),1,0));  

情况10:=CONST(IF(((((YYAVX>=1)AND(REF(YYAVX,1)>0))AND(YYV1<YYV2))AND(DSLX>=DSLX1)),1,0));  

情况11:=CONST(IF(((((YYAVX>=1)AND(REF(YYAVX,1)>0))AND(YYV1>=YYV2))AND(DSLX<DSLX1)),1,0)),NODRAW;  

情况12:=CONST(IF(((((YYAVX>=1)AND(REF(YYAVX,1)>0))AND(YYV1<YYV2))AND(DSLX<DSLX1)),1,0));  

情况13:=CONST(IF(((((YYAVX<1)AND(REF(YYAVX,1)<0))AND(YYV1>=YYV2))AND(DSLX>=DSLX1)),1,0));  

情况14:=CONST(IF(((((YYAVX<1)AND(REF(YYAVX,1)<0))AND(YYV1<YYV2))AND(DSLX>=DSLX1)),1,0));  

情况15:=CONST(IF(((((YYAVX<1)AND(REF(YYAVX,1)<0))AND(YYV1>=YYV2))AND(DSLX<DSLX1)),1,0));  

情况16:=CONST(IF(((((YYAVX<1)AND(REF(YYAVX,1)<0))AND(YYV1<YYV2))AND(DSLX<DSLX1)),1,0));  

大盘1:=CONST(IF((CROSS(YYAVX,1)AND(YYV1>=YYV2)),1,0));  

大盘2:=CONST(IF((CROSS(YYAVX,1)AND(YYV1<YYV2)),1,0));  

大盘3:=CONST(IF((CROSS(1,YYAVX)AND(YYV1>=YYV2)),1,0));  

大盘4:=CONST(IF((CROSS(1,YYAVX)AND(YYV1<YYV2)),1,0));  

大盘5:=CONST(IF((((YYAVX>=1)AND(REF(YYAVX,1)>0))AND(YYV1>=YYV2)),1,0));  

大盘6:=CONST(IF((((YYAVX>=1)AND(REF(YYAVX,1)>0))AND(YYV1<YYV2)),1,0));  

大盘7:=CONST(IF((((YYAVX<1)AND(REF(YYAVX,1)<0))AND(YYV1>=YYV2)),1,0));  

大盘8:=CONST(IF((((YYAVX<1)AND(REF(YYAVX,1)<0))AND(YYV1<YYV2)),1,0));  

MFI:=(HIGH-LOW)*1000000/(VOL*比);  

绿灯:=MFI>=REF(MFI,1)ANDVOL*比>=REF(VOL,1);  

MMM1:=CONST(绿灯);  

衰退:=MFI<REF(MFI,1)ANDVOL*比<REF(VOL,1);  

MMM2:=CONST(衰退);  

伪装:=MFI>=REF(MFI,1)ANDVOL*比<REF(VOL,1);  

MMM3:=CONST(伪装);  

蛰伏:=MFI<REF(MFI,1)ANDVOL*比>=REF(VOL,1);  

MMM4:=CONST(蛰伏);  

WJ:=(H+L+C)/3;V1:=IF(H=L,1,H-MAX(O,C));V2:=IF(H=L,1,MAX(C,O)-WJ);  

V3:=IF(H=L,1,MIN(O,C)-L);V4:=IF(H=L,1,WJ-MIN(C,O));V5:=VOL/IF(H=L,4,H-L);  

V6:=(V1*V5);V7:=(V2*V5);V8:=(V3*V5);V9:=(V4*V5);  

买盘1:=DYNAINFO(23)*比;卖盘1:=DYNAINFO(22)*比;  

买盘2:=IF(ISLASTBARANDC>300,(V9+V8)*TT,(V9+V8));  

卖盘2:=IF(ISLASTBARANDC>300,(V6+V7)*TT,(V6+V7));  

买盘:=IF(ISLASTBARANDPERIOD=5ANDC<300,买盘1,买盘2);  

卖盘:=IF(ISLASTBARANDPERIOD=5ANDC<300,卖盘1,卖盘2);  

{买卖差:=买盘-卖盘;}  

量大:=(卖盘+买盘)/REF(VOL,1)>2;  

MMM5:=CONST(量大);  

量缩:=REF(VOL,1)/(卖盘+买盘)>1.5;  

MMM6:=CONST(量缩);  

卖量大:=(卖盘-买盘)/买盘>0.4;  

MMM7:=CONST(卖量大);  

买量大:=(买盘-卖盘)/卖盘>0.4;  

MMM8:=CONST(买量大);  

TS1:=IF(情况1=1,0.06+0.06,0.06);TS2:=IF(情况2=1,TS1+0.06,TS1);  

TS3:=IF(情况3=1,TS2+0.06,TS2);TS4:=IF(情况4=1,TS3+0.06,TS3);  

TS5:=IF(情况5=1,TS4+0.06,TS4);TS6:=IF(情况6=1,TS5+0.06,TS5);  

TS7:=IF(情况7=1,TS6+0.06,TS6);TS8:=IF(情况8=1,TS7+0.06,TS7);  

TS9:=IF(情况9=1,TS8+0.06,TS8);TS10:=IF(情况10=1,TS9+0.06,TS9);  

TS11:=IF(情况11=1,TS10+0.06,TS10);TS12:=IF(情况12=1,TS11+0.06,TS11);  

TS13:=IF(情况13=1,TS12+0.06,TS12);TS14:=IF(情况14=1,TS13+0.06,TS13);  

TS15:=IF(情况15=1,TS14+0.06,TS14);TS16:=IF(情况16=1,TS15+0.06,TS15);  

TS17:=IF(大盘1=1,TS16+0.06,TS16);TS18:=IF(大盘2=1,TS17+0.06,TS17);  

TS19:=IF(大盘3=1,TS18+0.06,TS18);TS20:=IF(大盘4=1,TS19+0.06,TS19);  

TS21:=IF(大盘5=1,TS20+0.06,TS20);TS22:=IF(大盘6=1,TS21+0.06,TS21);  

TS23:=IF(大盘7=1,TS22+0.06,TS22);TS24:=IF(大盘8=1,TS23+0.06,TS23);  

TS25:=IF(MMM1=1,TS24+0.06,TS24);  

TS26:=IF(MMM2=1,TS25+0.06,TS25);  

TS27:=IF(MMM3=1,TS26+0.06,TS26);  

TS28:=IF(MMM4=1,TS27+0.06,TS27);  

TS29:=IF(MMM5=1,TS28+0.03,TS28);  

TS30:=IF(MMM6=1,TS29+0.03,TS29);  

TS31:=IF(MMM7=1,TS30+0.03,TS30);  

TS32:=IF(MMM8=1,TS31+0.03,TS31);  

DRAWTEXT_FIX(MMM5,0,0.42,0,'★今天比昨天的成交量放大一倍以上。'),COLORGREEN;  

DRAWTEXT_FIX(MMM6,0,0.42,0,'★今天比昨天的成交量缩量一半以上。'),COLORYELLOW;  

DRAWTEXT_FIX(MMM7,0,0.48,0,'☆该股今天卖出量大于买入量40％以上。'),COLORGREEN;  

DRAWTEXT_FIX(MMM8,0,0.48,0,'☆该股今天买入量大于卖出量40％以上。'),COLORYELLOW;