主图共振源码

阅读作者：股海网时间 2012-03-04 通达信公式

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;
VAR11:=(AA20-AA30)>REF((AA20-AA30),1) AND AA20>REF(AA20,1) AND AA30>REF(AA30,1);
VAR22:=(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) ;
清仓:=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);

TYP := (HIGH + LOW + CLOSE)/3;
CCI1:=(TYP-EMA(TYP,6))/(0.015*AVEDEV(TYP,6));
差值1:=ABS(REF(CCI1,1)-CCI1);
CCI2:=(TYP-EMA(TYP,10))/(0.015*AVEDEV(TYP,10));
差值2:=ABS(REF(CCI2,1)-CCI2);
CCI3:=(TYP-EMA(TYP,20))/(0.015*AVEDEV(TYP,20));
差值3:=ABS(REF(CCI3,1)-CCI3);
CCI4:=(TYP-EMA(TYP,30))/(0.015*AVEDEV(TYP,30));
差值4:=ABS(REF(CCI4,1)-CCI4);
CCI5:=(TYP-EMA(TYP,60))/(0.015*AVEDEV(TYP,60));
差值5:=ABS(REF(CCI5,1)-CCI5);
CCI:=CCI1+CCI2+CCI3+CCI4+CCI5;
AAA:=(3*C+H+L+O)/6;
VAR1:=EMA(AAA,8);
VAR2:=(HHV(VAR1,5)+HHV(VAR1,10)+HHV(VAR1,20))/3;
VAR3:=(LLV(VAR1,5)+LLV(VAR1,10)+LLV(VAR1,20))/3;
VAR4:=(HHV(VAR2,5)+HHV(VAR2,10)+HHV(VAR2,20))/3;
VAR5:=(LLV(VAR3,5)+LLV(VAR3,10)+LLV(VAR3,20))/3;
VAR6:=(LLV(VAR1,2)+LLV(VAR1,4)+LLV(VAR1,6))/3;
短线:VAR1,COLORWHITE,LINETHICK3;
中线:VAR6,COLORYELLOW,LINETHICK3;
下跌:=IF(VAR1=VAR6,VAR6,0);

{条件1}
TJ1:= CCI1>差值4;
立桩量:=TJ1;
TJ2:=IF(BARSLAST(立桩量)=1 ,1,IF(BARSLAST(立桩量)=2 ,1,IF(BARSLAST(立桩量)=3 ,1,0)));

三天法则1:=TJ2=1;
确认1:=FILTER(三天法则1,5);
TJ11:= CCI1<-差值4 ;
立桩量2:=TJ11;
TJ22:=IF(BARSLAST(立桩量2)=1 AND CLOSE>REF(HIGH,1),1,
IF(BARSLAST(立桩量2)=2 AND CLOSE>REF(HIGH,2),1,
IF(BARSLAST(立桩量2)=3 AND CLOSE>REF(HIGH,3),1,0)));

三天法则2:=TJ22=1;
确认2:=FILTER(三天法则2,5);
TJ111:=(ABS(CCI1)>CCI AND ABS( 差值1)> ABS(差值5));
立桩量3:=FILTER(TJ111,5);
TJ222:=IF(BARSLAST(立桩量3)=1 AND CLOSE>REF(HIGH,1),1,IF(BARSLAST(立桩量3)=2 AND
CLOSE>REF(HIGH,2),1,IF(BARSLAST(立桩量3)=3 AND CLOSE>REF(HIGH,3),1,0)));

VAR55:=LLV(LOW,34);
VAR66:=HHV(HIGH,34);
SD:=6000*(CLOSE-VAR55)/(VAR66-VAR55);
个股:=EMA(SD,3);
VAR77:=LLV(INDEXL,34);
VAR88:=HHV(INDEXH,34);
DP:=6000*(INDEXC-VAR77)/(VAR88-VAR77);
大盘:=EMA(DP,3);

观望:=(C<VAR1);
入场:=(C>VAR1);
激进1:=(C>VAR1 AND O<VAR1 AND C>VAR6 AND O<VAR6 AND COUNT(观望,2)=1 AND COUNT(入场,1)=1);
激进2:=(COUNT(观望,2)=1 AND COUNT(入场,1)=1 AND C>VAR1);
激进:=((激进1 OR 激进2) AND 个股<4600);
稳健1:=((强势 OR 狙击) AND 短线>中线);
稳健:=(COUNT(激进,2)=1 AND COUNT(稳健1,2)=1 AND C>VAR1 AND 个股<4600);
LC:=REF(CLOSE,1);
RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);
调整:=(CROSS(88,RSI) AND (HIGH*1.02));

STICKLINE(激进,OPEN,CLOSE,4,1),COLORCYAN;
STICKLINE(激进,OPEN,CLOSE,1,0),COLORWHITE;

STICKLINE(稳健,OPEN,CLOSE,4,1),COLORWHITE;
STICKLINE(稳健,OPEN,CLOSE,1,0),COLORMAGENTA;

STICKLINE(调整,OPEN,CLOSE,4,0),COLORBLUE;
STICKLINE(调整,OPEN,CLOSE,1,1),COLORWHITE;

主图共振源码