|
经过实盘操作，准确率很高的
指标里有具体的使用说明；
VAR1S:=(CLOSE*2+HIGH+LOW)/4;
VAR2S:=(EMA(VAR1S,13)-EMA(VAR1S,34))/EMA(VAR1S,34)*100;
VAR3S:=EMA(VAR2S,5);
主力控盘:=2*(VAR2S-VAR3S)*3.8;
SA1:= 主力控盘,COLORWHITE,NODRAW;
SA2:=SA1-REF(SA1,1);
SA3:=MA(SA1,3),COLORGREEN;
SAA3:=MA(SA1,7),COLORCYAN;
SAA4:=MA(SA1,13),COLORRED;
MM1:=MA(CLOSE,5);
Q5:(MM1-REF(MM1,1))/REF(MM1,1)*100,NODRAW,COLORMAGENTA;
MTR:=EXPMEMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),14);
HD2 :=HIGH-REF(HIGH,1);
LD2 :=REF(LOW,1)-LOW;
DMP2:=EXPMEMA(IF(HD2>0&&HD2>LD2,HD2,0),14);
DMM2:=EXPMEMA(IF(LD2>0&&LD2>HD2,LD2,0),14);
PDI2:=DMP2*100/MTR;
MDI2:=DMM2*100/MTR;
ADX:=EXPMEMA(ABS(MDI2-PDI2)/(MDI2+PDI2)*100,6);
ADXR:=EXPMEMA(ADX,6);
SAA31:=SAA3-REF(SAA3,1);
ADXR12:=MA(ADX,3);
ADXR13:=ADX-ADXR12;
ADXR14:=ADX-ADXR;
ZK2:=ADX<16;
ZK3:=(ADXR<16&&ADX<20);
ZK31:=ADXR<20&&ADXR>ADX;
ZK4:=(ADX<MDI2&&ADXR<MDI2&&ADX<30);
ZK41:=(ADX<PDI2&&ADXR<PDI2&&PDI2>MDI2&&ADX<30&&ADX<REF(ADX,1));
ZK5:=(ZK2 OR ZK3 OR ZK31);
SWQ1:=MAX(ADX,ADXR);
AD1:=ADX-REF(ADX,1);
Y:=(H+O+L+3*C)/6;
X:=EMA(100-(100/(1+SUM(IF(Y>REF(Y,1),Y*VOL,0),13)/SUM(IF(Y<REF(Y,1),Y*VOL,0),13))),5),COLOR00FFFF,LINETHICK2;
AA:=30>X,LINETHICK0;
BB:=X>80,LINETHICK0;
VAR1:=(C-MA(C,6))/MA(C,6)*100;
VAR2:=(C-MA(C,24))/MA(C,24)*100;
VAR3:=(C-MA(C,32))/MA(C,32)*100;
VAR4:=(VAR1+VAR2+VAR3)/3;
VAR5:=EMA(VAR4,5);
VAR6:=MA(100*(C-LLV(C,34))/(HHV(H,34)-LLV(L,34)),5)-20;
VAR7:=SMA(SMA(100-3*(C-LLV(C,75))/(HHV(H,75)-LLV(L,75))*100,20,1)+SMA(2*(C-LLV(C,75))/(HHV(H,75)-LLV(L,75))*100,20,1),15,1);
VAR8:=VAR7<REF(VAR7,1) AND V>REF(V,1) AND C>REF(C,1);
K:EMA(VAR5,5)*4;
D:EMA(K,5),NODRAW,COLOR38B0DE;
J:K*3-D*2,NODRAW,COLORCC66FF;
MACD:EMA(EMA(VAR1,5),5)*6,NODRAW,COLORWHITE;
{DRAWBAND(J,RGB(238,238,6),K,RGB(256,150,60));}
DRAWBAND(K,RGB(238,238,6),D,RGB(256,150,60));
按短线卖:IF(EXIST(Q5>2.5,5),-60,DRAWNULL),LINETHICK7,COLORGREEN;
按短线卖2:IF(EVERY(Q5<2.5,5)&&MACD>8,-60,DRAWNULL),LINETHICK7,COLORYELLOW;
按短线买:IF(EXIST(Q5<-2.5,5),-60,DRAWNULL),LINETHICK7,COLORRED;
中线股:IF(SA1>0,-40,DRAWNULL),LINETHICK7,COLORMAGENTA;
中线币:IF(SA1<0,-40,DRAWNULL),LINETHICK7,COLORGREEN;
盘整币:IF(MDI2>ADXR OR ZK5,-30,DRAWNULL),LINETHICK7,COLORGREEN;
DRAWTEXT(EVERY(Q5<1,4)&&Q5>0&&MACD>REF(MACD,1)&&REF(MACD,1)<REF(MACD,2)&&EVERY(Q5>-0.5,4),MACD*1.04,'P卖'),COLORGREEN;
STICKLINE(SA1<REF(SA1,1),0,MACD*1.03,2,1),COLORGREEN;
STICKLINE(SA1>REF(SA1,1)&&SA1>0,0,MACD*1.03,2,1),COLORRED;
STICKLINE(Q5>5&&SA1>0&&MACD>REF(MACD,1),0,MACD*1.03,2,1),COLORRED;
DRAWTEXT(AA&&SA1>REF(SA1,1),MACD*1.1,'吸货'),COLOR0066FF;
DRAWTEXT(BB&&SA1<REF(SA1,1),MACD*1.1,'派发'),COLORFFFF00;
DRAWTEXT(CROSS(3,Q5)&&EXIST(Q5>4,6),MACD*1.1,'卖4'),COLORGREEN;
DRAWTEXT(CROSS(4,Q5)&&EXIST(Q5>5,6),MACD*1.1,'卖5'),COLORGREEN;
DRAWTEXT(CROSS(5,Q5)&&EXIST(Q5>6,6),MACD*1.1,'卖6'),COLORGREEN;
DRAWTEXT(CROSS(6,Q5)&&EXIST(Q5>7,5),MACD*1.1,'卖7'),COLORGREEN;
STICKLINE(MACD>0,0,MACD,1,0),COLORRED;
STICKLINE(MACD>0 AND MACD<REF(MACD,1),0,MACD,1,0),COLORFFFF00;
STICKLINE(MACD<0,0,MACD,1,0),COLORFF9900;
STICKLINE(MACD<0 AND MACD>REF(MACD,1),0,MACD,1,0),COLORFF00FF;
MA3:=MA(CLOSE,3);
YTSL:=(3*CLOSE+LOW+OPEN+HIGH)/6;
辰星线:=(20*YTSL+19*REF(YTSL,1)+18*REF(YTSL,2)+17*REF(YTSL,3)+16*REF(YTSL,4)+15*REF(YTSL,5)+14*REF(YTSL,6)+13*REF(YTSL,7)+12*REF(YTSL,8)+11*REF(YTSL,9)+10*REF(YTSL,10)+9*REF(YTSL,11)+8*REF(YTSL,12)+7*REF(YTSL,13)+6*REF(YTSL,14)+5*REF(YTSL,15)+4*REF(YTSL,16)+3*REF(YTSL,17)+2*REF(YTSL,18)+REF(YTSL,20))/211,COLOR0000FF;
牵牛线:=MA(CLOSE,26),COLORFF00FF;
CX1:=辰星线;
QN1:=牵牛线;
IF(CX1>REF(CX1,1)&&CX1>QN1,-50,DRAWNULL),LINETHICK7,COLORRED;
IF(CX1>REF(CX1,1)&&CX1<QN1,-50,DRAWNULL),LINETHICK7,COLORMAGENTA;
IF(CX1<REF(CX1,1)&&CX1<QN1,-50,DRAWNULL),LINETHICK7,COLORGREEN;
IF(CX1<REF(CX1,1)&&CX1>QN1,-50,DRAWNULL),LINETHICK7,COLORCYAN;
DRAWTEXT(NDAY(SA1,0,2)&&CX1>REF(CX1,1)&&MACD>REF(MACD,1)&&REF(MACD,1)<REF(MACD,2),MACD*1.1,'BBB'),COLORMAGENTA;
DA:=(3*CLOSE+OPEN+LOW+HIGH)/6,POINTDOT;
X2:=(20*DA+19*REF(DA,1)+18*REF(DA,2)+17*REF(DA,3)+16*REF(DA,4)+15*REF(DA,5)+14*REF(DA,6)+13*REF(DA,7)+12*REF(DA,8)+11*REF(DA,9)+10*REF(DA,10)+9*REF(DA,11)+8*REF(DA,12)+7*REF(DA,13)+6*REF(DA,14)+5*REF(DA,15)+4*REF(DA,16)+3*REF(DA,17)+2*REF(DA,18)+REF(DA,20))/210,COLORF0F000;
X3:=(MA(X2,3)+MA(X2,2))/2,COLORYELLOW,LINETHICK1;
DRAWTEXT(SA1>REF(SA1,1)&&SA1>0&&REF(SA1,1)<REF(SA1,2)&&X2>X3,MACD*1.1,'信号1'),COLORMAGENTA;
DRAWTEXT(Q5>5&&SA1>0&&MACD>REF(MACD,1)&&REF(MACD,1)<REF(MACD,2)&&X2>X3,MACD*1.1,'信号2'),COLORRED;
DRAWTEXT(MACD>0&&MACD>REF(MACD,1)&&REF(MACD,1)<REF(MACD,2)&&X2>X3,-3,'信号3'),COLORRED;
DRAWTEXT(MACD<0 AND MACD>REF(MACD,1)&&REF(MACD,1)<REF(MACD,2)&&X2>X3,MACD*1.1,'信号4'),COLORWHITE;
-60;
-50;
-40;
-30;
|
