bzlr 发表于 2014-1-12 18:01 
这是我的主图指标里DDMM上下轨和DDMM1831这一部分的代码,你把你原来有关于这两部分的主图代码用下面的代 ...
谢谢你的验证与发现问题,用DDMM确是有未来强势中DMR就不下穿上轨。过后又下穿了,虽然在强区不会有损失,可放过了不少机会。针对这点,有人提出了改进,用没有未来数据的股价隧道替代DDMM,出类似DMR信号的隧道M,也就是没有未来的DMR下穿没有未来的股价隧道。出信号下一天买,或当天收盘买,自己验证哪个好。
这里前 八天有涨停的,隧道M,是没有未来。四天前上穿DDMM上轨而今下穿13M的RTAA有点未来。
{股价隧道 主图叠加}
V1:=MA(CLOSE,3);
V2:=MA(CLOSE,2*3);
V3:=MA(CLOSE,3*3);
V4:=MA(CLOSE,4*3);
V5:=MA(CLOSE,5*3);
V6:=MA((V1+V2+V3+V4+V5)/5,5);
上轨:V6*(1+6.5/100);
下轨:V6*(1-6.5/100);
MMDDP1AC:=IF(C>500,1.02,1.06);
MMDDP2AC:=IF(C>500,0.96,0.9);
MMDDP3AC:=IF(C>500,1.008,1.035);
MMDDP4AC:=IF(C>500,0.987,0.965);
MMDDP1C:=IF(HOUR!=0,MMDDP3AC,MMDDP1AC);
MMDDP2C:=IF(HOUR!=0,MMDDP4AC,MMDDP2AC);
卖出C:=XMA((C+H+O+L)/4,12)*MMDDP1C;
买入C:=XMA((C+H+O+L)/4,32)*MMDDP2C;
DMR:DMA((C+H+O+L)/4,12)*MMDDP1C,COLOR0088FF,LINETHICK1;
MA3:MA(CLOSE,3),NODRAW,COLORYELLOW;
E40:EMA(CLOSE,40),NODRAW,COLORFFFFFF;
M10:=MA(CLOSE,10);
M13:=MA(CLOSE,13);
M13A:IF(HOUR=0,M13,M10),NODRAW,COLOR00FF00;
M13S:IF(M13A>REF(M13A,1),M13A,DRAWNULL),NODRAW,COLOR0000FF;
M3:=MA(CLOSE,3),COLOR00FF00;
AAA:=CONST(HHV(H,160));
TS1:=0+0.03;
TS2:=TS1+0.03;
TS3:=TS2+0.03;
二:C*1.023,NODRAW,COLOR00FFFF;
三:C*1.033,NODRAW,COLORGREEN;
四:C*1.043,NODRAW,COLOR00FFFF;
五:C*1.053,NODRAW,COLORGREEN;
六:C*1.065,NODRAW;
七:C*1.073,NODRAW,COLOR00FFFF;
八:C*1.083,NODRAW,COLORGREEN;
{蓝线 }
RL3:REF(L,1)*(1+4.3*0.01),COLORFF0000;
DRAWNUMBER(ISLASTBAR,L*(1+4.3*0.01),RL3),COLOR00FFFF;
FH:100*(H-REF(C,1))/REF(C,1),COLOR88AAFF,NODRAW;
F:=100*(C-REF(C,1))/REF(C,1);
今小昨:=IF(C<REF(O,1) AND F<0,1,0);
P1:=今小昨;
今小前:=IF(C<REF(O,2) AND F<0,1,0);
P2:=今小前;
STICKLINE(P1=0 AND REF(P1,1)=1 AND P2=0 AND REF(P2,1)=1,OPEN,CLOSE,1,0),COLORMAGENTA;
STICKLINE(P1=1 AND REF(P1,1)=0 AND P2=1 AND REF(P2,1)=0,OPEN,CLOSE,1,0),COLORAAAAAA;
A1:=CLOSE;
A2:=OPEN;
STICKLINE(A1<A2 AND F<-2.489 AND F>-5,A1+(A2-A1)/3,A1+(A2-A1)/3,1,0),COLORRED;
STICKLINE(A1<A2 AND F<-2.489 AND F>-5,A1+2*(A2-A1)/3,A1+2*(A2-A1)/3,1,0),COLORRED;
STICKLINE(A1<A2 AND F<=-5 AND F>-7,A1+(A2-A1)/2,A1+(A2-A1)/2,1,0),COLORRED;
STICKLINE(A1<A2 AND F<=-7 AND F>-10,A1+2*(A2-A1)/3,A1+(A2-A1)/3,3,1),COLORRED;
STICKLINE(A1<A2 AND F<=-9.9,A2,A1,3,0),COLOR00FF00;
STICKLINE(A1>A2 AND F>2.9 AND F<5,A2+(A1-A2)/3,A2+(A1-A2)/3,1,0),COLORYELLOW;
STICKLINE(A1>A2 AND F>2.9 AND F<5,A2+2*(A1-A2)/3,A2+2*(A1-A2)/3,1,0),COLORYELLOW;
STICKLINE(A1>A2 AND F>=5 AND F<7,A2+(A1-A2)/2,A2+(A1-A2)/2,1,0),COLORYELLOW;
STICKLINE(A1>A2 AND F>=7 AND F<10,A2+2*(A1-A2)/3,A2+(A1-A2)/3,1,1),COLORYELLOW;
STICKLINE(A1>A2 AND F>=9.9,A1,A2,1,0),COLORYELLOW;
STICKLINE(F>5,C,O,2.2,0),COLORFFFFFF;
MMDDP1A:=IF(C>500,1.02,1.06);
MMDDP2A:=IF(C>500,0.96,0.9);
MMDDP3A:=IF(C>500,1.008,1.035);
MMDDP4A:=IF(C>500,0.987,0.965);
MMDDP1:=IF(HOUR!=0,MMDDP3A,MMDDP1A);
MMDDP2:=IF(HOUR!=0,MMDDP4A,MMDDP2A);
卖出:=XMA((C+H+O+L)/4,12)*MMDDP1,COLORGREEN,LINETHICK2;
STICKLINE(H>卖出,(C+O)/2,H,0.2,0),COLORFFFFFF;
RL3A:=REF(L,1)*(1+3.3*0.01),COLORFF0000;
STICKLINE(H>RL3A,(O+C)/2,H,0.1,0),COLOR00FFFF;
IF(H>=上轨 ,上轨,DRAWNULL),POINTDOT,COLOR000FFF,LINETHICK9;
{红灰区副图}
低三:(L+0.00)*1.033,NODRAW,COLORGREEN;
低四:(L+0.00)*1.043,COLOR0088FF,NODRAW;
低五:L*1.053,NODRAW,COLORFFFFFF;
低六:(L+0.00)*1.063,COLORRED,NODRAW;
低七:(L+0.00)*1.073,COLOR0088FF,NODRAW;
FH:100*(H-REF(C,1))/REF(C,1),COLOR88AAFF,NODRAW;
二:C*1.023,NODRAW,COLOR00FFFF;
三:C*1.033,NODRAW,COLORGREEN;
四:C*1.043,NODRAW,COLOR00FFFF;
五:C*1.053,NODRAW,COLORGREEN;
六:C*1.063,NODRAW;
七:C*1.073,NODRAW,COLOR00FFFF;
MZ1:=BARSCOUNT(C)>=15;
MZ2:=CAPITAL*0.000001<10.5;
MZ3:=C<=32 AND REF(C<=35,1) AND REF(C<=35,2);
MZ4:= NAMELIKE('ST')=0 AND NAMELIKE('*ST')=0 AND NAMELIKE('SST')=0 AND NAMELIKE('S*ST')=0 AND NAMELIKE('S ST')=0;
NNN:=MZ1 AND MZ2 AND MZ3 AND MZ4;
M13:=MA(C,13);
MMDDP1A:=IF(C>500,1.02,1.06);
MMDDP3A:=IF(C>500,1.008,1.035);
MMDDP1:=IF(HOUR!=0,MMDDP3A,MMDDP1A);
上轨:=XMA((C+H+O+L)/4,12)*MMDDP1;
DM:=DMA((C+H+O+L)/4,12)*MMDDP1;
STICKLINE(上轨>REF(上轨,1),1,0,5,0),COLOR000033;
STICKLINE(上轨<REF(上轨,1),1,0,5,0),COLOR444444;
DMR:=CROSS(上轨,DM) AND NNN ,STICK COLORWHITE LINETHICK2;
DMR上穿上轨:IF(CROSS(DM,上轨),CROSS(DM,上轨)*0.98,DRAWNULL),CIRCLEDOT COLORRED LINETHICK2;
RTAA:=C<M13 AND REF(COUNT(H>上轨,4)>0,1) AND 上轨>REF(上轨,1) AND REF(H>上轨,1)=0 AND NNN ;
V1:=MA(CLOSE,3);
V2:=MA(CLOSE,2*3);
V3:=MA(CLOSE,3*3);
V4:=MA(CLOSE,4*3);
V5:=MA(CLOSE,5*3);
V6:=MA((V1+V2+V3+V4+V5)/5,5);
上轨M:=V6*(1+6.5/100);
隧道M:=CROSS(上轨M,DM);
STICKLINE(隧道M,1.2,0,1,1),COLORFFFFFF;
STICKLINE(RTAA,0,0.6,0.1,0),COLORGREEN;
{前8天有涨停止线}
MZ5A:=COUNT(C/REF(C,1)>1.09,8);
MZ6:=REF(C,1)/C>1.03 OR (C<REF(MIN(C,O),1) AND C<O);
八天:NNN AND MZ5A AND MZ6,COLORYELLOW ;
|