夜雨聆风
庄家害怕的副图指标源码
如果这个公式对您有价值或有帮助
请分享回馈
感谢您对我工作支持和肯定！
DIFF:EMA(C,12)-EMA(C,26),COLORMAGENTA;
DEA:EMA(DIFF,9),COLORWHITE;
MACD:(DIFF-DEA)*2,COLORSTICK;
STICKLINE(MACD>0,MACD,0,3,1),COLORRED;
STICKLINE(MACD<0,MACD,0,3,1),COLORCYAN;
STICKLINE(MACD<REF(MACD,1) AND MACD>0,0,MACD,1.22,1),COLOR00FF00;
STICKLINE(MACD>REF(MACD,1) AND MACD<0,0,MACD,2.0,1),COLORFF0000;
STICKLINE(MACD<=REF(MACD,1) AND MACD<0,0,MACD,1.1,1),COLORFFEE44;
VA1:=HHVBARS(MACD,BARSLAST(MACD<0)+1);
VA2:=CROSS(BACKSET(CROSS(0,MACD),REF(VA1,1)+2),0.5);
DRAWTEXT_FIX(1,0.82,0,0,’微信公众号：指标迷’),COLORRED;
QG:=CROSS(BACKSET(CROSS(0,MACD) OR (ISLASTBAR AND MACD>0),REF(VA1,1)+2),0.5);
PREHIGH:DRAWLINE(VA2,MACD,REF(VA2,1),REF(MACD,1),1),COLORMAGENTA,DOTLINE;
VA3:=LLVBARS(MACD,BARSLAST(MACD>0)+1);
VA4:=CROSS(BACKSET(CROSS(MACD,0),REF(VA3,1)+2),0.5);
BD:=BARSLAST(FILTERX(CROSS(0,MACD),BARSCOUNT(C)));
PRELOW:=DRAWLINE(VA4,MACD,REF(VA4,1),REF(MACD,1),1),CIRCLEDOT;
BDTJ:=IF(MACD<0,FILTERX(MACD=LLV(MACD,BARSLAST(MACD>0)),BARSCOUNT(C)),DRAWNULL);
TSBDTJ:=BARSLAST(BDTJ);
BDZH:=FILTERX(MACD<CONST(LLV(MACD,BD+1)),BARSCOUNT(C));
BDTS:=BARSLAST(BDZH);
CURLOW:IF(BD+1>=1,CONST(LLV(MACD,BD+1)),DRAWNULL);
BDCL:=CROSS(COUNT(CROSS(MACD>CURLOW/2 AND MACD<0,0.5),TSBDTJ)=1,0.5) AND TSBDTJ>=0;
ENDPT:=IF(ISLASTBAR AND MACD>0 AND MACD=HHV(MACD,BARSLAST(MACD<0)),1,IF(FILTERX(QG,BARSCOUNT(C)),2,DRAWNULL));
UU:=(ENDPT=1 OR ENDPT=2) AND MACD>0;
ZZ:=FILTERX(UU,BARSCOUNT(C));
CURHIGH:DRAWLINE(ZZ,MACD,REF(ZZ,1),REF(MACD,1),1),COLORWHITE;
HLINE:=CONST(REF(MACD,BARSLAST(ZZ)));
WW:=MACD>HLINE;
STARTPT:=FILTERX(REFX(BARSLAST(WW),1)=1,BARSCOUNT(C));
DAYS:BARSLAST(STARTPT),COLORYELLOW,NODRAW;
UPLINE:DRAWLINE(STARTPT,HLINE,ZZ,HLINE,0),COLORGREEN,DOTLINE;
DNLINE:DRAWLINE(BDZH,CONST(LLV(MACD,BD+1)),BDTJ=1,MACD,0),COLOR8080FF,DOTLINE;
DRAWNUMBER(BDTJ,CONST(LLV(MACD,BD+1))*0.9,BDTS);
DRAWNUMBER(ZZ,UPLINE*1.1,DAYS);
TJ:=IF(STARTPT,BARSNEXT(ZZ),DRAWNULL);
REDCNT:IF(DAYS>0 AND DAYS<=REF(TJ,DAYS),SUM(MACD>0,DAYS),DRAWNULL),COLORWHITE,NODRAW;
STARTPRICE:REF(C,DAYS),NODRAW;
SPACEPCT:(STARTPRICE-C)/C*100,NODRAW;
TT:=BARSLAST(ZZ);
WQG:=CROSS(COUNT(CROSS(MACD<CURHIGH/2 AND MACD>0,0.5),ZZ)=1,0.5) AND ZZ>=0;
STICKLINE(MACD>PREHIGH AND CURHIGH>PREHIGH AND BARSLAST(CROSS(MACD<CURHIGH/2,0.5))>0 AND MACD>(PREHIGH+CURHIGH)/2,MACD,PREHIGH,1,0),COLORYELLOW;
MIDLINE:IF(MACD>0 AND CURHIGH!=PREHIGH,DRAWLINE(WQG,(PREHIGH+CURHIGH)/2,REF(WQG,1),REF((PREHIGH+CURHIGH)/2,1),1),DRAWNULL),COLORC0C000,DOTLINE;
AA:=STRCAT(STRCAT(STRCAT(‘〖’,’上升空间’),’〗’),CON2STR(IF(SPACEPCT,SPACEPCT,DRAWNULL),2));
DRAWTEXT(WQG,MACD*1.1,’本高成立’),COLORWHITE;
DRAWTEXT(BDCL,MACD*1.1,’本低成立’),COLORWHITE;
STICKLINE(MACD>PREHIGH,MACD,PREHIGH,1,0),COLORYELLOW;
STICKLINE(WQG,MACD,0,1,0),COLORGREEN;
STICKLINE(MACD<0 AND MACD<PRELOW AND PRELOW<0,MACD,PRELOW,1,0),COLORBLUE;
B1:=IF(CROSS(MACD<0,0.5),BARSNEXT(BDTJ),DRAWNULL);
TSB1:=BARSLAST(MACD>0)-1;
STICKLINE(BARSLAST(BDCL)>=0 AND MACD<PRELOW AND MACD<0,MACD,PRELOW,1,0),COLORGREEN;
STICKLINE(BDCL,MACD,0,1,0),COLORWHITE;
STICKLINE(MACD>PREHIGH AND CURHIGH>PREHIGH AND BARSLAST(WQG)>0,MACD,PREHIGH,1,0),COLORRED;
DRAWTEXT(VA2 AND VA2!=UU,(MACD/10)*9,’前’);
DRAWTEXT(VA2 AND VA2!=UU,MACD/10,’高’);
DRAWTEXT(ZZ,(MACD/10)*9,’本’),COLORWHITE;
DRAWTEXT(ZZ,MACD/10,’高’),COLORWHITE;
DRAWTEXT(BDTJ,(MACD/10)*9,’低’),COLORRED;
DRAWTEXT(BDTJ,MACD/10,’本’),COLORRED;
IF(BARSLAST(BDCL)>=0,CURLOW/2,DRAWNULL),COLORRED,DOTLINE;
BASE:=CONST(SUM(VA2,0));
PHL:=BASE=SUM(VA2,0) AND VA2,COLORCYAN,NODRAW;
PH1:=BASE-1=SUM(VA2,0) AND VA2,COLORYELLOW,NODRAW;
PH2:=BASE-2=SUM(VA2,0) AND VA2,COLORWHITE,NODRAW;
PH3:=BASE-3=SUM(VA2,0) AND VA2,COLORWHITE,NODRAW;
PH4:=BASE-4=SUM(VA2,0) AND VA2,COLORWHITE,NODRAW;
DG1:=BARSLAST(PH1); DG2:=BARSLAST(PH2); DG3:=BARSLAST(PH3); DG4:=BARSLAST(PH4);
NOTEXT1:DRAWLINE(PH1,MACD,PHL AND MACD>=REF(MACD,DG1),MACD,0),COLORYELLOW;
NOTEXT2:DRAWLINE(PH1,MACD,PHL AND MACD<REF(MACD,DG1),MACD,0),COLORGREEN;
NOTEXT3:DRAWLINE(PH2,MACD,PH1 AND MACD>=REF(MACD,DG2),MACD,0),COLORYELLOW;
NOTEXT4:DRAWLINE(PH2,MACD,PH1 AND MACD<REF(MACD,DG2),MACD,0),COLORGREEN;
NOTEXT5:DRAWLINE(PH3,MACD,PH2 AND MACD>=REF(MACD,DG3),MACD,0),COLORYELLOW;
NOTEXT6:DRAWLINE(PH3,MACD,PH2 AND MACD<REF(MACD,DG3),MACD,0),COLORGREEN;
NOTEXT7:DRAWLINE(PH4,MACD,PH3 AND MACD>=REF(MACD,DG4),MACD,0),COLORYELLOW;
NOTEXT8:DRAWLINE(PH4,MACD,PH3 AND MACD<REF(MACD,DG4),MACD,0),COLORGREEN;
BASE2:=CONST(SUM(VA4,0));
PL1:=BASE2-1=SUM(VA4,0) AND VA4;
PL2:=BASE2-2=SUM(VA4,0) AND VA4;
PL3:=BASE2-3=SUM(VA4,0) AND VA4;
PL4:=BASE2-4=SUM(VA4,0) AND VA4;
DD1:=BARSLAST(PL1); DD2:=BARSLAST(PL2); DD3:=BARSLAST(PL3); DD4:=BARSLAST(PL4);
NOTEXT9:DRAWLINE(PL1,MACD,VA4 AND MACD>=REF(MACD,DD1),MACD,0),COLORYELLOW;
NOTEXT10:DRAWLINE(PL1,MACD,VA4 AND MACD<REF(MACD,DD1),MACD,0),COLORGREEN;
NOTEXT11:DRAWLINE(PL2,MACD,PL1 AND MACD>=REF(MACD,DD2),MACD,0),COLORYELLOW;
NOTEXT12:DRAWLINE(PL2,MACD,PL1 AND MACD<REF(MACD,DD2),MACD,0),COLORGREEN;
NOTEXT13:DRAWLINE(PL3,MACD,PL2 AND MACD>=REF(MACD,DD3),MACD,0),COLORYELLOW;
NOTEXT14:DRAWLINE(PL3,MACD,PL2 AND MACD<REF(MACD,DD3),MACD,0),COLORGREEN;
NOTEXT15:DRAWLINE(PL4,MACD,PL3 AND MACD>=REF(MACD,DD4),MACD,0),COLORYELLOW;
NOTEXT16:DRAWLINE(PL4,MACD,PL3 AND MACD<REF(MACD,DD4),MACD,0),COLORGREEN;
{ 金叉与背离 }
LOWCROSS:=CROSS(DIFF,DEA) AND DIFF<-0.1;
STICKLINE(LOWCROSS,0,0.08,2,0),COLORYELLOW;
DRAWTEXT(LOWCROSS,0.16,’ 低位金叉’),COLORWHITE;
JCCOUNT:=COUNT(CROSS(DIFF,DEA),BARSLAST(DEA>=0));
SECCROSS:=CROSS(DIFF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1;
STICKLINE(SECCROSS,0,0.06,2,0),COLORFF00FF;
DRAWICON(SECCROSS,DEA*0.9,1);
DRAWTEXT(SECCROSS,0.2,’ 二次金叉’),COLORYELLOW;
A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));
BOTTOMDIV:REF(C, A1+1)>C AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA);
STICKLINE(BOTTOMDIV,0,0.03,2,0),COLOR00FF00;
BOTLINE:DRAWLINE(A1=0,DEA,BOTTOMDIV,DEA,0),COLOR008080,LINETHICK4;
DRAWTEXT(BOTTOMDIV,0.1,’ 底背离’),COLORFF00FF;
A2:=BARSLAST(REF(CROSS(DEA,DIFF),1));
TOPDIV:=REF(C,A2+1)<C AND REF(DIFF,A2+1)>DIFF AND CROSS(DEA,DIFF);
TOPLINE:DRAWLINE(A2=0,DEA,TOPDIV,DEA,0),COLORGREEN,LINETHICK4;
DRAWTEXT(LOWCROSS AND SECCROSS AND BOTTOMDIV,0.25,’三全项’),COLOR0000FF,LINETHICK2;
关注【指标迷】，每日解锁一个量化指标源码！
电脑端导入步骤：
打开公式管理器：登录通达信，在任意K线图界面，点击顶部菜单栏「功能」→「公式系统」→「公式管理器」（或快捷键Ctrl+F）。
新建公式：在公式管理器中，选择「技术指标公式」→「其他类型」，点击「新建」。
填写公式名称（如“量化操盘”），粘贴上方完整源码
打开通达信APP，进入个股K线图，点击右下角「…」→「指标编辑」→「新建指标」。粘贴上面复制公式源码，设置名称后保存。
