MACD精确控盘源码介绍
{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;
