知博陋室交易系统之格兰维尔均线
知博陋室交易系统之格兰维尔均线
{格兰维尔均线——知博陋室交易系统主图指标}
{参数 M1:2 500 5 M2:2 500 10 M3:2 500 30 M4:2 500 60 M5:2 500 250}
MA5:MA(CLOSE,M1); {股价攻击线}
MA10:MA(CLOSE,M1); {短线平均线}
MA30:MA(CLOSE,M2); {中线平均线}
MA60:MA(CLOSE,M3); {中长线平均线}
MA250:MA(CLOSE,M4); {中长线平均线的牛熊参考线}
{飞龙量能——知博陋室交易系统副图指标(1)}
AT:=IF(CAPITAL=0,AMOUNT/100000000,VOL/CAPITAL*100);
ATM1:=EMA(AT,5);
ATM2:=MA(AT,13);
阶段地量:=AT<REF(LLV(AT,25),1) && ATM1<ATM2;
STICKLINE(阶段地量,0,HHV(V,15),2.21,1),COLORGREEN;
STICKLINE(阶段地量,0,HHV(V,15),2.21,1),COLORGREEN;
VVOL:=IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL)COLORWHITE,NODRAW;
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,VVOL,0,-1,-1),COLORLIBLUE;
量:VOL,VOLSTICK,COLORLIBLUE;
启动:MA(量,5)COLORWHITE;
洗盘:MA(量,35)COLORYELLOW;
异动:MA(量,135)COLORMAGENTA;
A:=(启动 CROSS 洗盘);
VAR2:=REF(LOW,1);
VAR3:=SMA(ABS(LOW-VAR2),3,1)/SMA(MAX(LOW-VAR2,0),3,1)*100;
VAR4:=EMA(IF(CLOSE*1.2,VAR3*10,VAR3/10),3);
VAR5:=LLV(LOW,38);
VAR6:=HHV(VAR4,38);
VAR7:=IF(LLV(LOW,90),1,0);
VAR8:=EMA(IF(LOW<=VAR5,(VAR4+VAR6*2)/2,0),3)/618*VAR7;
DD:=VAR8>5;
买入:=IF((COUNT(DD,2)=2),-20,0);
VAR1S:=REF((LOW+OPEN+CLOSE+HIGH)/4,1);
VAR2S:=SMA(ABS(LOW-VAR1S),13,1)/SMA(MAX(LOW-VAR1S,0),10,1);
VAR3S:=EMA(VAR2S,10);
VAR4S:=LLV(LOW,33);
VAR5S:=EMA(IF(LOW<=VAR4S,VAR3S,0),3);
主力进场:=IF(VAR5S>REF(VAR5S,1),VAR5S,0)*1.1,LINETHICK1,COLORRED;
STICKLINE(VAR5S>REF(VAR5S,1),0,VAR5S,4,1 ),COLORRED;
震仓:=IF(VAR5S<REF(VAR5S,1),VAR5S,0),COLORGREEN;
底:=IF((CROSS(震仓,主力进场)AND 买入=-20),100,0),STICK,COLORMAGENTA,LINETHICK1;
STICKLINE(底,0,HHV(V,15),2.23,1),COLORMAGENTA;
STICKLINE(底,0,HHV(V,15),0.21,1),COLORMAGENTA;
BB:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
主动买:=IF(CLOSE>OPEN,BB*(HIGH-LOW),IF(CLOSE<OPEN,BB*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2));
买:主动买/10000,COLORRED,LINETHICK1;
主动卖:=IF(CLOSE>OPEN,0-BB*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-BB*(HIGH-LOW),0-VOL/2));
卖:-主动卖/10000,COLORGREEN,LINETHICK1;
参与度:买/(买+卖),COLORLIBLUE;
盘比:(买/卖),COLORYELLOW;
量比:DYNAINFO(17),COLORRED;
WW:=VOL/REF(VOL,1)>2;
GG:=C>O;
STICKLINE (WW AND GG,0,VOL,0.01225,0),COLORGREEN;
QQ:=C<O;
STICKLINE (WW AND QQ,0,VOL*0.95,1.10,0),COLORRED;
0,COLORBLACK;
{单双MACD—知博陋室交易系统副图指标(2)}
HSNP1:=CLOSE-REF(CLOSE,1);
HSNP2:=IF(CLOSE-REF(CLOSE,1)>=0,HSNP1,0);
HSNP3:=REF(CLOSE,1)-CLOSE;
HSNP4:=IF(CLOSE-REF(CLOSE,1)<=0,HSNP3,0);
HSNP5:=SUM(HSNP2,90)/SUM(HSNP4,90);
HSNP6:=100-100/(1+HSNP5);
HSNP7:=EMA(HSNP6,21);
HSNP8:=EMA(HSNP7,5);
HSNP:=EMA(HSNP7,3);
NP:=(HSNP7-HSNP);
NL:=(HSNP-HSNP7);
图示01:STICKLINE(NL<0,0,-NL,1,1),COLORRED;
图示02:STICKLINE(NP<0,0,NP,1,1),COLORGREEN;
JJ:=(C*2+H+L)/4;
SK:= EMA(JJ,13) - EMA(JJ,21);
SD:= EMA(SK,3);
SP:= EMA(SK,10);
长线1:IF(SD>=SP,SD,SP),LINETHICK1,COLORWHITE;
长线2:IF(SP-SD,SP,SD),LINETHICK1,COLORYELLOW;
A1:=EMA(CLOSE,14)-EMA(CLOSE,34);
B1:=EMA((0.668*REF(A1,1)+0.333*A1),1);
做多:IF(A1>=B1,A1,B1),LINETHICK1,COLORRED;
做空:IF(B1-A1,B1,A1),LINETHICK1,COLORGREEN;
{收盘战线——知博陋室交易系统副图指标(3)}
VAR01:=1;
VAR02:=1/WINNER(CLOSE);
VAR03:=MA(CLOSE,13);
VAR04:=100-ABS((CLOSE-VAR03)/VAR03*100);
VAR05:=LLV(LOW,75);
VAR06:=HHV(HIGH,75);
VAR07:=(VAR06-VAR05)/100;
VAR08:=SMA((CLOSE-VAR05)/VAR07,20,1);
VAR09:=SMA((OPEN-VAR05)/VAR07,20,1);
VAR10:=REF(LOW,1);
VAR11:=SMA(ABS(LOW-VAR10),3,1)/SMA(MAX(LOW-VAR10,0),3,1)*100;
VAR12:=EMA(IF(CLOSE*1.2,VAR11*10,VAR11/10),3);
VAR13:=LLV(LOW,38);
VAR14:=HHV(VAR12,38);
VAR15:=IF(LLV(LOW,90),1,0);
VAR16:=EMA(IF(LOW<=VAR13,(VAR12+VAR14*2)/2,0),3)/618*VAR15;
VARA:=3*VAR08-2*SMA(VAR08,15,1);
VARB:=3*VAR09-2*SMA(VAR09,15,1);
VARC:=100-VARB;
有庄的影子:STICKLINE(VAR16,0,VAR16,1,0);
庄影:=VAR16;
新庄:=(100-IF(VAR02>5,IF(VAR02<100,VAR02,VAR04-10),0))*VAR01;
新庄图标:STICKLINE(1,新庄,100,1,1);
短线:MA(WINNER(CLOSE*0.95)*100,3)*VAR01,DOTLINE;
中线收盘:MEMA((0+VARA)*VAR01,2)COLORRED;
中线开盘:MEMA((0+VARB)*VAR01,3)COLORGREEN;
换手率:=DYNAINFO(37)<(0.01);
关注点:=DRAWICON(换手率,-5,1);
LOWV:=LLV(LOW,6);
HIGHV:=HHV(HIGH,6);
RSV1:=EMA((CLOSE-LOWV)/(HIGHV-LOWV)*100,2);
短线1:=EMA(RSV1,2),DOTLINE,COLORWHITE;
短线2:=MA(短线1,2),DOTLINE,COLORYELLOW;
顶:100,DOTLINE,COLORWHITE;
轴:0,COLORWHITE;
底:-10.5,DOTLINE,COLORRED;
天界:115,DOTLINE,COLORLICYAN;
地界:-22,DOTLINE,COLORLICYAN;
{KDJ 金叉}
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
VARK:=K;
上升K:=IF(VARK>REF(VARK,1),VARK,DRAWNULL),COLORRED;
走平K:=IF(VARK=REF(VARK,1),VARK,DRAWNULL),COLORYELLOW;
下降K:=IF(VARK<REF(VARK,1),VARK,DRAWNULL),COLORGREEN;
VARD:=D,COLORGREEN;
上升D:=IF(VARD>REF(VARD,1),VARD,DRAWNULL),COLORRED;
走平D:=IF(VARD=REF(VARD,1),VARD,DRAWNULL),COLORYELLOW;
下降D:=IF(VARD<REF(VARD,1),VARD,DRAWNULL),COLORGREEN;
VARJ:=J,COLORMAGENTA;
上升J:=IF(VARJ>REF(VARJ,1),VARJ,DRAWNULL),COLORRED;
走平J:=IF(VARJ=REF(VARJ,1),VARJ,DRAWNULL),COLORYELLOW;
下降J:=IF(VARJ<REF(VARJ,1),VARJ,DRAWNULL),COLORGREEN;
N:=9;
M1:=3;
M2:=3;
涨:=CROSS(K>D,K);
跌:=CROSS(K<D,K),COLORCYAN;
上:=CROSS(J>D,J);
下:=CROSS(J<D,J),COLORGREEN,LINETHICK1;
周K:=MA("KDJ.K#WEEK"(N,M1,M2),5);
周D:=MA("KDJ.D#WEEK"(N,M1,M2),5);
周J:=MA("KDJ.J#WEEK"(N,M1,M2),5);
周金叉:DRAWTEXT(CROSS("KDJ.K#WEEK"(N,M1,M2),"KDJ.D#WEEK"(N,M1,M2)),-8,'▲')COLORRED;
周死叉:DRAWTEXT(CROSS("KDJ.D#WEEK"(N,M1,M2),"KDJ.K#WEEK"(N,M1,M2)),98,'▼')COLORGREEN;
月金叉:DRAWTEXT(CROSS("KDJ.K#MONTH"(N,M1,M2),"KDJ.D#MONTH"(N,M1,M2)),-8,'▲')COLOR0099FF;
月死叉:DRAWTEXT(CROSS("KDJ.D#MONTH"(N,M1,M2),"KDJ.K#MONTH"(N,M1,M2)),98,'▼')COLORLIBLUE;
STICKLINE(周金叉,0,10,0.1,0)COLORRED;
STICKLINE(周死叉,100,90,0.1,0)COLORGREEN;
DRAWICON(周金叉,6,5);
DRAWICON(周死叉,91,4);
{D1:=1;
AA1:=DRAWGBK('关注底部量柱,无量不为。关注KDJ金叉,金叉进场。【红三角KDJ周金叉,金三角KDJ月金叉。绿三角KDJ周死叉,蓝三角KDJ月死叉】','.','.','.','.','.');
AA1图标:DRAWTEXT_FIX(D1=1,0,0.0260.18,0,AA1),COLOR0099FF,LINETHICK2;};