分享

KDJ多周期

 小益 2013-01-23

KDJ多周期
ZG:=MA(HIGH,5);
ZD:=MA(LOW,5);
YG:=MA(HIGH,20);
YD:=MA(LOW,20);
ZJ:=MA(CLOSE,5);
YJ:=MA(CLOSE,20);
RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;

日K:SMA(RSV,M1,1),COLORFF00FF,LINETHICK1;
日D:SMA(日K,M2,1),COLORFFFFFF,LINETHICK1;
J:3*日K-2*日D,COLOR00FFFF,LINETHICK1;
MID:=MA(日K,10);
CMSS:=1.03*SQRT(MA(POW((日K-MID),2),10));
UPPER:=MID+CMSS,LINETHICK1,COLORFFFF00;
LOWER:=MID-CMSS,LINETHICK1,COLOR00FF00;
RSV3:=(ZJ-LLV(ZD,N*5))/(HHV(ZG,N*5)-LLV(ZD,N*5))*100;
周K:SMA(RSV3,M1*5,1),LINETHICK0;
周D:EMA(周K,M2*5),LINETHICK0;
周J:3*周K-2*周D,LINETHICK0;
RSV2:=(YJ-LLV(YD,N*20))/(HHV(YG,N*20)-LLV(YD,N*20))*100;
月K:SMA(RSV2,M1*20,1),LINETHICK0;
月D:SMA(月K,M2*20,1),LINETHICK0;
月J:3*月K-2*月D,LINETHICK0;B:CROSS(J,日K)  AND J<80 AND 月K<20 AND 月D<20;
STICKLINE(周K>=REF(周K,1),周K,周D,4,0),COLOR0000FF;BB:CROSS(J,日K) AND B OR CROSS(周J,周K) AND B OR CROSS(月J,月K) AND B;
STICKLINE(周K<REF(周K,1),周K,周D,4,0),COLOR00FF00;
STICKLINE(月K>=REF(月K,1),月K,月D,1,0),COLOR00FFFF;
STICKLINE(月K<REF(月K,1),月K,月D,1,0),COLORFFFF00;
大底:=IF(REF(COUNT(月K<=REF(月K,1),2)=2,1) AND REF(月K<=5,1) AND 月K>REF(月K,1),80,10);
底:=IF(REF(COUNT(月K<=REF(月K,1),2)=2,1) AND REF(月K<=10,1) AND REF(月K>=5,1) AND REF(COUNT(周K<=REF(周K,1),2)=2,1) AND REF(周K<=10,1) AND 周K>REF(周K,1),80,10);
大顶:IF(REF(COUNT(月K>=REF(月K,1),2)=2,1) AND REF(月K>=95,1) AND 月K<REF(月K,1),20,90);
顶:IF(REF(COUNT(月K>=REF(月K,1),2)=2,1) AND REF(月K>=90,1) AND REF(月K<=95,1) AND REF(COUNT(周K>=REF(周K,1),2)=2,1) AND REF(周K>=90,1) AND 周K<REF(周K,1),20,90);
DRAWTEXT(月K<=10 AND COUNT(月K<=REF(月K,1),2)=2 AND 周K<=10 AND COUNT(周K<=REF(周K,1),2)=2 AND 日K<=10 AND COUNT(日K<=REF(日K,1),2)=2,50,'长线超跌');
DRAWTEXT(月K>=90 AND COUNT(月K>=REF(月K,1),2)=2 AND 周K>=90 AND COUNT(周K>=REF(周K,1),2)=2 AND 日K>=90 AND COUNT(日K>=REF(日K,1),2)=2,50,'长线超涨');
DRAWTEXT(REF(COUNT(月K<=REF(月K,1),2)=2,1) AND REF(月K<=10,1) AND REF(COUNT(周K<=REF(周K,1),2)=2,1) AND REF(周K<=10,1) AND REF(COUNT(日K<=REF(日K,1),2)=2,1) AND REF(日K<=10,1) AND 日K>REF(日K,1),80,'超跌买入');
DRAWTEXT(REF(COUNT(月K>=REF(月K,1),2)=2,1) AND REF(月K>=90,1) AND REF(COUNT(周K>=REF(周K,1),2)=2,1) AND REF(周K>=90,1) AND REF(COUNT(日K>=REF(日K,1),2)=2,1) AND REF(日K>=90,1) AND 日K<REF(日K,1),20,'超涨卖出');
DRAWTEXT(REF(月K>10,1) AND REF(COUNT(周K<=REF(周K,1),2)=2,1) AND REF(周K<=10,1) AND REF(COUNT(日K<=REF(日K,1),2)=2,1) AND REF(日K<=10,1) AND 日K>REF(日K,1),80,'超跌买');
DRAWTEXT(REF(月K<90,1) AND REF(COUNT(周K>=REF(周K,1),2)=2,1) AND REF(周K>=90,1) AND REF(COUNT(日K>=REF(日K,1),2)=2,1) AND REF(日K>=90,1) AND 日K<REF(日K,1),20,'超涨卖');
DRAWTEXT(月K>10 AND 周K<=10 AND COUNT(周K<=REF(周K,1),2)=2 AND 日K<=10 AND COUNT(日K<=REF(日K,1),2)=2,50,'中线超跌');
DRAWTEXT(月K<90 AND 周K>=90 AND COUNT(周K>=REF(周K,1),2)=2 AND 日K>=90 AND COUNT(日K>=REF(日K,1),2)=2,50,'中线超涨'); 
本次精选:   600317      600811     601008     000598

    本站是提供个人知识管理的网络存储空间,所有内容均由用户发布,不代表本站观点。请注意甄别内容中的联系方式、诱导购买等信息,谨防诈骗。如发现有害或侵权内容,请点击一键举报。
    转藏 分享 献花(0

    0条评论

    发表

    请遵守用户 评论公约