软件名称：[B]主力清洗[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/Win7/
软件语言：简体中文
授权方式：免费版
软件大小：8.00 KB
官方主页：Home Page
更新时间：2019-01-19 01:20:10
软件简介:
VAR1:=REF((LOW+OPEN+C+HIGH)/4,1),nodraw;
VAR2:=SMA(ABS(LOW-VAR1),13,1)/SMA(MAX(LOW-VAR1,0),10,1),nodraw;
VAR3:=EMA(VAR2,10),nodraw;
VAR4:=LLV(LOW,33),nodraw;
VAR5:=EMA(IF(LOW<=VAR4,VAR3,0),3),nodraw;
N:=9;M1:=3;M2:=3;
RSV:=(C-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
K:SMA(RSV,M1,1),nodraw;
D:SMA(K,M2,1),nodraw;
J:3*K-2*D,nodraw;
Zero:0,colorwhite;
LOW0:0.2,nodraw;
HIGH0:5,nodraw;
//www.70822.com
HIGH_KDJ:98,nodraw;
主力进场:IF(VAR5>REF(VAR5,1),VAR5,0),colorred,NODRAW;
洗盘:IF(VAR5<REF(VAR5,1),VAR5,0),colorgreen,NODRAW;
STICKLINE(VAR5<REF(VAR5,1),0,VAR5,3,0),colorgreen;
洗盘结束:VAR5 > LOW0 AND VAR5 < HIGH0,nodraw;
HEIGHT=VAR5;
IF VAR5>HIGHEST THEN HEIGHT = HIGHEST;
IF VAR5<-HIGHEST THEN HEIGHT = -HIGHEST;
//HEIGHT=IF(VAR5>HIGHEST,HIGHEST,VAR5);
STICKLINE(VAR5>REF(VAR5,1),0,HEIGHT,3,0 ),COLOR000055;
STICKLINE(VAR5>REF(VAR5,1),0,HEIGHT,2.6,0 ),COLOR000077;
STICKLINE(VAR5>REF(VAR5,1),0,HEIGHT,2.1,0 ),COLOR000099;
STICKLINE(VAR5>REF(VAR5,1),0,HEIGHT,1.5,0 ),COLOR0000BB;
STICKLINE(VAR5>REF(VAR5,1),0,HEIGHT,0.9,0 ),COLOR0000DD;
STICKLINE(VAR5>REF(VAR5,1),0,HEIGHT,0.3,0 ),COLOR0000FF;
STICKLINE(VAR5<REF(VAR5,1),0,HEIGHT,3,0),COLOR005500;
STICKLINE(VAR5<REF(VAR5,1),0,HEIGHT,2.6,0),COLOR007700;
STICKLINE(VAR5<REF(VAR5,1),0,HEIGHT,2.1,0),COLOR009900;
STICKLINE(VAR5<REF(VAR5,1),0,HEIGHT,1.5,0),COLOR00BB00;
STICKLINE(VAR5<REF(VAR5,1),0,HEIGHT,0.9,0),COLOR00DD00;
STICKLINE(VAR5<REF(VAR5,1),0,HEIGHT,0.3,0),COLOR00FF00;
VAR21:=SMA(ABS(HIGH-VAR1),13,1)/SMA(MIN(HIGH-VAR1,0),10,1);
VAR31:=EMA(VAR21,10);
VAR41:=HHV(HIGH,33);
VAR51:=EMA(IF(HIGH>=VAR41,VAR31,0),3);
HEIGHT51=VAR51;
IF VAR51>HIGHEST THEN HEIGHT51 = HIGHEST;
IF VAR51<-HIGHEST THEN HEIGHT51 = -HIGHEST;
主力拉高:IF(VAR51<REF(VAR51,1),VAR51,0),coloryellow,NODRAW;
STICKLINE(VAR51<REF(VAR51,1),0,HEIGHT51,3,0),coloryellow;
出货:IF(VAR51>REF(VAR51,1),VAR51,0),colorcyan,NODRAW;
STICKLINE(VAR51>REF(VAR51,1),0,HEIGHT51,3,0 ),colorcyan;
KDJ升:= (K>REF(K,1) AND D >REF(D,1) AND J>REF(J,1));
/*
买:=IF(O=C AND (C-REF(C,1))/REF(C,1)*100>9.8,AMOUNT,AMOUNT/((H-L)*2-ABS(O-C))*(C-L));
买:买/AMOUNT*100,colorred,NODRAW;
流入亿元:AMOUNT*买/10000000000,colormagenta,NODRAW;
流出亿元:AMOUNT/100000000-流入亿元,colorgreen,NODRAW;
净流亿元:流入亿元-流出亿元,colorcyan,NODRAW;
净流亿元5:SUM(流入亿元-流出亿元,5),colorcyan,NODRAW;
SSA:=IF(C>REF(C,1),AMOUNT,0);
SSB:=IF(C<REF(C,1),AMOUNT,0);
净流入:SUM(SSA,0)-SUM(SSB,0),nodraw;
总额:=SUM(AMOUNT,0);
流入比:(净流入)/总额*100,nodraw
AA:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
买量:IF(CLOSE>OPEN,AA*(HIGH-LOW),IF(CLOSE<OPEN,AA*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),nodraw; //LINETHICK0,colorred;
卖量:IF(CLOSE>OPEN,0-AA*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-AA*(HIGH-LOW),0-VOL/2)),nodraw; //LINETHICK0,colorcyan;
进出量:买量+卖量,COLOR00FFFF,nodraw;
*/
//启动拉升:(主力拉高 < 0 AND REF(主力拉高,1) = 0 ), ColorD9D919,nodraw; //AND C>OPEN AND VOL>1.2*REF(VOL,1) AND KDJ升>0
上涨:CLOSE > REF(CLOSE,1),nodraw;
放量拉升启动:(ABS(主力拉高) > 0 AND REF(主力拉高,1) = 0 AND CLOSE> (PriceIncRatio*REF(CLOSE,1)) AND VOL>VOLIncRatio*REF(VOL,1)), colorlired,nodraw;
暴涨启动:(ABS(主力拉高) > 0 AND REF(主力拉高,1)= 0 AND CLOSE>((PriceIncRatio+0.02)*REF(CLOSE,1)) ) ,colorred,nodraw;
启动拉升:(放量拉升启动 OR 暴涨启动) AND 上涨, ColorD9D919,nodraw;
启动上涨期:COUNT(主力拉高<0,PASTDAYS),nodraw;
启动拉升期:COUNT(启动拉升,PASTDAYS),nodraw;
连续拉升:( 主力拉高<0 AND REF(主力拉高,1) <0 ),nodraw;
最佳进场点:REF(主力进场,2) > 0 AND REF(洗盘,1) >0 AND 洗盘>0 ,nodraw;
DRAWTEXT(最佳进场点,-20,'潜'),coloryellow;
DRAWICON(最佳进场点,0,'buy');
// MACD //
DIFF:=EMA(C,SHORT)-EMA(C,LONG),colorwhite;
DEA:=EMA(DIFF,8),COLOrffaa00;
MACD:=2*(DIFF-DEA);
DIFF上穿0轴:=CROSS(DIFF,0),nodraw;
MACD金叉:=CROSS(DIFF,DEA),nodraw;
MACD金叉期:=COUNT(MACD金叉,PASTDAYS),nodraw;
///// KDJ //////
N:=9;M1:=3;M2:=3;
RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
K=SMA(RSV,M1,1),coloryellow,LINETHICK1;
D=SMA(K,M2,1),colorcyan,LINETHICK1;
J=3*K-2*D,colormagenta,LINETHICK1;
KDJ势增:J>REF(J,1),nodraw;
高安全区=0,colorred;
安全区=20,colorcyan;
风险区=100,colorgreen;
KDJ金叉=CROSS(J,K),nodraw;
KDJ死叉=CROSS(K,J),nodraw;
KDJ买点=KDJ金叉 ;
KDJ卖点=KDJ死叉;
KDJ买点期:=COUNT(KDJ买点,PASTDAYS),nodraw;
通:=MA(C,LONG),nodraw,NOText;
最佳买点:(主力进场 OR 洗盘) AND (KDJ金叉 OR MACD金叉),nodraw;
DRAWICON(最佳买点,0,'buy');
DRAWTEXT(最佳买点,-20,'买'),colorred;
[url=http://www.70822.com/soft/sort013/sort036/down-132738.html]主力清洗[/url]