通达信自用EXPMA主图选股指标公式源码

通达信自用EXPMA主图选股指标公式源码

源码正文：

AEXP12:expma(CLOSE,12)COLORYELLOW,LINETHICK1{XG51};
AEXP21:EXPma(CLOSE,21)COLORCYAN,LINETHICK2{XG51};
AEXP50:EXPMA(CLOSE,50)COLORCYAN,LINETHICK2{XG51};
IF(AEXP12>(REFV(AEXP12,1)),AEXP12,DRAWNULL),COLORWHITE,LINETHICK1{XG51};
IF(AEXP21>(REFV(AEXP21,1)),AEXP21,DRAWNULL),COLORLIMAGENTA,LINETHICK2{XG51};
A1:=ema(C,14),COLORA2A200,LINETHICK1{XG51};
A1X:=(A1-REF(A1,1))/REF(A1,1)*100,NODRAW{XG51};
DRAWTEXT_FIX(1,0,0.07,0,'【所属板块】'),COLORRED{XG51};
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,'【莸利比例】'),COLORRED{XG51};
DRAWNUMBER_FIX(1,0.09,0.19,0,CONst(WINNER(C )*100)),COLORBLUE{XG51};
DRAWTEXT_FIX(1,0.073,0,0,HYBLOCK),COLORWHITE;

