在线检测未来函数

将这个底背离选股公式改成通达信的选股公式

来源:Internet,编辑:股旁网,2012-06-30

编写条件:

{底背离} {INPUT:N(20,0,80);} {1.MACD} DIFF :=EMA(CLOSE,7) - EMA(CLOSE,13); DEA := EMA(DIFF,3); MACD := 2*(DIFF-DEA); A1:=BARSLAST(REF(CROSS(DIFF,DEA),1)); B1:=REF(C,A1+1)>C AND REF(DIFF,A1+1)C AND REF(K,A2+1)C AND REF(RSI1,A3+1)REF(CCI4,1) AND CROSS(CCI4,-100); { CCI底背离'} XG:((B1 AND B2) OR (B2 AND B3) OR (B1 AND B3) OR ( B4 AND CCI4<-90) ) AND D编写方法:

&nbsp;
N:=20; 
{1.macd}
DIFF :=EMA(CLOSE,7) - EMA(CLOSE,13);
DEA  := EMA(DIFF,3);
MACD := 2*(DIFF-DEA);
A1:=BARSLAST(REF(crOSS(DIFF,DEA),1));
B1:=REF(C,A1+1)>C AND REF(DIFF,A1+1)<DIFF AND CROSS(DIFF,DEA);{MACD底背离}
{2.kdj}
RSV:=(CLOSE-LLV(LOW,18))/(HHV(HIGH,18)-LLV(LOW,18))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
A2:=BARSLAST(REF(CROSS(K,D),1));
B2:=REF(C,A2+1)>C AND REF(K,A2+1)<K AND CROSS(K,D);{kdJ底背离}
{3.rsi}
LC := REF(CLOSE,1);
RSI1:=SMA(MAX(CLOSE-LC,0),7,1)/SMA(ABS(CLOSE-LC),7,1)*100;
RSI2:=SMA(MAX(CLOSE-LC,0),14,1)/SMA(ABS(CLOSE-LC),14,1)*100;
A3:=BARSLAST(REF(CROSS(RSI1,RSI2),1));
B3:=REF(C,A3+1)>C AND REF(RSI1,A3+1)<RSI1 AND CROSS(RSI1,RSI2);{RSI底背离}
TYB:= (HIGH + LOW + 2*CLOSE)/4;
cci4:=(TYB-MA(TYB,28))/(0.015*AVEDEV(TYB,28));
B4:=LAST(MA(C,5)<MA(C,10),10,5)  AND CCI4>REF(CCI4,1) AND CROSS(CCI4,-100);  { CCI底背离'}
XG:((B1 AND B2) OR (B2 AND B3) OR (B1 AND B3) OR ( B4 AND CCI4<-90) ) AND D<N ;
 

相关文章