注意:本指标源码用于文华财经赢顺wh6、睿期wh7软件。

01

指标源码

SHORT:=12;

LONG:=26;

MID:=9;

RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;

K:=SMA(RSV,3,1);

D:=SMA(K,3,1);

DIF1:=EMA(CLOSE,SHORT)-EMA(CLOSE,LONG);

DEA1:=EMA(DIF1,MID);

DRAWICON(CROSS(DIF1,DEA1),DEA1,1);

DRAWICON(CROSS(DEA1,DIF1),DIF1,2);

MACD1:=(DIF1-DEA1)*2;

DIF:DIF1,COLORGREEN,LINETHICK2;

DEA:DEA1,COLORWHITE,LINETHICK2;

DIF升:IF(DIF>=REF(DIF,1),DIF,NULL),COLORMAGENTA,LINETHICK2;

DEA升:IF(DEA>=REF(DEA,1),DEA,NULL),COLORRED,LINETHICK2;

MACD:MACD1,COLORSTICK,COLORYELLOW,LINETHICK2;

STICKLINE(K<D AND MACD>0,0,MACD,1,0),COLOR00CCFF,LINETHICK2;

STICKLINE(K>D AND MACD>0,0,MACD,1,0),COLORRED,LINETHICK2;

STICKLINE(K>D AND MACD<0,0,MACD,1,0),COLORFF5599,LINETHICK2;

STICKLINE(K<D AND MACD<0,0,MACD,1,0),COLORFFFF55,LINETHICK2;

IF(COUNT(K>80,3)=3,DIF,NULL),POINTDOT,COLORBLUE,LINETHICK5;

IF(COUNT(K<20,3)=3,DIF,NULL),POINTDOT,COLORBLUE,LINETHICK5;

IF(COUNT(K>80,3)=3,DIF,NULL),POINTDOT,COLORMAGENTA,LINETHICK3;

IF(COUNT(K<20,3)=3,DIF,NULL),POINTDOT,COLORMAGENTA,LINETHICK3;

BIAS1 :(CLOSE-MA(CLOSE,17))/MA(CLOSE,17)*100,COLORGREEN,NODRAW;

CCDD1:=C/DIF1>=-15.68 && C/DIF1<0;

CCDD2:=C/DIF1>=-21.38 && C/DIF1<0;

SJ:=MACD1>REF(MACD1,1);

XXD:=DIF1<REF(DIF1,1);

JJC:=CROSS(DIF1,DEA1);

X0ZHH:=BARSLAST(CROSS(0,DIF))+1;

SCCTS:=BARSLAST(CROSS(DEA,DIF))+1;

DIFZDZ1:=LLV(DIF,SCCTS);

GJJZDZ:=LLV(L,SCCTS);

DIFZDZ2:=LLV(DIF,X0ZHH);

DIFWS0ZZ:=HHV(DIF,SCCTS)<-0.08;

LGLJXX:=REF(MACD,1)<0 && REF(MACD,2)<0;

BLLL:=LGLJXX && DIFWS0ZZ && (DIFZDZ1>=REF(DIFZDZ1,SCCTS) OR DIFZDZ1>=REF(DIFZDZ2,SCCTS)) && GJJZDZ<=REF(GJJZDZ,SCCTS);

A11:=DIF1/C>0.085 AND DIF1>REF(DIF1,1);

A22:=MACD1>0 AND MACD1<REF(MACD1,1);

STICKLINE(SJ && XXD && CCDD1,0,MACD*2/3,3,0),COLORWHITE,LINETHICK1;

STICKLINE(JJC && CCDD2,0,MACD*2/3,3,0),COLORYELLOW,LINETHICK1;

STICKLINE(A11 AND A22 AND BIAS1>18,0,MACD*2/3,3,0),COLORFF0000,LINETHICK1;

V1:=(HIGH+OPEN+LOW+2*CLOSE)/5;

V2:=REF(V1,1);

V3:=MAX(V1-V2,0);

V4:=ABS(V1-V2);

V5:=SMA(V3,10,1);

V6:=SMA(V4,10,1);

