六彩神龙指标

最近在网上看了不少讨论弘历软件中的一个指标叫六彩神龙,通过分析原理和参考网上的资料,本人写了一个在通达信软件中用的指标指标,现在拿出来大家共享,望得到高手的指点。
名字自己取吧。
m:=13;n:=30;
A01:=(C+O+L+H)/4;
A02:=(WINNER((A01 *
A03:=(WINNER((A01 *
A04:A03,NODRAW;
A08:A02-A03,NODRAW;
A06:( 100.000 - A02),NODRAW;
STICKLINE( 1.000,0,A04, 2,0),COLORRED;
STICKLINE( 1.000, 100.000,A02, 2,0),COLORGREEN;
STICKLINE( 1.000,A04,(100-A06), 2,0),COLORYELLOW;
A0A:=(((((HHV(A04, 15.000) - A03) / A03)
*
STICKLINE(A0A,(0 -
STICKLINE(NOT(A0A),(0 -
获利:MA(A03,M),COLORRED,LINETHICK3;
浮动: (MA(A02,M) - MA(A03,M)),COLORYELLOW,LINETHICK3;
套牢: (100.000 - MA(A02,M)),COLORGREEN,LINETHICK3;
m和n是参数,会设置的可以灵活些,不会设置的直接用典型值,我通过试验还是典型值比较好。效果见下图。用法和弘历软件中的六彩神龙一样。
http://www.88gs.com/soft/UploadPic/2010-9/2010914452448145.gif
买入三涨停
T:=DYNAINFO(8)>0;
VO:=VOL=LLV(VOL,100) AND T;
操盘线:=EMA(((SLOPE(C,22)*20)+C),55);
DA:=(EMA(H,1)+EMA(L,1)+EMA(H,1)+EMA(H,1))/4;
DA9:=(EMA(C,1)+EMA(C,2)+EMA(C,3)+EMA(C,4))/4;
DB9:=(EMA(C,10)+EMA(C,20)+EMA(C,40)+EMA(C,80))/4;
启动:=CROSS(DA9-DB9,0) AND CROSS(DA,操盘线);
SS1:=(LOW+HIGH+CLOSE*2)/4;
SS2:= MA(SS1,4);
SS3:=HHV(SS2,10);
SS4:=MA(SS3,3);
SS5:=1.25*SS4-0.25*SS3;
XKKJ:=IF(SS5>SS3,SS3,SS5);
FF1:=LLV(SS2,10);
FF2:=MA(FF1,3);
FF3:=1.25*FF2-0.25*FF1;
DKKJ:=IF(FF3<FF1,FF1,FF3);
MA13:=MA(C,13);
ZDHM:=CROSS(C,DKKJ) AND CROSS(C,MA13) AND CROSS(C,XKKJ);
ZHM:=CROSS(C,MA13) AND CROSS(C,XKKJ);
的卢:=ZDHM OR ZHM;
ZF:=9;
HIGH2:=20;
A:=(3*C+L+O+H)/6;
XX:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+
14*REF(A,6)+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12)
+7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+
REF(A,20))/210;
MIDDLE:=EMA(XX,13);
KKAY:=EMA(C,5);
KKBY:=EMA(KKAY,8);
KKCY:=EMA(KKBY,13);
LONG :=EMA(KKCY,50);
KAAA3Y:=REF(C,1)<REF(MIDDLE,1) AND
C>MIDDLE;
KBBB3Y:=C/REF(C,1)>1+0.01*ZF;
KCCC3Y:=MIDDLE/LONG <1+0.01*HIGH2;
资金:=KAAA3Y AND KBBB3Y AND KCCC3Y;
的卢 AND 启动 AND 资金;
趋势阶梯
JJ:=(CLOSE+HIGH+LOW)/3;
A:=EMA(JJ,13);
B:=REF(A,1);
M1:=EMA(CLOSE,3);
M2:=EMA(CLOSE,8);
M3:=EMA(M2,13);
M4:EMA(M2,55);
持股区域:STICKLINE(A>B,A,B,6,0),COLORRED;
持币区域:STICKLINE(A<B,A,B,6,0),COLORGREEN;
TT2:=DMA((((HIGH + LOW) + (CLOSE * 2)) / 4.15),0.9);
TT1:=REF(EMA(TT2,3),1);
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
LC:=REF(CLOSE,1);
RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) *
100);
FF:=EMA(CLOSE,3);
AA1:=AMOUNT/VOL;
BB1:=L<AA1*0.9;
CC1:=(C-REF(C,1))/REF(C,1)*100>1.2;
DD1:=L<MA(C,5)*0.921;
EE1:=VOL<MA(V,5)*1.5;
FF1:=BB1 AND CC1 AND DD1 AND EE1;
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);
TT3:=P1=0 AND REF(P1,1)=1 AND P2=0 AND REF(P2,1)=1 ;
TT4:=P1=1 AND REF(P1,1)=0 AND P2=1 AND REF(P2,1)=0 ;
Z1:=MA(C,13);
ZX:=REF(Z1,13/2+1);
DRAWICON(CROSS(ZX,C),H*1.01,2);
DRAWTEXT(CROSS(CLOSE,TT1)AND
J<55,LOW,'买'),COLORRED;
DRAWTEXT(CROSS(88,RSI),HIGH * 1.02,'短顶'),COLOR00FFFF;
STICKLINE(TT3,OPEN,CLOSE,3,0),COLORFF00FF;
A1:=EMA(C,14)COLORWHITE,LINETHICK1;
A1X:=(A1-REF(A1,1))/REF(A1,1)*100,NODRAW;
出击:IF(A1X>=0,REF(EMA(C,14),BARSLAST(CROSS(A1X,0))+1),DRAWNULL)COLORRED,LINETHICK1;
休假:IF(A1X<0,REF(EMA(C,14),BARSLAST(CROSS(0,A1X))+1),DRAWNULL)COLORGREEN,LINETHICK1;
STICKLINE(CROSS(A1X,0),C,O,2,0)COLORYELLOW;
STICKLINE(CROSS(0,A1X),C,O,2,0)COLORGREEN;
STICKLINE(CROSS(A1X,0)OR
CROSS(0,A1X),REF(EMA(C,14),1),REF(EMA(C,14),1)*0.998,2,0)COLORWHITE;
STICKLINE(ISLASTBAR,REF(EMA(C,14),1),REF(EMA(C,14),1)*0.998,5,0)COLORWHITE;
工作线:=EMA(C,14);
止盈线:EMA(C,7),LINETHICK1,COLORGRAY;
工作区:IF(C>=工作线 AND
EMA(C,14)>=EMA(C,25),工作线,DRAWNULL),
COLORRED,LINETHICK2;
生命线:EMA(C,25),COLORYELLOW;
{DRAWICON(CROSS(工作线,生命线),工作线*0.95,5);原句}
IF(CROSS(工作线,生命线),工作线*0.975,DRAWNULL),CIRCLEDOT,COLORRED;
DRAWICON(CROSS(C,生命线) AND
C>EMA(C,14),L*0.99,1);
DRAWICON(COUNT(C<EMA(C,7),2)=2 AND
EMA(C,7)>EMA(C,14) AND
COUNT(C>止盈线,6)>=3,H*1.03,2);
突破后回调20或60日均线的预警或选股
满足以下条件:
1:20日
2:回调前5个交易日前 突破20日 60日线后涨幅大于百分之5
3:回调时盘中可跌破20 或60线百分之三以内
希望能做成选股和盘中预警公式!
公式源码:
MA5:=MA(C,5);
MA10:=MA(C,10);
MA20:=MA(C,20);
MA60:=MA(C,60);
大阳:=(C-REF(C,1))/REF(C,1)*100>7 AND
C>O;
多头排列:=MA5>MA10 AND MA10>MA20 AND
MA20>MA60 AND
MA20>=REF(MA20,20);
回调:=L<=MA10*1.015 AND
COUNT(C>MA10,3)>=2 AND
REF(L>MA10,1) AND C>MA20;
缩量:=V<REF(V,1) AND
V<MA(V,5);
XG:EXIST(大阳,10) AND 多头排列 AND 回调 AND 缩量;