通达信简单修改的黄金短线源码

AA03:MA(C,3),LINETHICK3,COLOR0099CC;

五日乖离率:=(C-AA03)/AA03*100;

BB03:=ATAN((AA03/REF(AA03,1)-1)*100)*180/3.1416;

速度5:=SMA(EMA((AA03-REF(AA03,1))/REF(AA03,1),3)*100,3,1);

加速度5:EMA((速度5-REF(速度5,1)),3),NODRAW;

IF(BB03 30 AND AA03 REF(AA03,1), AA03,DRAWNULL),LINETHICK3,COLORCYAN;

AA10:MA(C,10);AA20:=MA(C,20);

BB10:=ATAN((AA10/REF(AA10,1)-1)*100)*180/3.1416;

IF(BB03 0 AND AA03 REF(AA03,1), AA03,DRAWNULL),LINETHICK3,COLORYELLOW;

AA30:MA(C,30);

三拾日乖离率:(C-AA30)/AA30*100,NODRAW;

VAR1:=(AA20-AA30) REF((AA20-AA30),1) AND AA20 REF(AA20,1) AND AA30 REF(AA30,1);

VAR2:=(AA30-AA20) REF((AA30-AA20),1) AND AA20 REF(AA20,1) AND AA30 REF(AA30,1);

BB30:=ATAN((AA30/REF(AA30,1)-1)*100)*180/3.1416;

IF(BB30 15 AND AA30 REF(AA30,1), AA30,DRAWNULL),LINETHICK3,COLORFF00FF;

强势狙击:=FILTER(BB30 30 AND BB10 45 AND CROSS(BB03,60),10);

加仓:=FILTER(COUNT(CROSS(BB03,30),5) =1 AND AA03 REF(AA03,1) AND 三拾日乖离率 REF(三拾日乖离率,1) AND AA10 REF(AA10,1)

AND 加速度5 REF(加速度5,1) AND 速度5 REF(速度5,1) ,10) ;

清仓:=FILTER(COUNT(CROSS(30,BB03),5) =1 AND (C AA30 OR O AA30) AND AA03 REF(AA03,1) AND 三拾日乖离率 REF(三拾日乖离率,1) AND AA10 REF(AA10,1),10);

DRAWTEXT(加仓 ,LOW*0.98,' 加仓'),COLORRED;

JC:=CROSS(0,五日乖离率) AND 三拾日乖离率 REF(三拾日乖离率,1) AND AA10 REF(AA10,1) ;

减仓:=FILTER(JC,10);

MR:=COUNT(CROSS(五日乖离率,0),3) =1 AND 三拾日乖离率 REF(三拾日乖离率,1) AND AA03 REF(AA03,1) AND (C/REF(C,1)-1)*100 5 AND REF(C,1) AA30;

买入:=FILTER(MR,10);

DRAWTEXT(减仓,HIGH*1.02,' 减仓'),COLORCYAN;

DRAWTEXT(买入,LOW*0.98,' 买入'),COLORYELLOW;

DRAWTEXT(清仓 ,HIGH*1.02,' 清仓'),COLORGREEN;

DRAWTEXT(强势狙击,LOW*0.98,' 强势狙击'),COLORYELLOW;

VAR21:=MAX(ABS(HIGH-AMOUNT/VOL/100),ABS(AMOUNT/VOL/100-LOW));

VAR3:=ABS((OPEN+CLOSE)/2-AMOUNT/VOL/100);

MV:=(VAR21+VAR3)/AMOUNT*VOL*100*50;

DRAWTEXT(MV 6 AND L =LLV(L,10),L*0.95,' 异动'),COLORCYAN;