SAT:=IF((AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100>100,100,(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100){XG51};
DRAWTEXT_FIX(1,0,0.31,0,'【量能饱和度】')COLORRED{XG51};
DRAWNUMBER_FIX(1,0.1,0.31,0,CONST(SAT)),COLORBLUE{XG51};
突破:REF(EMA(C,14),1),NODRAW{XG51};
距离:(C-突破)/突破*100,NODRAW{XG51};
出击:IF(A1X>=0,REF(EMA(C,14),BArslAST(crOSS(A1X,0))+1),DRAWNULL),COLORB000B0,LINETHICK1{XG51};
休假:IF(A1X<0,REF(EMA(C,14),BARSLAST(CROSS(0,A1X))+1),DRAWNULL),COLORFFFF00,LINETHICK1{XG51};
涨幅:IF(A1X>=0,(C-出击)/出击*100,DRAWNULL)NODRAW{XG51};
跌幅:IF(A1X<0,(C-休假)/休假*100,DRAWNULL)NODRAW{XG51};
TT:=240/FROMOPEN;比:=TT;AY2:=EMA(CLOSE,12)-EMA(CLOSE,26){XG51};
AZ2:=EMA(AY2,9);LT2:=(AY2-AZ2){XG51};
L211:=IF(LT2,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT{XG51};
ZGD:=HHV(H,80)*0.99;ZGD2:=CONST(ZGD);ZDD:=LLV(L211,80);ZDD2:=CONST(ZDD){XG51};
YYA4:=MA(CLOSE,20);YYA5:=(CLOSE > MA(CLOSE,5));YYA6:=(MA(CLOSE,5) > MA(CLOSE,10)){XG51};
YYA7:=(CLOSE > MA(CLOSE,10));YYA8:=(MA(CLOSE,5) > MA(CLOSE,20)){XG51};
YYA9:=(CLOSE > MA(CLOSE,20));YYA10:=REF(YYA4,1);YYA11:=(YYA4 > YYA10){XG51};
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))){XG51};
DSLX:=(CLOSE / INDEXC);DSLX1:=MA(DSLX,5);DSLX2:=MA(DSLX,10){XG51};
YYV1:=MA(vol,5);YYV2:=MA(VOL,10);J1:=CONST(IF( YYAVX > 0,200,100)){XG51};
J2:=CONST(IF( YYAVX > 0,00,100));J3:=CONST(IF( YYAVX > 0,100,100)){XG51};
ZGD3:=ZGD2;ZDD3:=ZDD2;ZGD4:=ZGD2{XG51};
STICKLINE(CROSS(A1X,0),C,O,2,0),COLOR00FFFF{XG51};
STICKLINE(CROSS(0,A1X),C,O,2,0),COLOR606000{XG51};
情况1:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0)),NODRAW{XG51};
情况2:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0)){XG51};
情况3:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 > YYV2)) AND (DSLX < DSLX1)),1,0)){XG51};
情况4:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 <= YYV2)) AND (DSLX < DSLX1)),1,0)){XG51};
情况5:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0)){XG51};
情况6:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0)){XG51};
情况7:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0)){XG51};
情况8:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0)){XG51};
情况9:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0)){XG51};
情况10:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0)){XG51};
情况11:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0)),NODRAW{XG51};
情况12:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0)){XG51};
情况13:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0)){XG51};
情况14:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0)){XG51};
情况15:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0)){XG51};
情况16:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0)){XG51};
大盘1:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 >= YYV2)),1,0)){XG51};
大盘2:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 < YYV2)),1,0)){XG51};
大盘3:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 >= YYV2)),1,0)){XG51};
大盘4:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 < YYV2)),1,0)){XG51};
大盘5:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)),1,0)){XG51};
大盘6:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)),1,0)){XG51};
大盘7:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)),1,0)){XG51};
大盘8:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)),1,0)){XG51};
mfi:=(HIGH-LOW)*1000000/(VOL*比){XG51};
绿灯:=MFI>=REF(MFI,1)AND VOL*比>=REF(VOL,1){XG51};
MMM1:=CONST(绿灯){XG51};
衰退:=MFI<REF(MFI,1)AND VOL*比<REF(VOL,1){XG51};
MMM2:=CONST(衰退){XG51};
伪装:=MFI>=REF(MFI,1)AND VOL*比<REF(VOL,1){XG51};
MMM3:=CONST(伪装){XG51};
蛰伏:=MFI<REF(MFI,1)AND VOL*比>=REF(VOL,1){XG51};
MMM4:=CONST(蛰伏){XG51};
WJ:=(H+L+C)/3;V1:=IF(H=L,1,H-MAX(O,C));V2:=IF(H=L,1,MAX(C,O)-WJ){XG51};
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){XG51};
V6:=(V1*V5);V7:=(V2*V5);V8:=(V3*V5);V9:=(V4*V5){XG51};
买盘1:=DYNAINFO(23)*比;卖盘1:=DYNAINFO(22)*比{XG51};
买盘2:=IF(ISLASTBAR AND C>300,(V9+V8)*TT,(V9+V8)){XG51};
卖盘2:=IF(ISLASTBAR AND C>300,(V6+V7)*TT,(V6+V7)){XG51};
买盘:=IF(ISLASTBAR AND PERIOD=5 AND C<300,买盘1,买盘2){XG51};
卖盘:=IF(ISLASTBAR AND PERIOD=5 AND C<300,卖盘1,卖盘2){XG51};
量大:=(卖盘+买盘)/REF(VOL,1)>2{XG51};
MMM5:=CONST(量大){XG51};
量缩:=REF(VOL,1)/(卖盘+买盘)>1.5{XG51};
MMM6:=CONST(量缩){XG51};
卖量大:=(卖盘-买盘)/买盘>0.4{XG51};
MMM7:=CONST(卖量大){XG51};
买量大:=(买盘-卖盘)/卖盘>0.4{XG51};
MMM8:=CONST(买量大){XG51};
TS1:=IF(情况1=1,0.06+0.06,0.06); TS2:=IF(情况2=1,TS1+0.06,TS1){XG51};
TS3:=IF(情况3=1,TS2+0.06,TS2); TS4:=IF(情况4=1,TS3+0.06,TS3){XG51};
TS5:=IF(情况5=1,TS4+0.06,TS4); TS6:=IF(情况6=1,TS5+0.06,TS5){XG51};
TS7:=IF(情况7=1,TS6+0.06,TS6); TS8:=IF(情况8=1,TS7+0.06,TS7){XG51};
TS9:=IF(情况9=1,TS8+0.06,TS8); TS10:=IF(情况10=1,TS9+0.06,TS9){XG51};
TS11:=IF(情况11=1,TS10+0.06,TS10); TS12:=IF(情况12=1,TS11+0.06,TS11){XG51};
TS13:=IF(情况13=1,TS12+0.06,TS12); TS14:=IF(情况14=1,TS13+0.06,TS13){XG51};
TS15:=IF(情况15=1,TS14+0.06,TS14); TS16:=IF(情况16=1,TS15+0.06,TS15){XG51};
TS17:=IF(大盘1=1,TS16+0.06,TS16); TS18:=IF(大盘2=1,TS17+0.06,TS17){XG51};
TS19:=IF(大盘3=1,TS18+0.06,TS18); TS20:=IF(大盘4=1,TS19+0.06,TS19){XG51};
TS21:=IF(大盘5=1,TS20+0.06,TS20); TS22:=IF(大盘6=1,TS21+0.06,TS21){XG51};
TS23:=IF(大盘7=1,TS22+0.06,TS22); TS24:=IF(大盘8=1,TS23+0.06,TS23){XG51};
TS25:=IF(MMM1=1,TS24+0.06,TS24){XG51};
TS26:=IF(MMM2=1,TS25+0.06,TS25){XG51};
TS27:=IF(MMM3=1,TS26+0.06,TS26){XG51};
TS28:=IF(MMM4=1,TS27+0.06,TS27){XG51};
TS29:=IF(MMM5=1,TS28+0.03,TS28){XG51};
TS30:=IF(MMM6=1,TS29+0.03,TS29){XG51};
TS31:=IF(MMM7=1,TS30+0.03,TS30){XG51};
TS32:=IF(MMM8=1,TS31+0.03,TS31){XG51};
DRAWTEXT_FIX(MMM5,0,0.42,0,'★今天比昨天的成交量放大一倍以上。'),COLORCYAN{XG51};
DRAWTEXT_FIX(MMM6,0,0.42,0,'★今天比昨天的成交量缩量一半以上。'),COLORBLUE{XG51};
DRAWTEXT_FIX(MMM7,0,0.48,0,'☆该股今天卖出量大于买入量40％以上。'),COLORCYAN{XG51};
DRAWTEXT_FIX(MMM8,0,0.48,0,'☆该股今天买入量大于卖出量40％以上。'),COLORBLUE{X*G*5~1*C*N*{};