V8:=COUNT(V5/V6<0.2,5);

V9:=COUNT(LLV(V1,10)=V1,10);

STICKLINE(V8>=1 AND V9>=1 AND CLOSE>OPEN AND REF(CLOSE,1)>REF(OPEN,1) AND VOL>REF(VOL,1),0,MACD*2/3,3,0),COLORFF00FF;

DRAWICON(SJ && XXD && CCDD1,0,27);

DRAWICON(JJC && CCDD2,0,26);

DRAWICON(A11 AND A22 AND BIAS1>18,MACD/2,43);

DRAWICON(JJC && DIF<0 && BLLL,(0+DIF)/2,42);

DRAWTEXT(V8>=1 AND V9>=1 AND CLOSE>OPEN AND REF(CLOSE,1)>REF(OPEN,1) AND VOL>REF(VOL,1),MACD,’剑’),COLORFFFF00;

A44:=LLV(MACD,50)=MACD;

DRAWICON(A44 AND FILTER(A44,20), MACD,11);

死叉:=CROSS(DEA,DIF);

N1:=BARSLAST(死叉),NODRAW;

N2:=REF(BARSLAST(死叉),N1+1),NODRAW;

N3:=REF(BARSLAST(死叉),N2+N1+2),NODRAW;

CL1:=LLV(C,N1+1),NODRAW;

DIFL1:=LLV(DIF,N1+1),NODRAW;

CL2:=REF(CL1,N1+1),NODRAW;

DIFL2:=REF(DIFL1,N1+1),NODRAW;

CL3:=REF(CL2,N1+1),NODRAW;

DIFL3:=REF(DIFL2,N1+1),NODRAW;

PDIFL2:=IF(DIFL2>0,INTPART(LOG(DIFL2,10))-1,INTPART(LOG(-1*DIFL2,10))-1);

MDIFL2:=INTPART(DIFL2/POW(10,PDIFL2));

PDIFL3:=IF(DIFL3>0,INTPART(LOG(DIFL3,10))-1,INTPART(LOG(-1*DIFL3,10))-1);

MDIFL3:=INTPART(DIFL3/POW(10,PDIFL3));

MDIFB2:=INTPART(DIF/POW(10,PDIFL2));

MDIFB3:=INTPART(DIF/POW(10,PDIFL3));

直接底背离:=(CL1<CL2 ) AND (MDIFB2>MDIFL2) AND (MACD<0 AND REF(MACD,1)<0) AND MDIFB2<=REF(MDIFB2,1);

隔峰底背离:=(CL1<CL3 AND CL3<CL2 ) AND (MDIFB3>MDIFL3) AND (MACD<0 AND REF(MACD,1)<0) AND MDIFB3<=REF(MDIFB3,1);

B:=直接底背离 OR 隔峰底背离,NODRAW;

BG:=((MDIFB2>REF(MDIFB2,1))*REF(直接底背离,1)) OR ((MDIFB3>REF(MDIFB3,1))*REF(隔峰底背离,1)),NODRAW;

底背离消失:=(REF(直接底背离,1) AND DIFL1<=DIFL2 ) OR (REF(隔峰底背离,1) AND DIFL1<=DIFL3);

DRAWICON(B&&COUNT(B,BARSLAST(MACD>0)+1)=1,-MACD/2,4),COLORYELLOW;

DRAWICON(底背离消失&&COUNT(底背离消失,BARSLAST(B)+1)=1,-MACD/2,5),COLORGREEN;

DRAWICON(BG&&COUNT(BG,BARSLAST(MACD>0)+1)=1,-MACD/2,6),COLORMAGENTA;

金叉1:=CROSS(DIF,DEA);

M1:=BARSLAST(金叉1),NODRAW;

M2:=REF(BARSLAST(金叉1),M1+1),NODRAW;

M3:=REF(BARSLAST(金叉1),M2+M1+2),NODRAW;

CH1:=HHV(C,M1+1),NODRAW;

DIFH1:=HHV(DIF,M1+1),NODRAW;

CH2:=REF(CH1,M1+1),NODRAW;

DIFH2:=REF(DIFH1,M1+1),NODRAW;

