通达信人工智能提示副图源码

人工智能提示 【源码、副图、附图、说明】

说明；网上看见的，共粉丝分享。在此感谢原作者
在加一句；珍缘惜缘,是非都是浮云。如何分个三六九那是你的事。
人工智能提示源码
VAR1:=(C-EMA(C,7))/EMA(C,7);
VAR2:=EMA(EMA(VAR1,3),3);
VAR3:=EMA(EMA(VAR1,3),2);
VAR4:=100*( VAR2+ VAR3);
VAR5:=EMA(VAR4,2.5);
BI:=100*(H+L)/2/EMA(C,17)-100;
BUY1:=VAR4>REF(VAR4,1) AND REF(VAR4,1)<REF(VAR4,2) AND REF(VAR4,2)<REF(VAR4,3);
BUY2:=REF(BI,1)>0 AND BUY1 AND VAR4<-2;
BUY3:=REF(BI,1)<0 AND BUY1 AND REF(VAR4,1)<-3;
BUY4:=VAR4<0 AND CROSS(VAR4,VAR5) AND BUY1;
BUY:=(BUY2 OR BUY3 OR BUY4) AND (EMA(INDEXC,5)>REF(EMA(INDEXC,5),1) OR VAR4>=REF(VAR4,1));
DRAWICON(BUY,-130,38);
100;
主力:EMA( (CLOSE-MA(CLOSE,7))/MA(CLOSE,7)*480,2)*5,COLORGREEN,LINETHICK1;
散户:=EMA( (CLOSE-MA(CLOSE,11))/MA(CLOSE,11)*480,7)*5;
BT2:=CROSS(主力,散户) AND 主力<-10;
DRAWICON(CROSS(主力,散户) AND 主力<-10,主力,13);
IF(主力>=REF(主力,1),主力,DRAWNULL),COLORRED,LINETHICK1;
IF(主力<=REF(主力,1),主力,DRAWNULL),COLORGREEN,LINETHICK1;
BIAS1:=(C-MA(C,6))/MA(C,6)*100;
BIAS2:=(C-MA(C,12))/MA(C,12)*100;
BIAS3:=(C-MA(C,24))/MA(C,24)*100;
BIAS:=(BIAS1+2*BIAS2+3*BIAS3)/6;
乖离:=MA(BIAS,10);
STICKLINE(((CROSS(BIAS,乖离)AND 乖离<-3)),108,100,1,0),COLORWHITE;
DRAWTEXT((CROSS(BIAS,乖离)AND 乖离<-3),130,'←变'),COLORWHITE;
LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
顶部:=CROSS(80,RSI)*35;
逃顶:=顶部;
顶:=IF(逃顶>REF(逃顶,1),35,0);
DRAWTEXT(顶=35,170,'←顶'),COLOR00FF00;
STICKLINE(顶部,110,100,1,0),COLORGREEN;
VOLUME:=VOL;
主力启动线:=MA(VOLUME,5);
主力洗盘线:=MA(VOLUME,35);
资金异动线:=MA(VOLUME,135);
诱多:STICKLINE(CROSS(主力启动线,资金异动线) OR ((主力洗盘线 > 资金异动线) AND CROSS(主力启动线,主力洗盘线)),108,100,0.5,0),COLORFFFF00;
VARR1:=SMA(MAX(CLOSE-REF(C,1),0),6,1)/SMA(ABS(CLOSE-REF(C,1)),6,1)*100;
DRAWTEXT(CROSS(82,VARR1),150,'←逃'),COLORYELLOW;
DRAWTEXT(诱多,147,'←诱'),COLORFFFF00;
BIASW:=(CLOSE-MA(CLOSE,10))/MA(CLOSE,10)*10;
Q:=(REF(DOWNNDAY(CLOSE,3),1) AND C>REF(C,1) AND BIASW>=REF(BIASW,1));
DRAWTEXT(Q,170,'←机会'),COLORYELLOW;
STICKLINE(Q,110,100,0.5,0),COLORYELLOW;
AAWW:=C-MA(C,6);
注:=0;
DRAWICON(CROSS(AAWW,注),90,41);
TJ1:=COUNT((C<O),5)>=3;
TJ2:=(MIN(C,O)-L)/(H-L)>=0.5;
TJ3:=L/MIN(C,O)<=0.97;
TJ4:=(C-MA(C,30))/MA(C,30)*100<-10;
长下影买:=TJ1 AND TJ2 AND TJ3 AND TJ4;
STICKLINE(长下影买,-120,-100,0.1,2),COLORWHITE;
DRAWTEXT(长下影买>0,-120,'长下影买'),COLORF8FFFF;
DIFF:=EMA(DCLOSE,12)-EMA(DCLOSE,26);
DEAP:=EMA(DIFF,9),COLORFFFF00;
MACD:=(DIFF-DEAP)*2;
A1:=BARSLAST(REF(CROSS(DIFF,DEAP),1));
AR1:=REF(CLOSE,1);
AR2:=SMA(MAX(CLOSE-AR1,0),7,1)/SMA(ABS(CLOSE-AR1),7,1)*100;
特准:STICKLINE(FILTER(REF(AR2,1)<20 AND AR2>REF(AR2,1),5),40,0,1,1),COLOR0066FF;
DRAWTEXT(特准,35,'←绝杀'),COLOR0066FF;
增减力度:=(MA(CLOSE,34.000) - CLOSE) / MA(CLOSE, 34.000) * 10.000;
STICKLINE(CROSS( 1.700,增减力度), 51,10,0.1,0),COLORWHITE;
DRAWTEXT(CROSS( 1.700,增减力度), 63,'←底'),COLORWHITE;
STICKLINE(FILTER(CROSS(0.019100,增减力度),21),106,100,0.5,0),COLORGREEN;
DRAWTEXT(FILTER(CROSS(0.019100,增减力度),21), 120,'←小心'),COLORGREEN;
AA:=EMA(C,5)-EMA(C,13);
BBP:=EMA(AA,3);
X:=AA>REF(AA,1); Y:=REF(AA,3)>=REF(AA,2);Z:=REF(AA,2)>=REF(AA,1);Z1:=AA<BBP;
注意:=X AND Y AND Z AND Z1 ;
DRAWTEXT(注意,1,'启动'),COLORLIMAGENTA;
DRAWICON(注意,10,1);
OSC:=100*(CLOSE-MA(CLOSE,20));
MAOSC:=EXPMEMA(OSC,6);
BIASWP:=(CLOSE-MA(CLOSE,20))/MA(CLOSE,20)*100;
BIASMA:=MA(BIASWP,6);
F:=100*(C-REF(C,1))/REF(C,1);
P1:=IF(C<REF(O,1) AND F<0,1,0);
P2:=IF(C<REF(O,2) AND F<0,1,0);
LIN:=IF(P1=0 AND REF(P1,1)=1 AND P2=0 AND REF(P2,1)=1,1,0);
SS1:=CROSS(OSC,MAOSC) AND LIN;
DRAWTEXT(SS1,-20,'←反弹'),COLOR00FFFF;
STICKLINE(SS1,-60,-20,1,1),COLOR00FFFF;
SS:=CROSS(OSC,MAOSC) AND CROSS(BIASWP,BIASMA) AND LIN;
DRAWTEXT(SS,-60,'←激进'),COLORRED;
STICKLINE(SS,-70,-30,0.2,0),COLORRED;
A2:=BARSLAST(REF(CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3)),1));
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));
A3:=BARSLAST(REF(CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)),1));
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));
STICKLINE(B2>0,-146,-134,1,0),COLOR00FFFF;
DRAWTEXT(B2>0,-138,'←启动'),COLORYELLOW;
STICKLINE(B3>0,-94,-82,1,0),COLORFF00FF;
DRAWTEXT(B3>0,-86,'←走强'),COLORFF00FF;
FL:=V>REF(V,1) OR V>MA(V,5);
SZ:=(CROSS(C,MA(C,3)) OR CROSS(C,MA(C,5))) AND C>=O;
放量:=IF(FL AND SZ,1,0);
STICKLINE(放量,-120,-108,1,0),COLORLIRED;
DRAWTEXT(放量,-112,'←放量'),COLORLIRED;
弱转强:=CROSS(CCI,-200) AND CCI>REF(CCI,1);
STICKLINE(弱转强,108,100,0.5,0),COLORRED;
DRAWTEXT(弱转强,125,'←出击'),COLORRED;