- 金币:
-
- 奖励:
-
- 热心:
-
- 注册时间:
- 2003-10-9
|
|
本帖最后由 djhua8 于 2014-9-8 05:43 编辑
我用的嘟嘟买卖60是在原来的嘟嘟60上加了新三线法公式，中间有重复的，按提示逐一去掉后，就没有了紫阳信号，请大家帮助看看是哪里出了问题。主要是想在三线法主图里加上必赚线虚线轨道。谢谢了。
M3:MA(CLOSE,3)COLORRED;
M10:=MA(CLOSE,10);
M13:=MA(CLOSE,13);
M13A:IF(HOUR=0,M13,M10),COLORYELLOW;
E40:=EMA(CLOSE,40),COLORFFFFFF;
VAR1:=(C+H+O+L)/4;
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;
買入:XMA((C+H+O+L)/4,32)*MMDDP2,COLORMAGENTA,LINETHICK2;
IF(賃出>REF(賃出,1),賃出,DRAWNULL),COLOR00FFFF,LINETHICK2;
{日期值}
賃出PP:=IF(HOUR=0,賃出,賃出*1.02);
買入PP:=IF(HOUR=0,買入,買入/1.02);
STICKLINE(DATE=1130419,賃出PP,H*1.01,0,-1),COLORFFFFFF;
STICKLINE(DATE=1130419
,L/1.01,買入PP,0,-1),COLORFFFFFF;
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;
必賺:買入C+(賃出C-買入C)/3.5,COLOR00FFFF,DOTLINE;
必賃:賃出C-(賃出C-買入C)/4.5,COLORRED,DOTLINE;
{藍線 }
RL4.5:REF(L,1)*(1+N*0.01+0.000),COLORFF0000;
DRAWNUMBER(ISLASTBAR,L*(1+N*0.01+0.000),RL4.5),COLORFF0000;
{出黃頭}
HH:=LLV(L,7)*1.127 ;
STICKLINE(H>=HH,H,H*1.005,1,0),COLOR00FFFF;
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;
STICKLINE(F>5,C,O,2.2,0),COLORFFFFFF;
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;
{三2法買賃僐}
STICKLINE(ISLASTBAR,REF(C,3),REF(C,3),6,-1),COLORFFFFFF;
DRAWNUMBER(C>0 AND ISLASTBAR,REF(C,3),REF(C,3)),COLORFFFFFF;
{CCI桔糡麮}
IF(CCI<-80 AND CCI>REF(CCI,1),L/1.01,DRAWNULL),POINTDOT,COLOR8888FF,LINETHICK7;
DRAWNUMBER(CCI<-100 AND CCI>-128 AND REF(CCI,1)<-128,L/1.01,INTPART(CCI)),COLOR8888FF;
IF(C>MA(C,3),XMA((C+H+O+L)/4,12)*MMDDP1,DRAWNULL),COLOR000FFF,POINTDOT,LINETHICK7;
判斷賃出:=IF(賃出<REF(賃出,1),賃出,DRAWNULL),COLORGREEN,LINETHICK2;
判斷買入:IF(買入<REF(買入,1),買入,DRAWNULL),COLORCYAN,LINETHICK2;
{出綠麮}
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;
X:=LLV(J,2)=LLV(J,8);
RE:=CROSS(J,REF(J+0.01,1)) AND X AND J<19;
STICKLINE(RE AND E40>REF(E40,5),買入,買入/1.01,1,0),COLOR00FF00;
{三跌}
XG:=H>=HHV(H,5);
TF:=BARSLAST(XG);
L1:=IF(L<(0.989*REF(L,TF)),1,0);
L11:=L1 AND COUNT(L1,TF)<2 AND TF<30 AND TF>0;
T2:=BARSLAST(L11);
L2:=IF(L<(0.989*REF(L,T2)),1,0);
L22:=L2 AND COUNT(L2,T2)<2 AND T2<30 AND TF>0 AND T2>0;
DRAWTEXT(L22,L,'二跌'),COLORYELLOW;
T3:=BARSLAST(L22);
L3:=IF(L<(0.989*REF(L,T3)),1,0);
L33:=L3 AND COUNT(L3,T3)<2 AND T3<30 AND TF>0 AND T2>0 AND T3>0;
IF(CCI<-80 AND CCI>REF(CCI,1),L/1.01,DRAWNULL),POINTDOT,COLOR8888FF,LINETHICK7;
DRAWNUMBER(CCI<-100 AND CCI>-128 AND REF(CCI,1)<-128,L/1.01,INTPART(CCI)),COLOR8888FF;
TT2:=DMA((((HIGH + LOW) + (CLOSE * 2)) / 4.15),0.9);
TT1:=REF(EMA(TT2,3),1);
DRAWTEXT(CROSS(CLOSE,TT1)AND J<55,LOW,'买'),COLORRED;
IF(HOUR=15,H*1.008,DRAWNULL),POINTDOT,COLORFFFAAA,LINETHICK9;
IF(HOUR=15,H*1.008,DRAWNULL),POINTDOT,COLOR000FFF,LINETHICK5;
IF(HOUR=15,H*1.005,DRAWNULL),POINTDOT,COLORFFF000,LINETHICK9;
IF(HOUR=15,H*1.005,DRAWNULL),POINTDOT,COLOR000FFF,LINETHICK5;
二: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;
九:C*1.093,NODRAW,COLORGREEN;
十:C*1.103,NODRAW;
十一:C*1.113,NODRAW,COLORRED;
十二:C*1.123,COLORYELLOW,NODRAW;
十五:C*1.153,NODRAW;
廿:C*1.204,NODRAW;
卅:C*1.304,NODRAW,COLORRED;
DRAWBAND(MA(C,5),RGB(150,10,10),MA(C,13),RGB(0,100,100));DRAWKLINE(H,O,L,C);
STICKLINE(F>7,C,O,2.2,0),COLORFFFFFF;{大白K线}
{蓝线数值 }
RL3:=(REF(L,1)*(1+4.3*0.01))-0.003,COLORFF0000;
DRAWNUMBER(ISLASTBAR,L*(1+4.3*0.01),RL3),COLORFF0000;
{出黄头}
STICKLINE(H>RL3,(O+C)/2,H,0.1,0),COLORYELLOW;
{金叉K线}
STICKLINE(CROSS(MA(C,5),MA(C,13)),H,C,0.05,0), COLOR0000FF;
STICKLINE(CROSS(MA(C,5),MA(C,13)),C,O,3,0), COLOR0066FF;
STICKLINE(CROSS(MA(C,5),MA(C,13)),O,L,0.05,0), COLOR0099FF;
{股价隧道日线}
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),COLORGREEN;
IF(H>=上轨 ,上轨,DRAWNULL),POINTDOT,COLOR000FFF,LINETHICK9;
M3赚4%:M3*1.043,NODRAW,COLORGREEN;
M3赚5%:M3*1.053,NODRAW,COLORRED;
M3赚6%:M3*1.063,NODRAW,COLORGREEN;
{紫阳买信号}
ZY:=P1=0 AND REF(P1,1)=1 AND P2=0 AND REF(P2,1)=1;
跌后ZY:=ZY AND (REF(L22,1) OR REF(L33,1) OR REF(L33,2) ) ;
DRAWTEXT(跌后ZY,LOW,'买'),COLORRED;
{K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
DRAWTEXT(CROSS(CLOSE,TT1)AND J<55,LOW/1.01,'买'),COLORGREEN;};
{分时中的日期间隔}
IF(HOUR=15,H*1.008,DRAWNULL),POINTDOT,COLORFFFAAA,LINETHICK9;
IF(HOUR=15,H*1.008,DRAWNULL),POINTDOT,COLOR000FFF,LINETHICK5;
IF(HOUR=15,H*1.005,DRAWNULL),POINTDOT,COLORFFF000,LINETHICK9;
IF(HOUR=15,H*1.005,DRAWNULL),POINTDOT,COLOR000FFF,LINETHICK5;
{红海洋区}
M5:=MA(C,5); { 5日均线}
M50:=MA(C,50); { 50日牛熊分界均线}
GX:=M13>REF(M13,1) AND M5>M13 AND C>M50;
{止+1，止线下一天收盘进}
止线:=(C<REF(MIN(C,O),1) );{收盘低于昨日实体下沿}
止线加一:REF(止线,1) AND GX AND C<M3 ,NODRAW;
DRAWTEXT(止线加一,LOW/1.01,'囍'),COLORYELLOW;
|
|
|
[复制链接]
发表于 2014-9-6 00:39
楼主