![[轉(zhuǎn)載]優(yōu)化版青云直上強勢狙擊牛股主副圖+選股指標(biāo)源碼【通達(dá)信】](http://image105.360doc.com/DownloadImg/2017/04/2221/97310692_1.jpg "[轉(zhuǎn)載]優(yōu)化版青云直上強勢狙擊牛股主副圖+選股指標(biāo)源碼【通達(dá)信】")
主圖
生命線:(EMA(C,60)),LINETHICK2,COLORWHITE;
AA01:EMA(C,18),LINETHICK0;
AA05:EMA(C,5),LINETHICK0,COLOR0099CC;
五日乖離率:=(C-AA05)/AA05*100;
BB05:=ATAN((AA05/REF(AA05,1)-1)*100)*180/3.1416;
速度5:=SMA(EMA((AA05-REF(AA05,1))/REF(AA05,1),3)*100,3,1);
加速度5:EMA((速度5-REF(速度5,1)),3),NODRAW;
IF(BB05>30 AND AA05>REF(AA05,1),
AA05,DRAWNULL),LINETHICK0;
AA10:EMA(C,10),LINETHICK0;
AA20:=EMA(C,20),LINETHICK0;
BB10:=ATAN((AA10/REF(AA10,1)-1)*100)*180/3.1416;
IF(BB05<0 AND AA05<REF(AA05,1),
AA05,DRAWNULL),LINETHICK0;
AA30:EMA(C,30),LINETHICK0;
IF(BB05>30 AND AA01>REF(AA01,1),
AA01,DRAWNULL),POINTDOT,LINETHICK4,COLORYELLOW;
IF(BB05<0 AND AA01<REF(AA01,1),
AA01,DRAWNULL),POINTDOT,LINETHICK4,COLORGREEN;
三拾日乖離率:(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),LINETHICK0,COLORFF00FF;
強勢狙擊:=FILTER(BB30>30 AND BB10>45 AND
CROSS(BB05,60),10);
加倉:=FILTER(COUNT(CROSS(BB05,30),5)>=1 AND
AA05>REF(AA05,1) AND
三拾日乖離率>REF(三拾日乖離率,1) AND
AA10>REF(AA10,1)
AND 加速度5>REF(加速度5,1) AND
速度5>REF(速度5,1) ,10)
;
清倉:=FILTER(COUNT(CROSS(30,BB05),5)>=1 AND
(C>AA30 OR O>AA30) AND
AA05<REF(AA05,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
AA05>REF(AA05,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;
副圖
AA05:=EMA(C,5);
五日乖離率:=(C-AA05)/AA05*100;
BB05:=ATAN((AA05/REF(AA05,1)-1)*100)*180/3.1416;
速度5:=SMA(EMA((AA05-REF(AA05,1))/REF(AA05,1),3)*100,3,1);
加速度5:=EMA((速度5-REF(速度5,1)),3);
AA10:=EMA(C,10);
AA20:=EMA(C,20);
BB10:=ATAN((AA10/REF(AA10,1)-1)*100)*180/3.1416;
AA30:=EMA(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;
強勢狙擊:FILTER(BB30>30 AND BB10>45 AND
CROSS(BB05,60),10);
加倉:FILTER(COUNT(CROSS(BB05,30),5)>=1 AND
AA05>REF(AA05,1) AND
三拾日乖離率>REF(三拾日乖離率,1) AND
AA10>REF(AA10,1)
AND 加速度5>REF(加速度5,1) AND
速度5>REF(速度5,1) ,10)
;
JC:=CROSS(0,五日乖離率) AND 三拾日乖離率<REF(三拾日乖離率,1) AND
AA10>REF(AA10,1) ;
MR:=COUNT(CROSS(五日乖離率,0),3)>=1 AND
三拾日乖離率>REF(三拾日乖離率,1) AND
AA05>REF(AA05,1) AND
(C/REF(C,1)-1)*100>5 AND
REF(C,1)<AA30;
買入:FILTER(MR,10);
選股
AA05:=EMA(C,5);
五日乖離率:=(C-AA05)/AA05*100;
BB05:=ATAN((AA05/REF(AA05,1)-1)*100)*180/3.1416;
AA30:=EMA(C,30);
三拾日乖離率:=(C-AA30)/AA30*100;
MR:=COUNT(CROSS(五日乖離率,0),3)>=1 AND
三拾日乖離率>REF(三拾日乖離率,1) AND
AA05>REF(AA05,1) AND
(C/REF(C,1)-1)*100>5 AND
REF(C,1)<AA30;
買入:FILTER(MR,10);
|