CH3:=REF(CH2,M1+1),NODRAW;

DIFH3:=REF(DIFH2,M1+1),NODRAW;

PDIFH2:=IF(DIFH2>0,INTPART(LOG(DIFH2,10))-1,INTPART(LOG(-1*DIFH2,10))-1);

MDIFH2:=INTPART(DIFH2/POW(10,PDIFH2));

PDIFH3:=IF(DIFH3>0,INTPART(LOG(DIFH3,10))-1,INTPART(LOG(-1*DIFH3,10))-1);

MDIFH3:=INTPART(DIFH3/POW(10,PDIFH3));

MDIFT2:=INTPART(DIF/POW(10,PDIFH2));

MDIFT3:=INTPART(DIF/POW(10,PDIFH3));

直接顶背离:=(CH1>CH2 ) AND (MDIFT2<MDIFH2) AND (MACD>0 AND REF(MACD,1)>0) AND MDIFT2>=REF(MDIFT2,1);

隔峰顶背离:=(CH1>CH3 AND CH3>CH2 ) AND (MDIFT3<MDIFH3) AND (MACD>0 AND REF(MACD,1)>0) AND MDIFT3>=REF(MDIFT3,1);

T1:=直接顶背离 OR 隔峰顶背离,NODRAW;

TG:=((MDIFT2<REF(MDIFT2,1))*REF(直接顶背离,1)) OR ((MDIFT3<REF(MDIFT3,1))*REF(隔峰顶背离,1)),NODRAW;

顶背离消失:=(REF(直接顶背离,1) AND DIFH1>=DIFH2 ) OR (REF(隔峰顶背离,1) AND DIFH1>=DIFH3);

DRAWICON(T1&&COUNT(T1,BARSLAST(MACD<0)+1)=1,0,4),COLORYELLOW;

DRAWICON(顶背离消失&&COUNT(顶背离消失,BARSLAST(T1)+1)=1,0,5),COLORGREEN;

DRAWICON(TG&&COUNT(TG,BARSLAST(MACD<0)+1)=1,0,6),COLORMAGENTA;

CDQS:=DIF<-0.25{ && DIF/C<-0.064};

XXD1:=DIF<REF(DIF,1) && DIF<MACD;

JCC:=CROSS(DIF,DEA);

SCC:=CROSS(DEA,DIF);

AAA:=(2*C+H+L+2*O)/6;

VAR1:=(8*AAA+2*REF(AAA,6)+REF(AAA,8))/36;

VAR2:=(HHV(VAR1,2)+HHV(VAR1,4)+HHV(VAR1,8))/3;

VAR3:=(LLV(VAR1,2)+LLV(VAR1,4)+LLV(VAR1,8))/3;

VAR4:=(HHV(VAR2,2)+HHV(VAR2,4)+HHV(VAR2,8))/3;

VAR5:=(LLV(VAR3,2)+LLV(VAR3,4)+LLV(VAR3,8))/3;

VAR6:=(LLV(VAR1,2)+LLV(VAR1,4)+LLV(VAR1,8))/3;

AAE:= WINNER(CLOSE+CLOSE*15/100)*100;

BBE:= WINNER(CLOSE+CLOSE*0/100)*100;

CCE:= AAE-BBE;

DDE:= (WINNER(CLOSE-CLOSE*0.1/100)-WINNER(CLOSE-CLOSE*15/100))*100;

EEE:= CCE<3 AND DDE<0.5 AND OPEN>LOW;

AE1:= LLV(L,DAYBARPOS);

OSS:=DEA>=0;

OZFJ:=DIF<=0.25;

AE2:= IF(LOW>AE1,0,IF(HIGH<AE1,1,(AE1-LOW+0.01)/(HIGH-LOW+0.01)));

AE3:= VOL/WINNER(LOW);

AE4:= REF(HHV(CLOSE,120),1);

AE5:= REF(LLV(CLOSE,120),1);

AE6:= 100*(CLOSE-AE5)/(AE4-AE5);

AE7:= AE2>0 OR AE2=1;

