再送给我的665位粉丝的礼物.Tdx_火凤凰5.87b版
本版删除了许多公式。保留了16个我喜欢的公式。还是简单点好。呵呵。http://pan.baidu.com/s/1sj9CHx7新中投简单点好版http://pan.baidu.com/s/1kTqSlmv
{MACD0轴上2次}
DRAWGBK(O>0,RGB(33,47,58),RGB(0,0,0),0,'02',0),LINETHICK2;
DIFF:EMA(CLOSE,6) - EMA(CLOSE,10);
DEA:EMA(DIFF,5);
DRAWBAND(DIFF,RGB(200,50,55),DEA,RGB(50,100,10));
MACD:2*(DIFF-DEA),COLORSTICK;
A0:=CROSS(DIFF,DEA);
A:=A0 AND DIFF<0;
FT:=BARSLAST(A);
B:=COUNT(A0,FT);
第二个金叉:DIFF>0 AND DEA>0 AND A0 AND B<2,LINETHICK2;
0,LINETHICK3;
三日最低:=EMA((REF(L,4)+REF(L,3)+REF(L,2))/3,3);
三日最高:=EMA((REF(H,4)+REF(H,3)+REF(H,2))/3,3);
{EXITLONG:CROSS(CROSS(三日最高,C),0.6);}
ENTERLONG:CROSS(CROSS(C,三日最低),0.5),COLORYELLOW;
STICKLINE(MACD>=0,MACD,0,4,1),COLORF00FF0;
STICKLINE(MACD<0,MACD,0,4,1),COLORWHITE;
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,4,0 ),COLOR00AAFF;
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,3.3,0 ),COLOR00BBFF;
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,2.2,0 ),COLOR00CCFF;
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,1.65,0 ),COLOR00DDFF;
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,1.1,0 ),COLOR00EEFF;
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,0.55,0 ),COLOR00FFFF;
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,4 ,0 ),COLOR0000AA;
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,3.3 ,0 ),COLOR0011BB;
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,2.2,0 ),COLOR0022CC;
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,1.65 ,0 ),COLOR0033DD;
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,1.1 ,0 ),COLOR0044EE;
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,0.55 ,0 ),COLOR0055FF;
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,4,0 ),COLORAA00BB;
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,3.3 ,0 ),COLORBB11BB;
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,2.2,0 ),COLORCC22BB;
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,1.65,0 ),COLORDD33BB;
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,1.1,0 ),COLOREE44BB;
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,0.55 ,0 ),COLORFF55BB;
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,4,0 ),COLORFFAA00;
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,3.3 ,0 ),COLORFFBB11;
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,2.2,0 ),COLORFFCC22;
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,1.65 ,0 ),COLORFFDD33;
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,1.1 ,0 ),COLORFFEE44;
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,0.55 ,0 ),COLORFFFF55;
IF(DIFF<0,DIFF,0),COLORRED,LINETHICK1;
IF(DIFF<0,0,DIFF),COLORYELLOW,LINETHICK1;
IF(DIFF<DEA,DIFF,DEA),COLOR00FF00,LINETHICK1;
IF(DIFF>DEA,DEA,DEA),COLORBLUE,LINETHICK1;
低位金叉0:=CROSS(DIFF,DEA) AND DIFF<-0.1;
STICKLINE(低位金叉0,0,-0.10,6,0),COLORYELLOW;
DRAWTEXT(低位金叉0,-0.05,' 低位金叉0'),COLORYELLOW;
JCCOUNT1:=COUNT(CROSS(DIFF,DEA),BARSLAST(DEA>=0));
二次金叉1:=CROSS(DIFF,DEA) AND DEA<0 AND COUNT(JCCOUNT1=2,21)=1;
STICKLINE(二次金叉1,0,-0.10,6,0),COLORFF00FF;
DRAWICON(二次金叉1,DEA*1.04,13) ;
DRAWTEXT(二次金叉1,-0.08,' 二次金叉1'),COLORFF00FF;
A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));
底背离:=REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA);
STICKLINE(底背离,0,0.13,6,0),COLORRED;
DRAWTEXT(底背离,DEA,' 底背离'),COLORRED;
A2:=BARSLAST(REF(CROSS(DEA,DIFF),1));
顶背离:=REF(CLOSE,A2+1)<CLOSE AND REF(DIFF,A2+1)>DIFF AND CROSS(DEA,DIFF);
DRAWTEXT(顶背离,DEA,' 顶背离'),COLORGREEN;
A01:=DIFF<0 AND DEA<0;
A02:=A1>REF(A01,1);
A3:=BARSLAST(A02);
A4:=COUNT(DEA>0 AND DIFF>0,A3)=0;
A5:=CROSS(DIFF,DEA);{金叉}
A6:=BARSLAST(A5);
A7:=REF(A6,A6+1)+A6;
A8:=(DIFF+DEA)/2;
A9:=(HIGH+LOW)/2;
A10:=A5 AND A7<A3 AND A4 AND A8>REF(A8,A7) AND A9<REF(A9,A7) AND MACD>0;
DRAWICON(CROSS(DIFF,DEA),DIFF,5);
DRAWICON(CROSS(DIFF,-0.05),DIFF,1);
STICKLINE(MACD>REF(MACD,1) AND MACD>0,0,MACD,0,0),COLORRED;
STICKLINE(MACD<=REF(MACD,1) AND MACD>0,0,MACD,0,0),COLORYELLOW;
STICKLINE(MACD<REF(MACD,1) AND MACD<0,0,MACD,0,0),COLORCYAN;
STICKLINE(MACD>=REF(MACD,1) AND MACD<0,0,MACD,0,0),COLORMAGENTA;
STICKLINE(C>0,0,0,50,1),COLORBLUE;
DRAWICON(CROSS(DIFF,DEA),DIFF,5);
DRAWICON(CROSS(DEA,DIFF),DEA,6);
A05:=REF(DIFF,1)<REF(DIFF,2) AND REF(DIFF,2)<REF(DIFF,3) AND DIFF>REF(DIFF,1);
B05:=REF(DIFF,1)>REF(DIFF,2) AND REF(DIFF,2)>REF(DIFF,3) AND DIFF<REF(DIFF,1);
DRAWICON(A05,DIFF,1);
DRAWICON(B05,DIFF,2);
DRAWICON(CROSS(DIFF,DEA),DIFF,1);
DRAWICON(CROSS(DIFF,0),DIFF,9);
DRAWICON(CROSS(MACD,0),MACD,5);
FH1:=REF(MACD,1)<REF(MACD,2) AND REF(MACD,2)<REF(MACD,3) AND REF(MACD,3)<REF(MACD,4);
FH2:=MACD>=0 AND COUNT(MACD>REF(MACD,1),1)=1;
FH3:=FH1 AND FH2 AND EMA(C,13)>REF(EMA(C,13),1);
FH4:=FH1 AND FH2 AND ABS((DIFF-DEA)/C)<0.018;
FH5:=FH1 AND FH2 AND MACD<0.10;
VV:=CLOSE>OPEN AND MA(CLOSE,5)>MA(CLOSE,10) AND MA(CLOSE,10)>MA(CLOSE,30)
AND DIFF>DEA AND MACD>REF(MACD,1) AND DIFF>0 AND DEA>0 AND
MA(VOL,5)>MA(VOL,34) AND MA(CLOSE,30)>=REF(MA(CLOSE,30),1);
调整需要:IF(VV,1,0),NODRAW;
DRAWICON(调整需要,0.06,11);
翻红:(FH3 OR FH4 OR FH5),COLORRED,NODRAW;
低位买:CROSS(DIFF,DEA) AND DIFF<0,COLORFF00FF,NODRAW;
加注:CROSS(DIFF,DEA) AND DIFF>0,COLORYELLOW,NODRAW;
DRAWICON(翻红,-0.05,1);
DRAWTEXT(翻红,-0.15,'↖翻红'),COLORRED;
DRAWTEXT(CROSS(DIFF,DEA) AND DIFF<0,DEA-0.02,'↖低位买'),COLORFF00FF;
DRAWTEXT(CROSS(DIFF,DEA) AND DIFF>0,DEA-0.05,'↖加注'),COLORYELLOW;
XG:翻红 OR 低位买 OR 加注,NODRAW;
低位金叉:=CROSS(DIFF,DEA) AND DIFF<-0.1;
JCCOUNT:=COUNT(CROSS(DIFF,DEA),BARSLAST(DEA>=0));
二次金叉:CROSS(DIFF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1,LINETHICK2;
_抄底:ABS((CROSS("MACD.DIF","MACD.DEA")
&&"MACD.DEA"<=-0.07)*"MACD.DIF")*1.50,COLORLIMAGENTA,LINETHICK2;
DRAWTEXT(ABS(_抄底)>0,_抄底*1.20,' 抄底'),COLORYELLOW,LINETHICK2;
DRAWICON(ABS(_抄底)>0,_抄底*1.10,4),LINETHICK2;
     |
