软件名称：[B]K线进化[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/Win7/
软件语言：简体中文
授权方式：免费版
软件大小：6.00 KB
官方主页：Home Page
更新时间：2019-07-10 00:01:02
软件简介:
/*kdj rsi*/
jincha:=CROSS(KDJ.J,KDJ.K) AND CROSS(KDJ.J,KDJ.D) AND KDJ.J < 25 AND MA(CLOSE,5) > REF(MA(CLOSE,5),1);
jincha1:=CROSS(REF(KDJ.J,1),REF(KDJ.K,1)) AND CROSS(REF(KDJ.J,1),REF(KDJ.D,1)) AND REF(KDJ.J,1) < 25 AND MA(CLOSE,5) > REF(MA(CLOSE,5),1);
jincha2:=CROSS(REF(KDJ.J,2),REF(KDJ.K,2)) AND CROSS(REF(KDJ.J,2),REF(KDJ.D,2)) AND REF(KDJ.J,2) < 25 AND MA(CLOSE,5) > REF(MA(CLOSE,5),1);
jincha3:=CROSS(REF(KDJ.J,3),REF(KDJ.K,3)) AND CROSS(REF(KDJ.J,3),REF(KDJ.D,3)) AND REF(KDJ.J,3) < 25 AND MA(CLOSE,5) > REF(MA(CLOSE,5),1);
jincha4:=CROSS(REF(KDJ.J,4),REF(KDJ.K,4)) AND CROSS(REF(KDJ.J,4),REF(KDJ.D,4)) AND REF(KDJ.J,4) < 25 AND MA(CLOSE,5) > REF(MA(CLOSE,5),1);
jincha5:=CROSS(REF(KDJ.J,5),REF(KDJ.K,5)) AND CROSS(REF(KDJ.J,5),REF(KDJ.D,5)) AND REF(KDJ.J,5) < 25 AND MA(CLOSE,5) > REF(MA(CLOSE,5),1);
rsc1:=COUNT(jincha1,5)>0 AND jincha1;
rsc2:=COUNT(jincha2,5)>0 AND jincha2;
rsc3:=COUNT(jincha3,5)>0 AND jincha3;
rsc4:=COUNT(jincha4,5)>0 AND jincha4;
rsc5:=COUNT(jincha5,5)>0 AND jincha5;
mixsc:=rsc1 =1 OR rsc2=1 OR rsc3=1 OR rsc4=1 OR rsc5=1;
xuankdj:=jincha = 1 AND mixsc=1;
rjincha:=CROSS(RSI.RSI1,RSI.RSI2) AND CROSS(RSI.RSI1,RSI.RSI3);
rshang:=RSI.RSI1<RSI.RSI2 AND RSI.RSI2<RSI.RSI3 AND RSI.RSI1 < 35;
rlianxushang:=RSI.RSI1> REF(RSI.RSI1,1) AND RSI.RSI1> REF(RSI.RSI1,2) AND RSI.RSI1> REF(RSI.RSI1,3);
/*//www.70822.com
IF(jincha=1 AND rshang=1 AND rlianxushang=1)
DRAWTEXT(1=1,LOW/1.03,'kdj金叉'),colorred;
IF(xuankdj=1 AND rshang=1 AND rlianxushang=1)
DRAWTEXT(1=1,LOW/1.03,'kdj金叉'),colorred;*/
/*kdj买点提示*/
kdjdiweimai:=KDJ.J < 25 AND REF(KDJ.J,1) < 25 AND REF(KDJ.J,2) < 25 AND REF(KDJ.J,3) < 25;
kdjlianxushang:=KDJ.J > REF(KDJ.J,1) AND KDJ.J > REF(KDJ.J,2) AND KDJ.J > REF(KDJ.J,3);
IF(kdjdiweimai=1 AND rlianxushang=1 AND jincha=1)
DRAWTEXT(1=1,LOW/1.03,'kdj金叉'),coloryellow;
IF(kdjlianxushang =1 AND rshang=1 AND MA(CLOSE,5) < REF(MA(CLOSE,5),1) AND REF(MA(CLOSE,5),1) < REF(MA(CLOSE,5),2) AND REF(MA(CLOSE,5),2) < REF(MA(CLOSE,5),3))
DRAWTEXT(1=1,LOW/1.03,'关注低位背离'),colorlired;
/*卖点提示*/
maikdj:=CROSS(KDJ.D,KDJ.J) AND CROSS(KDJ.K,KDJ.J) AND KDJ.D >73;
beilikdj:= REF(KDJ.J,1) > KDJ.J AND KDJ.J > 75 AND MA(CLOSE,5) > REF(MA(CLOSE,5),1);
IF(beilikdj=1 AND maikdj=1)
DRAWTEXT(1=1,HIGH*1.01,'kdj下穿并背离'),colorgreen;
ELSE IF(maikdj=1)
DRAWTEXT(1=1,HIGH*1.01,'kdj下穿'),colorgreen;
ELSE IF(beilikdj=1)
DRAWTEXT(1=1,HIGH*1.01,'注意kdj背离'),colorgray;
/*均线金叉*/
dangtiantongshichuan:=CROSS(MA(CLOSE,5),MA(CLOSE,10)) AND CROSS(MA(CLOSE,5),MA(CLOSE,20));
chuanshiri:=CROSS(MA(CLOSE,5),MA(CLOSE,10));
chuangershiri:=CROSS(MA(CLOSE,5),MA(CLOSE,20));
SC10:=COUNT(chuanshiri,5)>0;
/*DRAWTEXT(sc1=1,LOW/1.02,'10日金叉'),colorred;*/
DRAWTEXT(SC10=1 AND chuangershiri=1,LOW/1.03,'穿20日线'),colorred;
DRAWTEXT(dangtiantongshichuan=1,LOW/1.01,'双金叉'),colorred;
[url=http://www.70822.com/soft/sort013/sort036/down-138569.html]K线进化[/url]