通达信人工智能提示选股指标公式源码

通达信人工智能提示选股指标公式源码

源码正文：

VAR1:=(C-ema(C,7))/Ema(C,7){XG51};
VAR2:=EMA(EMA(VAR1,3),3){XG51};
VAR3:=EMA(EMA(VAR1,3),2){XG51};
VAR4:=100*( VAR2+ VAR3){XG51};
VAR5:=EMA(VAR4,2.5){XG51};
BI:=100*(H+L)/2/EMA(C,17)-100{XG51};
BUY1:=VAR4>REF(VAR4,1) AND REF(VAR4,1)<REF(VAR4,2) AND REF(VAR4,2)<REF(VAR4,3){XG51};
BUY2:=REF(BI,1)>0 AND BUY1 AND VAR4<-2{XG51};
BUY3:=REF(BI,1)<0 AND BUY1 AND REF(VAR4,1)<-3{XG51};
BUY4:=VAR4<0 AND crOSS(VAR4,VAR5) AND BUY1{XG51};
BUY:=(BUY2 OR BUY3 OR BUY4) AND (EMA(INDEXC,5)>REF(EMA(INDEXC,5),1) OR VAR4>=REF(VAR4,1)){XG51};
DRAWICON(BUY,-130,38){XG51};
100{XG51};
主力:EMA( (CLOSE-MA(CLOSE,7))/MA(CLOSE,7)*480,2)*5,COLORCYAN,LINETHICK1{XG51};
散户:=EMA( (CLOSE-MA(CLOSE,11))/MA(CLOSE,11)*480,7)*5{XG51};
BT2:=CROSS(主力,散户) AND 主力<-10{XG51};
DRAWICON(CROSS(主力,散户) AND 主力<-10,主力,13){XG51};
IF(主力>=REF(主力,1),主力,DRAWNULL),COLORWHITE,LINETHICK1{XG51};
IF(主力<=REF(主力,1),主力,DRAWNULL),COLORCYAN,LINETHICK1{XG51};
bias1:=(C-MA(C,6))/MA(C,6)*100{XG51};
BIAS2:=(C-MA(C,12))/MA(C,12)*100{XG51};
BIAS3:=(C-MA(C,24))/MA(C,24)*100{XG51};
BIAS:=(BIAS1+2*BIAS2+3*BIAS3)/6{XG51};
乖离:=MA(BIAS,10){XG51};
stICKLINE(((CROSS(BIAS,乖离)AND 乖离<-3)),108,100,1,0),COLORRED{XG51};
DRAWTEXT((CROSS(BIAS,乖离)AND 乖离<-3),130,'&larr;变'),COLORRED{XG51};
LC:=REF(CLOSE,1){XG51};
rsi:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(Abs(CLOSE-LC),6,1)*100{XG51};
顶部:=CROSS(80,RSI)*35{XG51};
逃顶:=顶部{XG51};
顶:=IF(逃顶>REF(逃顶,1),35,0){XG51};
DRAWTEXT(顶=35,170,'&larr;顶'),COLOR00FF00{XG51};
STICKLINE(顶部,110,100,1,0),COLORCYAN{XG51};
volUME:=VOL{XG51};
主力启动线:=MA(VOLUME,5){XG51};
主力洗盘线:=MA(VOLUME,35){XG51};
资金异动线:=MA(VOLUME,135){XG51};
诱多:STICKLINE(CROSS(主力启动线,资金异动线) OR ((主力洗盘线 > 资金异动线) AND CROSS(主力启动线,主力洗盘线)),108,100,0.5,0),COLORFFFF00{XG51};
VARR1:=SMA(MAX(CLOSE-REF(C,1),0),6,1)/SMA(ABS(CLOSE-REF(C,1)),6,1)*100{XG51};
DRAWTEXT(CROSS(82,VARR1),150,'&larr;逃'),COLORBLUE{XG51};
DRAWTEXT(诱多,147,'&larr;诱'),COLORFFFF00{XG51};
BIASW:=(CLOSE-MA(CLOSE,10))/MA(CLOSE,10)*10{XG51};
Q:=(REF(DOWNNDAY(CLOSE,3),1) AND C>REF(C,1) AND BIASW>=REF(BIASW,1)){XG51};
DRAWTEXT(Q,170,'&larr;机会'),COLORBLUE{XG51};
STICKLINE(Q,110,100,0.5,0),COLORBLUE{XG51};
AAWW:=C-MA(C,6){XG51};
注:=0{XG51};
DRAWICON(CROSS(AAWW,注),90,41){XG51};
TJ1:=COUNT((C<O),5)>=3{XG51};
TJ2:=(MIN(C,O)-L)/(H-L)>=0.5{XG51};
TJ3:=L/MIN(C,O)<=0.97{XG51};
TJ4:=(C-MA(C,30))/MA(C,30)*100<-10{XG51};
长下影买:=TJ1 AND TJ2 AND TJ3 AND TJ4{XG51};
STICKLINE(长下影买,-120,-100,0.1,2),COLORRED{XG51};
DRAWTEXT(长下影买>0,-120,'长下影买'),COLORF8FFFF{XG51};
difF:=EMA(DCLOSE,12)-EMA(DCLOSE,26){XG51};
DEAP:=EMA(DIFF,9),COLORFFFF00{XG51};
macd:=(DIFF-DEAP)*2{XG51};
A1:=BArslAST(REF(CROSS(DIFF,DEAP),1)){XG51};
AR1:=REF(CLOSE,1){XG51};
AR2:=SMA(MAX(CLOSE-AR1,0),7,1)/SMA(ABS(CLOSE-AR1),7,1)*100{XG51};
特准:STICKLINE(FILTER(REF(AR2,1)<20 AND AR2>REF(AR2,1),5),40,0,1,1),COLOR0066FF{XG51};
DRAWTEXT(特准,35,'&larr;绝杀'),COLOR0066FF{XG51};
增减力度:=(MA(CLOSE,34.000) - CLOSE) / MA(CLOSE, 34.000) * 10.000{XG51};
STICKLINE(CROSS( 1.700,增减力度), 51,10,0.1,0),COLORRED{XG51};
DRAWTEXT(CROSS( 1.700,增减力度), 63,'&larr;底'),COLORRED{XG51};
STICKLINE(FILTER(CROSS(0.019100,增减力度),21),106,100,0.5,0),COLORCYAN{XG51};
DRAWTEXT(FILTER(CROSS(0.019100,增减力度),21), 120,'&larr;小心'),COLORCYAN{XG51};
AA:=EMA(C,5)-EMA(C,13){XG51};
BBP:=EMA(AA,3){XG51};
X:=AA>REF(AA,1); Y:=REF(AA,3)>=REF(AA,2);Z:=REF(AA,2)>=REF(AA,1);Z1:=AA<BBP{XG51};
注意:=X AND Y AND Z AND Z1 {XG51};
DRAWTEXT(注意,1,'启动'),COLORMAGENTA{XG51};
DRAWICON(注意,10,1){XG51};
OSC:=100*(CLOSE-MA(CLOSE,20)){XG51};
MaoSC:=EXPMEMA(OSC,6){XG51};
BIASWP:=(CLOSE-MA(CLOSE,20))/MA(CLOSE,20)*100{XG51};
BIASMA:=MA(BIASWP,6){XG51};
F:=100*(C-REF(C,1))/REF(C,1){XG51};
P1:=IF(C<REF(O,1) AND F<0,1,0){XG51};
P2:=IF(C<REF(O,2) AND F<0,1,0){XG51};
LIN:=IF(P1=0 AND REF(P1,1)=1 AND P2=0 AND REF(P2,1)=1,1,0){XG51};
SS1:=CROSS(OSC,MAOSC) AND LIN{XG51};
DRAWTEXT(SS1,-20,'&larr;反弹'),COLOR00FFFF{XG51};
STICKLINE(SS1,-60,-20,1,1),COLOR00FFFF{XG51};
SS:=CROSS(OSC,MAOSC) AND CROSS(BIASWP,BIASMA) AND LIN{XG51};
DRAWTEXT(SS,-60,'&larr;激进'),COLORWHITE{XG51};
STICKLINE(SS,-70,-30,0.2,0),COLORWHITE{XG51};
A2:=BARSLAST(REF(CROSS("kdj.K"(9,3,3),"kdJ.D"(9,3,3)),1)){XG51};
B2:=REF(C,A2+1)>C AND REF("KDJ.K"(9,3,3),A2+1)<"KDJ.K"(9,3,3) AND CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3)){XG51};
A3:=BARSLAST(REF(CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)),1)){XG51};
B3:=REF(C,A3+1)>C AND REF("RSI.RSI1"(6,12,24),A3+1)<"RSI.RSI1"(6,12,24) AND CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)){XG51};
STICKLINE(B2>0,-146,-134,1,0),COLOR00FFFF{XG51};
DRAWTEXT(B2>0,-138,'&larr;启动'),COLORBLUE{XG51};
STICKLINE(B3>0,-94,-82,1,0),COLORFF00FF{XG51};
DRAWTEXT(B3>0,-86,'&larr;走强'),COLORFF00FF{XG51};
FL:=V>REF(V,1) OR V>MA(V,5){XG51};
SZ:=(CROSS(C,MA(C,3)) OR CROSS(C,MA(C,5))) AND C>=O{XG51};
放量:=IF(FL AND SZ,1,0){XG51};
STICKLINE(放量,-120,-108,1,0),COLORLICYAN{XG51};
DRAWTEXT(放量,-112,'&larr;放量'),COLORLICYAN{XG51};
弱转强:=CROSS(cci,-200) AND CCI>REF(CCI,1){XG51};
STICKLINE(弱转强,108,100,0.5,0),COLORWHITE{XG51};
DRAWTEXT(弱转强,125,'&larr;出击'),COLORWHITE{X^G.5-1^C^N^{};