通达信流动资金的进化版选股指标公式源码

通达信流动资金的进化版选股指标公式源码

源码正文：

N:=9{XG51};
MID:=SMA(AMOUNT/10,N,1)/10000{XG51};
ma0:=MA(MID,30){XG51};
MA1:=MA(MID,1){XG51};
A1:=MA1-MA0{XG51};
MA2:=MA(MID,2){XG51};
A2:=MA2-MA0{XG51};
MA3:=MA(MID,3){XG51};
A3:=MA3-MA0{XG51};
MA4:=MA(MID,4){XG51};
A4:=MA4-MA0{XG51};
MA5:=MA(MID,5){XG51};
A5:=MA5-MA0{XG51};
MA6:=MA(MID,6){XG51};
A6:=MA6-MA0{XG51};
MA7:=MA(MID,7){XG51};
A7:=MA7-MA0{XG51};
MA8:=MA(MID,8){XG51};
A8:=MA8-MA0{XG51};
MA9:=MA(MID,9){XG51};
A9:=MA9-MA0{XG51};
MA10:=MA(MID,10){XG51};
A10:=MA10-MA0{XG51};
MA11:=MA(MID,11){XG51};
A11:=MA11-MA0{XG51};
MA12:=MA(MID,12){XG51};
A12:=MA12-MA0{XG51};
MA13:=MA(MID,13){XG51};
A13:=MA13-MA0{XG51};
MA14:=MA(MID,14){XG51};
A14:=MA14-MA0{XG51};
MA15:=MA(MID,15){XG51};
A15:=MA15-MA0{XG51};
MA16:=MA(MID,16){XG51};
A16:=MA16-MA0{XG51};
MA17:=MA(MID,17){XG51};
A17:=MA17-MA0{XG51};
MA18:=MA(MID,18){XG51};
A18:=MA18-MA0{XG51};
MA19:=MA(MID,19){XG51};
A19:=MA19-MA0{XG51};
MA20:=MA(MID,20){XG51};
A20:=MA20-MA0{XG51};
MA21:=MA(MID,21){XG51};
A21:=MA21-MA0{XG51};
MA22:=MA(MID,22){XG51};
A22:=MA22-MA0{XG51};
MA23:=MA(MID,23){XG51};
A23:=MA23-MA0{XG51};
MA24:=MA(MID,24){XG51};
A24:=MA24-MA0{XG51};
MA25:=MA(MID,25){XG51};
A25:=MA25-MA0{XG51};
MA26:=MA(MID,26){XG51};
A26:=MA26-MA0{XG51};
MA27:=MA(MID,27){XG51};
A27:=MA27-MA0{XG51};
MA28:=MA(MID,28){XG51};
A28:=MA28-MA0{XG51};
MA29:=MA(MID,29){XG51};
A29:=MA29-MA0{XG51};
MA30:=MA(MID,30){XG51};
A30:=MA30-MA0{XG51};
MA31:=MA(MID,31){XG51};
A31:=MA31-MA0{XG51};
MA32:=MA(MID,32){XG51};
A32:=MA32-MA0{XG51};
MA33:=MA(MID,33){XG51};
A33:=MA33-MA0{XG51};
MA34:=MA(MID,34){XG51};
A34:=MA34-MA0{XG51};
MA35:=MA(MID,35){XG51};
A35:=MA35-MA0{XG51};
MA36:=MA(MID,36){XG51};
A36:=MA36-MA0{XG51};
MA37:=MA(MID,37){XG51};
A37:=MA37-MA0{XG51};
MA38:=MA(MID,38){XG51};
A38:=MA38-MA0{XG51};
MA39:=MA(MID,39){XG51};
A39:=MA39-MA0{XG51};
MA40:=MA(MID,40){XG51};
A40:=MA40-MA0{XG51};
LC:(A6+A7+A8+A9+A10+A11+A12+A13+A14+A15+A16+A17+A18+A19+A20)/30,LINETHICK0,COLORBLUE{XG51};
VAR1:=LC{XG51};
VAR2:=REF(LC,1){XG51};
VAR3:=VAR1>VAR2 AND REF(LC,1)<REF(LC,2){XG51};
VAR4:=VAR1<VAR2 AND REF(LC,1)>REF(LC,2){XG51};
均线发散 : stICKLINE(VAR1>VAR2,LC,REF(LC,1),2,1),COLORWHITE{XG51};
均线粘合 : STICKLINE(VAR1<VAR2,LC,REF(LC,1),2,1),COLORCYAN{XG51};
ema5:MA(VAR1,5),COLOR666666{XG51};
EMA10:MA(VAR1,10),COLOR999999{XG51};
B1:=BArslAST(MA20>REF(MA20,1)){XG51};
DRAWTEXT(VAR3  AND MA20<REF(MA20,1) AND COUNT(VAR3,B1)=1,0.95*REF(LC,1),'1'),COLORBLUE{XG51};
DRAWTEXT(VAR3  AND MA20<REF(MA20,1) AND COUNT(VAR3,B1)=2,0.95*REF(LC,1),'2'),COLORBLUE{XG51};
DRAWTEXT(VAR3  AND MA20<REF(MA20,1) AND COUNT(VAR3,B1)=3,0.95*REF(LC,1),'3'),COLORBLUE{XG51};
DRAWTEXT(VAR3  AND MA20<REF(MA20,1) AND COUNT(VAR3,B1)=4,0.95*REF(LC,1),'4'),COLORBLUE{XG51};
DRAWTEXT(VAR3  AND MA20<REF(MA20,1) AND COUNT(VAR3,B1)=5,0.95*REF(LC,1),'5'),COLORBLUE{XG51};
B2:=BARSLAST(MA20<REF(MA20,1)){XG51};
DRAWTEXT(VAR4  AND MA20>REF(MA20,1) AND COUNT(VAR4,B2)=1 ,1.05*REF(LC,1),'1'){XG51};
DRAWTEXT(VAR4  AND MA20>REF(MA20,1) AND COUNT(VAR4,B2)=2 ,1.05*REF(LC,1),'2'){XG51};
DRAWTEXT(VAR4  AND MA20>REF(MA20,1) AND COUNT(VAR4,B2)=3 ,1.05*REF(LC,1),'3'){XG51};
DRAWTEXT(VAR4  AND MA20>REF(MA20,1) AND COUNT(VAR4,B2)=4 ,1.05*REF(LC,1),'4'){XG51};
macd:=(EMA5-EMA10)*2,COLORSTICK{XG51};

减速上行: STICKLINE(VAR1>REF(VAR1,1) AND MACD<REF(MACD,1),VAR1,REF(VAR1,1),2,1),COLORLICYAN;  
减速下行: STICKLINE(VAR1<REF(VAR1,1) AND MACD>REF(MACD,1),VAR1,REF(VAR1,1),2,1),COLORFFFF00{X+G^5.1+C+N+{};