AE8:= AE7 AND AE3/REF(AE3,3)>=3 AND AE6<80;

AE9:= REF(AE8,1) OR REF(AE8,2) OR REF(AE8,3) OR REF(AE8,4);

AE10:= AE8 AND AE9;

AE11:= IF(FILTER(AE8,3),5,0);

AE12:= FILTER(IF(FILTER(AE10,3) OR EEE,10,0),3);

ZT_1:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1);

ZT_2:=ZT_1>=0.099 AND CLOSE=HIGH AND LOW=HIGH;

S1:=MA((2*C+H+L)/4,5); 

S2:=S1*(200-102)/100;

S3:=(1-7/100)*DMA(C,ABS((2*C+H+L)/4-MA(C,20))/MA(C,20)); 

S4:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100; 

S5:=3*SMA(S4,3,1)-2*SMA(SMA(S4,3,1),3,1); 

S6:=((H+L+C)/3-MA((H+L+C)/3,14))/(0.015*AVEDEV((H+L+C)/3,14)); 

A:=REF(VAR6,1)=REF(VAR1,1) AND VAR6<VAR1;

BB:=REF(VAR5,1)=REF(VAR1,1) AND VAR5<VAR1;

E:=REF(VAR4,1)=REF(VAR1,1) AND VAR4>VAR1;

F:=REF(VAR1,1)>REF(VAR5,1) AND VAR5=VAR1;

一号:=IF(JCC && OSS,1,0),COLORWHITE;

SOZZ:=BARSLAST(CROSS(DEA,-0.11));

JJLL:=V/REF(V,1)>=3 || V/REF(MA(V,5),1)>=3;

DRAWICON(一号 && COUNT(SCC,SOZZ)=1,0.8*DIF,21);

DRAWICON(一号 && (JJLL=1 || REF(JJLL,1)=1),0.8*DIF,22);

TJ:=MACD>0;

T:=MACD<0;

DRAWTEXT(BARSLAST(TJ)=1,MACD,’1′),COLORGREEN;

DRAWTEXT(BARSLAST(TJ)=2,MACD,’2′),COLORGREEN;

DRAWTEXT(BARSLAST(TJ)=3,MACD,’3′),COLORGREEN;

DRAWTEXT(BARSLAST(TJ)=5,MACD,’5′),COLORGREEN;

DRAWTEXT(BARSLAST(TJ)=8,MACD,’8′),COLORGREEN;

DRAWTEXT(BARSLAST(TJ)=13,MACD,’13’),COLORGREEN;

DRAWTEXT(BARSLAST(TJ)=21,MACD,’21’),COLORGREEN;

DRAWTEXT(BARSLAST(TJ)=34,MACD,’34’),COLORGREEN;

DRAWTEXT(BARSLAST(TJ)=55,MACD,’55’),COLORGREEN;

DRAWTEXT(BARSLAST(T)=1,MACD,’1′),COLORYELLOW;

DRAWTEXT(BARSLAST(T)=2,MACD,’2′),COLORYELLOW;

DRAWTEXT(BARSLAST(T)=3,MACD,’3′),COLORYELLOW;

DRAWTEXT(BARSLAST(T)=5,MACD,’5′),COLORYELLOW;

DRAWTEXT(BARSLAST(T)=8,MACD,’8′),COLORYELLOW;

DRAWTEXT(BARSLAST(T)=13,MACD,’13’),COLORYELLOW;

DRAWTEXT(BARSLAST(T)=21,MACD,’21’),COLORYELLOW;

DRAWTEXT(BARSLAST(T)=34,MACD,’34’),COLORYELLOW;

DRAWTEXT(BARSLAST(T)=55,MACD,’55’),COLORYELLOW;

02

02
02

图片示例

友情提示:本指标公式仅作为知识分享,供交流学习使用,不构成任何投资建议,不作为投资依据。

声明:本站所有文章,如无特殊说明或标注,均为本站原创发布。任何个人或组织,在未征得本站同意时,禁止复制、盗用、采集、发布本站内容到任何网站、书籍等各类媒体平台。如若本站内容侵犯了原著者的合法权益,可联系我们进行处理。