**飞刀出手----KDJ+W%R飞升马,限时下载一天**

在这个公式中加入了更多的解盘内容，更利于看盘各分析！具体用法在以后讲解！！！！
参数设置：N=55，W%R的周期参数
                    N 1=36，KDJ 的周期参数，M1=3，M2=3
建议公式参数不要随便修改，因为研判的方法是不一样的！！改动后的研判是不一样的！！
源码和公式在下面：

variable:wday='星期六';
wday:='星期日';
wday:='星期一';
wday:='星期二';
wday:='星期三';
wday:='星期四';
wday:='星期五';
fy:=year;
fm:=month;
fd:=day;
wd:=weekday;
p:=sysparam(1);
str1:='今天是：'+numtostr(fy,0)+'年'+numtostr(fm,0)+'月'
+numtostr(fd,0)+'日, '+wday+1];
explain(barpos=p,str1),coloryellow;

wr:100*(HHV(HIGH,N)-CLOSE)/(HHV(HIGH,N)-LLV(LOW,N)),coloryellow,linethick2;
80,coloryellow;
20,colorred;
强弱分水岭:50,POINTDOT,colorgreen;
0,colorred,linethick0;
100,colorgreen,linethick1;
{PARTLINE(wr<=20,wr),colorgreen,LINETHICK2;
PARTLINE(wr>=55 and wr<=80,wr),colorblue,linethick2;
PARTLINE(wr<=55 and wr>=20,wr),coloryellow,linethick2;
PARTLINE(wr>=80 and wr<100,wr),colorred,linethick2;}
RSV:=(CLOSE-LLV(LOW,N1))/(HHV(HIGH,N1)-LLV(LOW,N1))*100;
K:SMA(RSV,M1,1)colorred,linethick1;
D:SMA(K,M2,1)coloryellow,linethick1;
J:3*K-2*D colorgreen,linethick1;
FILLRGN(K>=D,K,D),colorred;
FILLRGN(K W1:=MA(V,5)>MA(V,10);
W2:=MA(C,5)>MA(C,10);
{DRAWICON(K>D AND BETWEEN(K,25,50) AND BETWEEN(D,25,50)AND W2 AND W1,L,1);}
EXPLAIN(K>D AND BETWEEN(K,25,50) AND BETWEEN(D,25,50)AND W2 AND W1,'三金叉见底，买入,股价脱离底部向上,买入'),coloryellow;
Var0004:="KDJ.K#WEEK"(9,3,3);
Var0005:="KDJ.D#WEEK"(9,3,3);
Var0006:="KDJ.K#MONTH"(9,3,3);
Var0007:="KDJ.D#MONTH"(9,3,3);
周金叉: IF(CROSS(Var0004,Var0005),15,0)linestick, color00ff00;
月金叉: IF(CROSS(Var0006,Var0007),20,0)linestick, COLORee99FF;
DRAWTEXT(周金叉,16,'周金叉');DRAWTEXT(月金叉,20,'月金叉');
EXPLAIN(EXIST(CROSS(50,WR )AND WR EXPLAIN(K>D AND  W2 AND W1 AND K<=25,'三金叉见底，买入,股价尚处于底部安全区域,重仓介入'),coloryellow;

EXPLAIN( K>=D AND BETWEEN(K,50,80)AND W2 AND W1,'三金叉出现，买入,股价进入主升浪,买入'),colorred;
EXPLAIN(K>=D  AND D>=75  AND W2 AND W1,'三金叉出现，买入,股价进入风险区轻仓进出，快进快出'),coloryellow;
EXPLAIN(K<=D  AND K>70 ,'高位死叉,不是洗盘就是下跌,若是洗盘则高抛低吸'),coloryellow;
Y1:=C>MA(C,5)AND C>MA(C,10)AND O 海底火山:=Y1  AND W1 AND K>D AND  K<=20 AND  Var0005<25;
DRAWTEXT(海底火山,HIGH,'海底火山'),colorgreen;
EXPLAIN(海底火山,'海底火山=股价见底,快速买入'),colorred;
B:=VAR0004>VAR0005;
EXPLAINEX(B,'周K值大于周D值',var0004,2,0),colorff33cc;
EXPLAINEX(B,'周D值是',var0005,2,0),colorff33cc;
E:=VAR0006>VAR0007;
EXPLAINEX(E,'月K值大于D值',var0006,2,0),colorffff00;
EXPLAINEX(E,'月D值是',var0007,2,0),colorffff00;
M:=K>D AND K>=REF(K,1) ;
G:=K EXPLAINEX(K>=-50,'日K:',K,2,0),colorred;
EXPLAINEX(D>=-50,'日D:',D,2,0),colorred;
EXPLAINEX(J>=-50,'日J:',J,2,0),colorred;
EXPLAIN(M,'日K值金叉日D值,趋势向上'),colorgreen;
EXPLAIN(G,'日K值死叉日D值,趋势向下'),coloryellow;

j30:"kdj.k#min30"(9,3,3)linethick0;
j31:"kdj.d#min30"(9,3,3)linethick0;
j60:"kdj.k#min60"(9,3,3)linethick0;
j61:"kdj.d#min60"(9,3,3)linethick0;
EXPLAINEX(0=0,'30分钟K=',J30,2,0),colorffff00;
EXPLAINEX(1=1,'30分钟D=',J31,2,0),colorffff00;
EXPLAIN(j30>j31,'30分钟K值金叉日D值,趋势向上'),coloryellow;
EXPLAIN(j30 EXPLAINEX(1=1,'60分钟K=',J60,2,0),colorred;
EXPLAINEX(1=1,'60分钟D=',J61,2,0),colorred;
EXPLAIN(j6075 AND j61>75,'60分钟K值死叉日D值,趋势向下'),coloryellow;
SX:=J30<30 and j31<30 and j60<30 AND j61<30 AND K<20 and D<20;
EXPLAIN(j60>j61 ,'60分钟K值金叉日D值,趋势向上'),coloryellow;
EXPLAIN(j6075 AND j61>75 AND j3075 AND j31>75 ,'30分钟,60分钟K值全在高位死叉日D值,趋势向下，有一波深幅下跌'),colorff00ff;
EXPLAIN(sx,'快进快出，超短线操作')coloryellow;
DRAWTEXT(sx,50,'短'),colorgreen;
STICKLINE(sx,50,0,0.8,1);

Last edited by klfd518168 on 2005-8-6 at 21:06 ]

[返回顶部↑]  [推荐好友]