分享两个手机版通达信的指标源码(PC端也适用)
第一种:不一定要用DLL的绕刷指针,推荐为主图。
CLG:=MA(C,5);
CLD:=MA(C,10);
CLHH:=REF(H,5)=HHV(H,11);
CLLL:=REF(L,5)=LLV(L,11);
CLFG01:=BACKSET(CLHH,6)BACKSET(CLHH,5) ;
CLFD01:=BACKSET(CLLL,6)BACKSET(CLLL,5) ;
CLFG02:=IF(BARSLAST(CLFG01)=BARSLAST(CLFD01) AND CLGCLD,CLFG01,
IF(BARSLAST(CLFD01)BARSLAST(CLFG01),CLFG01,0));
CLFD02:=IF(BARSLAST(CLFG01)=BARSLAST(CLFD01) AND CLDCLG,CLFD01,
IF(BARSLAST(CLFG01)BARSLAST(CLFD01),CLFD01,0));
CLFG0:=CLFG02 AND H=HHV(H,BARSLAST(CLFD02));
CLFD0:=CLFD02 AND L=LLV(L,BARSLAST(CLFG02));
CLGP:=IF(CLFG0,H,DRAWNULL),CIRCLEDOT,COLORCYAN;
CLDP:=IF(CLFD0,L,DRAWNULL),CIRCLEDOT,COLORCYAN;
CLGQ:=LREF(H,1) AND DAY!=REF(DAY,1);
CLDQ:=HCLGQL:=REF(L,BARSLAST(CLGQ));
CLDQH:=REF(H,BARSLAST(CLDQ));
CLFGH:=REF(H,BARSLAST(CLFG0));
CLFGL:=REF(L,BARSLAST(CLFG0));
CLFGH1:=REF(H,BARSLAST(CLFG0)+1);
CLFGL1:=REF(L,BARSLAST(CLFG0)+1);
CLFGH2:=REF(H,BARSLAST(CLFG0)+2);
CLFGL2:=REF(L,BARSLAST(CLFG0)+2);
CLFDH:=REF(H,BARSLAST(CLFD0));
CLFDL:=REF(L,BARSLAST(CLFD0));
CLFDH1:=REF(H,BARSLAST(CLFD0)+1);
CLFDL1:=REF(L,BARSLAST(CLFD0)+1);
CLFDH2:=REF(H,BARSLAST(CLFD0)+2);
CLFDL2:=REF(L,BARSLAST(CLFD0)+2);
CLFGZH:=IF(CLFGL=CLFGL1,CLFGH2,CLFGH1);
CLFGZL:=IF(CLFGH1CLFDZH:=IF(CLFDL1CLFDH,CLFDH,IF(CLFDH=CLFDH1,CLFDH2,CLFDH1));
CLFDZL:=IF(CLFDH=CLFDH1,CLFDL2,CLFDL1);
CLFG1:=CLFGHCLFDZH和CLFG0{好股票WWW .好古漂。COM}
CLFD1:=CLFDLCLFG:=CLFG1 AND CLFGHCLFDH AND CLFGLCLFDL AND CLFGL1CLFDL;
CLFD:=CLFD1 AND CLFDLCLBH0:=(H=REF(H,1) AND L=REF(L,1)) OR (H=REF(H,1) AND L=REF(L,1));
CLBHG:=COUNT(CLBH0,BARSLAST(CLFD0));
CLBHD:=COUNT(CLBH0,BARSLAST(CLFG0));
CLBGQ:=COUNT(CLGQ,BARSLAST(CLFD0));
CLBDQ:=COUNT(CLDQ,BARSLAST(CLFG0));
CLBK0:=IF(CLBHG0,CLBHG+2+1,IF(CLBHD,CLBHD+2+1,3));
CLBK:=IF(CLBGQ,CLBK0-CLBGQ,IF(CLBDQ,CLBK0-CLBDQ,CLBK0));
CLG1X:=(CLFG AND BARSLAST(CLFD)CLBK);
CLD1X:=(CLFD AND BARSLAST(CLFG)CLBK);
CLG1:=(CLFG0 AND REF(H,BARSLAST(CLFG0))=REF(H,BARSLAST(CLG1X)) AND BARSLAST(CLD1X)BARSLAST(CLG1X)) OR (CLFG1 AND COUNT(CLGQ,BARSLAST(CLFD1))0 AND REF(H,BARSLAST(CLFG1))REF(H,BARSLAST(CLG1X)));
CLD1:=(CLFD0 AND REF(L,BARSLAST(CLFD0))=REF(L,BARSLAST(CLD1X)) AND BARSLAST(CLG1X)BARSLAST(CLD1X)) OR (CLFD1 AND COUNT(CLDQ,BARSLAST(CLFG1))0 AND REF(L,BARSLAST(CLFD1))CLG1H:=IF(BARSLAST(CLD1)BARSLAST(CLG1),REF(H,BARSLAST(CLG1)),REF(H,BARSLAST(CLD1))),
CLD1L:=IF(BARSLAST(CLG1)BARSLAST(CLD1),REF(L,BARSLAST(CLD1)),REF(L,BARSLAST(CLG1)));
CLG2:=CLG1 AND H=HHV(CLG1H,BARSLAST(CLD1)+1) AND HREF(H,1) AND BARSLAST(CLD1)BARSLAST(CLG1);
CLD2:=CLD1 AND L=LLV(CLD1L,BARSLAST(CLG1)+1) AND LBARSLAST(CLD1);
CLG3:=CLG2 OR (CLFG0 AND REF(H,BARSLAST(CLFG0))REF(H,BARSLAST(CLG2)) AND BARSLAST(CLD2)BARSLAST(CLG2));
CLD3:=CLD2 OR (CLFD0 AND REF(L,BARSLAST(CLFD0))BARSLAST(CLD2));
CLGPB:=IF(CLG1X,H,DRAWNULL),CIRCLEDOT,COLORYELLOW;
CLDPB:=IF(CLD1X,L,DRAWNULL),CIRCLEDOT,COLORYELLOW;
{下划线}
CLNN:=CLG3;
CLUU:=CLD3;
DRAWLINE(CLUU,L,CLNN, H,0),COLORYELLOW,DOTLINE;
DRAWLINE(CLNN,H,CLUU, L,0),COLORWHITE,DOTLINE;
第二个建议是如附图所示,MACD向后跑。
参数:最小值最大值默认值
笔参数1 999 3
段参数1 999 3
DIF:EMA(CLOSE,12)-EMA(CLOSE,26),COLORRED,LINETHICK2;DEA:EMA(DIF,9);
IF(DIFMACD:(DIF-DEA)*2,COLORSTICK;
Pen low answer:=low=LLV (low, pen parameter), NODRAW
Pen height answer:=height=HHV (height, pen parameter), NODRAW
笔低:=笔低A且笔高A=0,NODRAW
笔高:=笔高A且笔高A=0,NODRAW
Pen winding:=draw a line (pen low, pen low, pen high, pen high, 0) color0000ff;
Writing:=draw a line (pen height, pen height, pen low, pen low, 0), COLOR00FF00.
Turn down:=pen up REF (pen up,1)和pen down REFX (pen down,1),NODRAW
翻起:=下笔段A:=低=LLV(低,段参数*笔参数),NODRAW
段高A:=高=HHV(高,段参数*笔参数),NODRAW
段低:=段低A且段高A=0,NODRAW
段高:=段高A且段低A=0,NODRAW
Upper paragraph:=draw a line (paragraph low, low, paragraph high, high, 0), LINETHICK2, color mage.
Lower segment:=draw a line (segment height, high, segment low, low, 0), LINETHICK2, COLORFF8000.
特殊底:=下段=上段和低和MACD0,NODRAW
TTT:=REF(BARSLAST(特殊底),1) 1;
底背离1:=特殊底AND LOWREF(DIF,TTT) AND LLV(DIF,BARSLASTCOUNT(MACD0))REF(DIF,TTT),NODRAW;
底背左点1:=BACKSET(底背离1,TTT+1) AND REF(BACKSET(底背离1,TTT+1),1)=0 AND 特殊底;
DRAWLINE(底背左点1,DIF,底背离1,DIF,0),COLORFF00FF,LINETHICK2;
底背离2:=特殊底AND LOWREF(MACD,TTT) AND LLV(MACD,BARSLASTCOUNT(MACD0))REF(MACD,TTT),NODRAW;
底背左点2:=BACKSET(底背离2,TTT+1) AND REF(BACKSET(底背离2,TTT+1),1)=0 AND 特殊底;
DRAWLINE(底背左点2,MACD,底背离2,MACD,0),COLORFF00FF,LINETHICK1;
特殊顶:=下段=上段AND 段高AND MACD0,NODRAW;
TTTG:=REF(BARSLAST(特殊顶),1)+1;
顶背离1:=特殊顶AND HIGHREF(HIGH,TTTG) AND DIF0))顶背左点1:=BACKSET(顶背离1,TTTG+1) AND REF(BACKSET(顶背离1,TTTG+1),1)=0 AND 特殊顶;
DRAWLINE(顶背左点1,DIF,顶背离1,DIF,0),COLORGREEN,LINETHICK2;
顶背离2:=特殊顶AND HIGHREF(HIGH,TTTG) AND MACD0))顶背左点2:=BACKSET(顶背离2,TTTG+1) AND REF(BACKSET(顶背离2,TTTG+1),1)=0 AND 特殊顶;
DRAWLINE(顶背左点2,MACD,顶背离2,MACD,0),COLORGREEN,LINETHICK1;
DRAWTEXT(底背离2=1,MACD,'柱背离'),COLORFF00FF;
DRAWTEXT(底背离1=1,DIF,'线背离'),COLORFF00FF;
DRAWTEXT(顶背离2=1,MACD,'柱背离'),COLORGREEN;
DRAWTEXT(顶背离1=1,DIF,'线背离'),COLORGREEN;
DRAWICON(REF(DIF,1)REF(DIF,2) AND DIF0 AND DIFDEA,DIF*1.1,2),COLORGREEN;
DRAWICON(REF(DIF,1)REF(DIF,1) AND DIF0 AND DIFXA_2:=BARSLAST(REF(MACD,1)0 AND MACD0);
XA_3:=LLVBARS(MACD,XA_2+20);
XA_4:=IF(XA_3XA_2,REF(MACD,XA_3),0);
XA_5:=MACD0 AND MACDXA_4 AND LOW=LLV(LOW,XA_2+20) AND XA_40;
柱背离1:=(REF(XA_5,1)=1 AND MACDREF(MACD,1) AND REF(DIF,XA_3)0 AND MACD0),NODRAW;
DRAWLINE(XA_4=XA_3,MACD,柱背离1,MACD,0),COLORRED,LINETHICK1;
DRAWICON(柱背离1,0,26);
柱背离A:BARSLAST(柱背离10)+1,NODRAW;
柱背离:BARSLAST(底背离20)+1,NODRAW;
线背离:BARSLAST(底背离10)+1,NODRAW;
DRAWRECTREL(0,965,130,999,RGB(0,0,1)),NOFRAME;
以上就是分享的两个指标,大家别忘了点个赞哈