知博陋室交易系统之格兰维尔均线

知博陋室交易系统之格兰维尔均线

 
    {格兰维尔均线——知博陋室交易系统主图指标}

{参数 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;};

(0)

相关推荐