当前位置:→ 公式网 > 大智慧公式 > 正文 ℃ 公式解密、改选股等业务 联系点击查看详情...
以下是MACD精确控盘源码(无源码的请下载附件导入)
C/C++ www.gszb.com 股票公式指标网提供 Code复制内容到剪贴板
- {MACD精确控盘}
- SHORT:=26;
- LONG:=12;
- M:=9;
- P1:=19;
- P2:=120;
- K:= -40;
- G:=-26;
- DIF:=((EMA(CLOSE,SHORT)-EMA(CLOSE,LONG)))*-3;
- DEA:=EMA(DIF,M);
- MACD:=2*(DIF-DEA);
- HH:=MA(CLOSE,10);
- GG:=MA(CLOSE,12);
- 上:=ema((MA(HIGH,3) * 1.05),30);
- 下:=ema((MA(LOW,3) * 0.96),30);
- 决战:STICKLINE((((CROSS(DIF,DEA) AND ((下 - REF(下,1)) > 0)) AND (MACD >= REF(MACD,1))) AND (DIF < 0)),DIF,0.4,3,0),color0000FF;
- DRAWICON((((CROSS(DIF,DEA) AND ((下 - REF(下,1)) > 0)) AND (MACD >= REF(MACD,1))) AND (DIF < 0)),0.4,0);
- DRAWTEXT((((CROSS(DIF,DEA) AND ((下 - REF(下,1)) > 0)) AND (MACD >= REF(MACD,1))) AND (DIF <= 0)),0.9,'金叉'),color0000FF;
- STICKLINE(FILTER(((((MACD >= REF(MACD,5)) AND ((下 - REF(下,1)) > 0)) AND (MACD <= 0)) AND ((GG - REF(GG,1)) >= 0)),3),0,0.5,3,0),color00FF00;
- DRAWICON(FILTER(((((MACD >= REF(MACD,5)) AND ((下 - REF(下,1)) > 0)) AND (MACD <= 0)) AND ((GG - REF(GG,1)) >= 0)),3),0.5,0);
- DRAWTEXT(FILTER(((((MACD >= REF(MACD,5)) AND ((下 - REF(下,1)) > 0)) AND (MACD <= 0)) AND ((GG - REF(GG,1)) >= 0)),3),0.9,'买'),colorcc9900;
- VCF1:=LLV(LOW,5);
- VCF2:=HHV(HIGH,5);
- VCF3:=EMA((((CLOSE - VCF1) / (VCF2 - VCF1)) * 100),4);
- VCF4:=EMA(((0.667 * REF(VCF3,1)) + (0.333 * VCF3)),2);
- VCF5:=((HIGH + LOW) / 2);
- VCF6:=DMA(VCF5,(VOL / SUM(VOL,5)));
- VCF7:=DMA(VCF5,(VOL / SUM(VOL,13)));
- VCF8:=DMA(VCF5,(VOL / SUM(VOL,34)));
- VCF9:=DMA(VCF5,(VOL / SUM(VOL,75)));
- VCFA:=EMA(WINNER((0.9 * CLOSE)),5);
- VCFB:=(1 - EMA(WINNER((1.2 * CLOSE)),5));
- VCFC:=EMA(WINNER(CLOSE),5);
- VCFD:=((100 * (CLOSE - VCF6)) / VCF6);
- VCFE:=((100 * (CLOSE - VCF7)) / VCF7);
- VCFF:=((100 * (MIN(CLOSE,OPEN) - VCF8)) / VCF8);
- VCF10:=BARSLAST(((VCF8 > VCF9) AND (REF(VCF8,1) <= REF(VCF9,1))));
- VCF11:=((((COUNT(((WINNER(CLOSE) < 0.11) AND (EMA(WINNER(CLOSE),5) < 0.15)),2) > 0) OR (((1 - WINNER((1.2 * CLOSE))) >= 0.8) AND (WINNER(CLOSE) < 0.05))) AND (COUNT((VCFE < (0 - 16)),2) > 0)) AND (COUNT((VCFF < (0 - 20)),2) > 0));
- VCF12:=((((COUNT((VCFD < (0 - 10)),2) > 0) AND (COUNT((VCFE < (0 - 15)),2) > 0)) AND (COUNT((VCFF < (0 - 15)),2) > 0)) AND (COUNT((VCFA > 0.8),VCF10) = 0));
- VCF13:=(((COUNT((VCF11 OR VCF12),2) > 0) AND (VCF3 > REF(VCF3,1))) AND (((1 - WINNER((1.15 * CLOSE))) * 100) > 80));
- 出击1:=IF((VCF13 AND (COUNT(VCF13,3) <= 1)),0.1,0);
- 黑马出击:IF((VCF13 AND (COUNT(VCF13,3) <= 1)),0.37,0),LINETHICK3,color0000FF;
- DRAWICON((黑马出击 > 0),0.37,1);
- DRAWTEXT((黑马出击 > 0),0.35,'.黑马'),colorFFFFFF;
- DRAWTEXT((黑马出击 > 0),0.35,'出击'),color00FF00;
- VAR26:=(((CLOSE - REF(CLOSE,1)) / REF(CLOSE,1)) * 100);
- VAR27:=((EMA(CLOSE,12) - EMA(CLOSE,26)) * 100);
- VAR28:=EMA(VAR27,9);
- VAR29:=(2 * (VAR27 - VAR28));
- STICKLINE(((VAR27 < (0 - 50)) AND (VAR26 > 7)),0,(0 - 0.1),5,0),color0000FF;
- DRAWTEXT((((VAR27 < (0 - 50)) AND (VAR26 > 7)) AND (VAR27 < VAR28)),(0 - 0.09),'底'),colorFFFFFF;
- DRAWTEXT((((VAR27 < (0 - 50)) AND (VAR26 > 7)) AND (VAR27 >= VAR28)),(0 - 0.1),'追'),colorFFFFFF;
- VAR1:=1;
- VAR2:=MA(CLOSE,18);
- VAR3:=(((CLOSE - VAR2) / VAR2) * 100);
- VAR4:=MA(VAR3,1);
- 升跌:=(VAR4 * VAR1);
- VAR5:=BARSLAST((CROSS((0 - 10),VAR4) = 1));
- VAR6:=BARSLAST((CROSS(VAR4,10) = 1));
- VAR7:=((VAR4 < (0 - 10)) AND (VAR5 >= 5));
- VAR8:=((VAR4 > 10) AND (VAR6 >= 5));
- {C1:(0.01 * (IF(((VAR4 < (0 - 10)) AND (VAR5 >= 5)),VAR4,0) * VAR1)),LINETHICK1,color0000FF;
- C2:=C1;}
- C3:=(IF(((VAR4 > 10) AND (VAR6 >= 5)),VAR4,0) * VAR1);
- C4:=C3;
- D1:=((((升跌 > REF(升跌,1)) AND VAR7) * 0.2) * VAR1);
- 中期底部:=LLV(CLOSE,30);
- D:(FILTER(((((((升跌 > REF(升跌,1)) AND (LOW <= 中期底部)) AND (CLOSE > 中期底部)) AND VAR7) * 0.5) * VAR1),3) * 0.5),LINETHICK2,color0000FF;
- DRAWTEXT((D >= 0.25),D,'铁底'),color00FFFF;
- STICKLINE(((CROSS(MACD,DIF) AND (MACD >= (0 - 0.05))) AND (MACD <= 0.02)),MACD,0.23,0,0),LINETHICK2,color00FFFF;
- DRAWTEXT(((CROSS(MACD,DIF) AND (MACD >= (0 - 0.05))) AND (MACD <= 0.02)),0.23,'MACD'),color0000FF;
- DRAWTEXT(((CROSS(MACD,DIF) AND (MACD >= (0 - 0.05))) AND (MACD <= 0.02)),0.23,'金叉'),LINETHICK1,colorYELLOW;
- DRAWICON(((CROSS(MACD,DIF) AND (MACD >= (0 - 0.05))) AND (MACD <= 0.02)),0.23,1);
- DIFF2:=(EMA(CLOSE,2) - EMA(OPEN,5));
- 操盘手:=DIFF2;
- (0.4 * ((CROSS(操盘手,MACD) AND (MACD <= (0 - 0.11))) AND (LOW <= 下))),LINETHICK2,colorFFFFFF;
- DRAWTEXT(((CROSS(操盘手,MACD) AND (LOW <= 下)) AND (MACD <= (0 - 0.11))),0.6,'短追5%'),colorff00ff;
- MA1:=MA(CLOSE,5);
- MA2:=MA(CLOSE,10);
- BB:(0.7 * ((((((CROSS(DIF,DEA) AND (CLOSE < 上)) AND ((下 - REF(下,1)) > 0)) AND CROSS(MACD,0)) AND (MACD >= 0)) AND (DIF > 0)) AND (((HH - REF(HH,1)) > 0) AND (VOL > REF(VOL,1))))),LINETHICK2;
- DRAWTEXT((((BB >= 0.7) AND (CLOSE < 上)) AND ((下 - REF(下,1)) > 0)),0.9,'追涨5%'),colorFF00ff;
- DRAWTEXT((((BB >= 0.7) AND (CLOSE < 上)) AND ((下 - REF(下,1)) > 0)),0.9,''),colorFF00ff;
- N15HIGH:=REF(HIGH,15);
- N1LOW:=REF(LOW,1);
- FF:=(((N15HIGH - N1LOW) / N1LOW) > 0.15);
- DRAWICON((((((CROSS(MA(CLOSE,P1),MA(CLOSE,P2)) > 0) AND (((N15HIGH - N1LOW) / N1LOW) < 0.15)) AND (OPEN >= MA(CLOSE,P1))) AND (CLOSE >= MA(CLOSE,P1))) AND (LOW <= MA(CLOSE,P1))),0.5,1);
- DRAWTEXT((((((CROSS(MA(CLOSE,P1),MA(CLOSE,P2)) > 0) AND (((N15HIGH - N1LOW) / N1LOW) < 0.15)) AND (OPEN >= MA(CLOSE,P1))) AND (CLOSE >= MA(CLOSE,P1))) AND (LOW <= MA(CLOSE,P1))),0.9,'回头望月'),colorFF0000;
- VAR10:=(((CLOSE - MA(CLOSE,58)) / MA(CLOSE,58)) * 100);
- VAR11:=((((VAR10 > (1 * REF(VAR10,1))) AND (VAR10 < K)) AND (VAR10 > G)) * 1.5);
- VAR12:=((VOL / CAPITAL) * 100);
- VAR13:=LLVBARS(LOW,50);
- VAR14:=SUM(VOL,VAR13);
- VAR15:=HHVBARS(HIGH,50);
- VAR16:=SUM(VOL,VAR15);
- VAR17:=(((CLOSE - REF(OPEN,VAR15)) / REF(OPEN,VAR15)) * 100);
- VAR18:=((VAR16 / CAPITAL) * 100);
- VAR19:=(((CLOSE - REF(OPEN,VAR13)) / REF(OPEN,VAR13)) * 100);
- VAR20:=((VAR14 / CAPITAL) * 100);
- VAR21:=MA(CLOSE,3);
- VAR22:=(REF(CLOSE,2) * 0.865);
- VAR23:=(REF(CLOSE,13) * 0.772);
- VAR24:=MIN(VAR22,VAR23);
- VAR25:=MA(CLOSE,13);
- 抄底1:(IF((((((CLOSE - VAR24) / CLOSE) < 0.03) AND (VAR17 < (-35))) AND ((SUM(VAR12,5) / 5) < 1.8)),1,0) * 0.4),LINETHICK3,colorFF0000;
- DRAWTEXT((抄底1 > 0),抄底1,'底'),LINETHICK3,colorFFFFFF;
- DRAWTEXT((抄底1 > 0),抄底1,'成功90%'),LINETHICK3,color00FF00;
- VAR266:=(((CLOSE - REF(CLOSE,1)) / REF(CLOSE,1)) * 100);
- VAR277:=((EMA(CLOSE,12) - EMA(CLOSE,26)) * 100);
- VAR288:=EMA(VAR277,9);
- VAR299:=(2 * (VAR277 - VAR288));
- DRAWTEXT((((VAR277 < (-50)) AND (VAR266 > 7)) AND (VAR277 < VAR288)),(-0.08),'★'),colorFFFFFF;
- DRAWTEXT((((VAR277 < (-50)) AND (VAR266 > 7)) AND (VAR277 >= VAR288)),(-0.1),'● '),colorFFFFFF;
- VAC:=(LOW * 0.9);
- VAB:=EMA(LLV(LOW,90),21);
- VAD:=(((VAC * VOL) + (VAB * (CAPITAL - VOL))) / CAPITAL);
- VAE:=EMA(VAD,30);
- VAF:=(CLOSE - REF(CLOSE,1));
- VA10:=MAX(VAF,0);
- VA11:=ABS(VAF);
- VA12:=((SMA(VA10,7,1) / SMA(VA11,7,1)) * 100);
- VA13:=((SMA(VA10,13,1) / SMA(VA11,13,1)) * 100);
- VA14:=((SMA(MAX(VAF,0),6,1) / SMA(ABS(VAF),6,1)) * 100);
- VA15:=((((-200) * (HHV(HIGH,60) - CLOSE)) / (HHV(HIGH,60) - LLV(LOW,60))) + 100);
- VA16:=(((CLOSE - LLV(LOW,15)) / (HHV(HIGH,15) - LLV(LOW,15))) * 100);
- VA17:=SMA(((SMA(VA16,4,1) - 50) * 2),3,1);
- VA18:=(((INDEXC - LLV(INDEXL,14)) / (HHV(INDEXH,14) - LLV(INDEXL,14))) * 100);
- VA19:=SMA(VA18,4,1);
- VA1A:=SMA(VA19,3,1);
- VA1B:=(((HHV(HIGH,30) - CLOSE) / CLOSE) * 100);
- VA1C:=((((((((VA14 <= 25) AND (VA15 < (-95))) AND (VA1B > 20)) AND (VA17 < (-30))) AND (VA1A < 30)) AND ((VAE - CLOSE) >= (-0.25))) AND (VA12 < 22)) AND (VA13 < 28));
- 低买1:=STICKLINE(VA1C,0,0.1,1,1);
- 发射:STICKLINE(VA1C,0,0.7,2,0),LINETHICK2,color0000FF;
- DRAWTEXT((VA1C > 0),0.7,'^发射'),colorFFFFFF;
- A4:=BARSLAST(ref(cross(dif,dea),1));
- B1:=ref(c,A4+1)>c and ref(dif,A4+1)<dif and cross(dif,dea);
- DRAWTEXT(FILTER(B1>0,5),dif+0.2,'背离'),COLORyellow;
- STICKLINE(MACD<ref(MACD,1)and MACD>0,0,MACD,5,0),colorgreen;
- STICKLINE(MACD<ref(MACD,1)and MACD<0,0,MACD,5,0),colorFFCC33;
- STICKLINE(MACD>ref(MACD,1)and MACD,0,MACD,5,0),COLORyellow;
- STICKLINE(MACD>ref(MACD,1)and MACD>0,0,MACD,5,0),COLORred;
- if(dif<0,dif,0),coloryellow,linethick2;
- if(dif<0,0,dif),colorred,linethick2;
- if(dif<dea,dif,dea),COLORWHITE,linethick2;
- if(dif>dea,dea,dea),{COLORgreen}colorFF937F,linethick2;
- 洗盘:=IF(MACD>0 AND REF(MACD,1)>REF(MACD,2) AND MACD< REF(MACD,1),1,0);
- 有庄控:=IF(MACD<0 AND REF(MACD,1)< REF(MACD,2) AND MACD>REF(MACD,1),1,0);
- 阻力:=IF(CROSS(C,MA(C,20)) OR CROSS(C,MA(C,60)),1,0);
- 支撑:=IF(CROSS(MA(C,20),C) OR CROSS(MA(C,60),C),1,0);
- 做多:=IF(CROSS(MACD,DIF) AND DIF>0 AND MACD>0,1,0);
- 放空:=IF(CROSS(DIF,MACD) AND DIF<0 AND MACD<0,1,0);
- DRAWTEXT(FILTER(洗盘,3) AND 洗盘,MACD,''),COLORFF00FF;
- DRAWTEXT(FILTER(洗盘,3) AND 洗盘,MACD+0.4,''),COLORGREEN;
- DRAWTEXT(FILTER(有庄控,3) AND 有庄控,MACD,''),COLORyellow;
- DRAWTEXT(FILTER(有庄控,3) AND 有庄控,MACD-0.2,'庄'),COLORyellow;
- DRAWTEXT(FILTER(阻力,16) AND MACD>=0,MACD+0.01,'阻'),COLOR00FFFF;
- DRAWTEXT(FILTER(支撑,16) AND MACD<0,MACD,'撑'),COLORFFFFFF;
- 多头趋势:=IF(DIF>=0 AND MACD>=0 OR (DIF<0 AND MACD>=0),1,0);
- 变盘趋势:=DIF<0 AND MACD<0 OR (DIF>=0 AND MACD<0);
- up:=FILTER(多头趋势,13);
- DRAWTEXT(up,DIF,'多头'),COLORRED,LINETHICK1;
- pu :=FILTER(变盘趋势,13);
- DRAWTEXT(PU,DIF,'变盘'),COLORFF8800;
- 低位追涨:=CROSS(DIF,DEA) AND DIF<-0.1;
- STICKLINE(低位追涨,0,0.08,6,0),COLORYELLOW,LINETHICK1;
- DRAWTEXT(低位追涨,低位追涨-1.5,'低追'),COLORWHITE;
- JCCOUNT:=COUNT(CROSS(DIF,DEA),BARSLAST(DEA>=0));
- 二次金叉:=CROSS(DIF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1;
- STICKLINE(二次金叉,0,0.06,6,0),ColorFF00FF;
- DRAWICON(二次金叉,dea*1.04,1) ;
- DRAWTEXT(二次金叉,0.7,'金叉'),Colorred;
- A1:=BARSLAST(REF(CROSS(DIF,DEA),1));
- 抄底:=REF(CLOSE,A1+1)>CLOSE AND DIF>REF(DIF,A1+1) AND CROSS(DIF,DEA);
- STICKLINE(抄底,0,0.03,6,0),Color00FF00;
- DRAWLINE(A1=0,DEA,抄底,DEA,0),COLORRED,linethick1;
- DRAWTEXT(抄底,0.12,'底'),ColorFF00FF;
- A2:=BARSLAST(REF(CROSS(DEA,DIF),1));
- 逃顶:=REF(CLOSE,A2+1)<CLOSE AND REF(DIF,A2+1)>DIF AND CROSS(DEA,DIF);
- DRAWLINE(A2=0,DEA,逃顶,DEA,0),COLORGREEN,linethick1;
- DRAWTEXT(逃顶,0.2,'逃顶'),ColorYELLOW;
上一篇:新DDE决策指标源码(附图) 下一篇:黑客点击选股