求 通达信KDJ日、周、月金叉公式!或者其他KDJ MACD颠峰公式!

KDJ的精髓传授传授!

第1个回答  2012-04-30
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:SMA(RSV,3,1),COLORWHITE;
D:SMA(K,3,1),COLORYELLOW;
J:3*K-2*D,COLORRED,LINETHICK1;
DRAWICON(CROSS(K,D) AND K<20 AND D<20,2,23);
DRAWICON(CROSS(K,D) AND K<20 AND D<20,-2,23);
JCCOUNT:=COUNT(CROSS(K,D),BARSLAST(K>=D));
二次金:=CROSS(K,D) AND D<20 AND COUNT(JCCOUNT=2,34)=1;
STICKLINE(二次金,D,D+5,5,0),COLORFF80FF;
DRAWICON(二次金,D*0.85,1);
{DRAWTEXT(ISLASTBAR=1,J,'↖短线'),COLORRED;}
月K:MA("KDJ.K#MONTH"(9,3,3),23),LINETHICK1,COLORFF00FF;
月D:MA("KDJ.D#MONTH"(9,3,3),23),LINETHICK1,COLORFF00FF;
月J:MA("KDJ.J#MONTH"(9,3,3),23),LINETHICK1,COLORFF00FF;
周K:MA("KDJ.K#WEEK"(9,3,3),5),COLORGREEN,LINETHICK2;
周D:MA("KDJ.D#WEEK"(9,3,3),5),COLORGREEN,LINETHICK2;
A3:=周K>周D;
周J:MA("KDJ.J#WEEK"(9,3,3),5),COLORCYAN,LINETHICK2;
IF(周J>REF(周J,1),周J,DRAWNULL),COLORFF00FF,LINETHICK3;
DRAWICON(C>REF(C,1) AND 周J<REF(周J,1) AND 周J>99,周J*1.02,15);
{DRAWICON(C>REF(C,1) AND 周J<REF(周J,1) AND 周J>99,113,39);}
DRAWICON(C<REF(C,1) AND 周J>REF(周J,1) AND 周J<20, 周J*0.96,1);
{DRAWICON(C<REF(C,1) AND 周J>REF(周J,1) AND 周J<20,-2,1);}
日金叉:=CROSS(K,D);
周金叉:=CROSS(周K,周D);
月金叉:=CROSS(月K,月D);
周日金叉:COUNT(日金叉,3)=1 AND (COUNT(周金叉,3)=1 OR COUNT(月金叉,3)=1);
STICKLINE(周日金叉,0,20,3,0),COLORRED;
STICKLINE(周日金叉,20,40,2,0),COLORFF00FF;
STICKLINE(周日金叉,40,60,1,0),COLORGREEN;
{DRAWTEXT(周日金叉,45,'↖周日金叉'),COLOR00FFFF;
DRAWTEXT(ISLASTBAR=1,月J,'↖月J'),COLORGREEN;
DRAWTEXT(ISLASTBAR=1,周J,'↖周J'),COLOR00FFFF;}
100,COLORCYAN,POINTDOT;
0,COLORYELLOW,POINTDOT;
20,COLOR00FFFF,POINTDOT,LINETHICK4;
80,POINTDOT;
DRAWTEXT(ISLASTBAR=1,20,'↖变盘区'),COLORRED;
DRAWTEXT(ISLASTBAR=1,80,'↖变盘区'),COLORGREEN;
DRAWTEXT(ISLASTBAR=1,100,'↖超买区'),COLORCYAN;
DRAWTEXT(ISLASTBAR=1,0,'↖超卖区'),COLOR00FFFF;
换手:=VOL/CAPITAL*100,NODRAW,COLORMAGENTA;
六十日换手:SUM(换手,60),COLORGREEN,NODRAW;
控盘比例:SUM(换手,60)/100*20,NODRAW,COLOR00FFFF;
月建仓:=月K<20 AND 月D<20 AND 月J<20,NODRAW;
周建仓:=周K<20 AND 周D<20 AND 周J<20,NODRAW;
日建仓:=K<20 AND D<20 AND J<20,NODRAW;
STICKLINE({月建仓 AND} 周建仓 AND 日建仓,50,25,4,0),COLORGREEN;

DRAWTEXT(CROSS(周K,周D),周K,'↖周金');
DRAWTEXT(CROSS(月K,月D),月K,'↖月金'),COLOR00FFFF;
STICKLINE(C>0,115,120,2,1),COLOR00FFFF;
STICKLINE(C>0,-15,-20,2,1),COLORFFFF88;
STICKLINE(周K>=周D,110,120,2,0),COLOR6666FF;
STICKLINE(月K>=月D,-10,-20,2,0),COLOR660099;
STICKLINE(J<0 AND 周J<0 AND 月J<0,-5,110,1,0),COLORFFFFFF;
DRAWTEXT(CURRBARSCOUNT=10,108,'周KD金叉、死叉'),COLORFFFFFF;
DRAWTEXT(CURRBARSCOUNT=10,-5,'月KD金叉、死叉'),COLORFFFFFF;本回答被网友采纳
第2个回答  2012-04-30
推荐 《证券投资学》技术分析部分,赵汕《期货交易实务》供参考