神手背离 MACD多指背离 神手背离 源码: 
//MACD多指背离 
DIFF:EMA(CLOSE,5) - EMA(CLOSE,26); 
DEA:EMA(DIFF,50); 
MACD=2*(DIFF-DEA); 
gj:=MAX(C,O); 
STICKLINE(MACD>0 AND MACD>=REF(MACD,1),0,MACD,2,0),color0000ff; 
STICKLINE(MACD>0 AND MACD<REF(MACD,1),0,MACD,2,0),colorffff00; 
STICKLINE(MACD<0 AND MACD>=REF(MACD,1),0,MACD,2,0),colorff00ff; 
STICKLINE(MACD<0 AND MACD<REF(MACD,1),0,MACD,2,0),color00ff00; 
L4:=LLV(gj,4);//分析家公式网 www.fxjgsw.com 
jl:=(HHV(diff,55)-LLV(diff,55))/5; 
gt:=dea>REF(dea,1) AND REF(dea,1)<REF(dea,2); 
A1:=BARSLAST(REF(gt,1)); 
底背离:=REF(L4,A1+1)>CLOSE AND diff>REF(diff,A1+1) AND gt; 
DRAWLINE(A1=0,DEA,底背离,REF(DEA,A1),0),colorred,LINETHICK2; 
DRAWLINE(底背离,DEA,底背离,REF(DEA,A1),0),colorred,LINETHICK2; 
DRAWTEXT(底背离,REF(DEA,A1)*1.18,' 底背离'),COLORFF00FF; 
H4:=HHV(gj,4); 
gt2:=dea<REF(dea,1) AND REF(dea,1)>REF(dea,2); 
A2:=BARSLAST(REF(gt2,1)); 
顶背离:= REF(H4,A2+1)<H4 AND diff<REF(diff,A2+1) AND gt2; 
DRAWLINE(A2=0 ,DEA,顶背离,REF(DEA,A2),0),colorgreen,LINETHICK2; 
DRAWLINE(顶背离,DEA,顶背离,REF(DEA,A2),0),colorgreen,LINETHICK2; 
DRAWTEXT(顶背离,REF(DEA,A2)*1.18,' 顶背离'),colorgreen; 
A0:=DIFF<0 AND DEA<0; 
A11:=A0>REF(A0,1); 
A3:=BARSLAST(A11); 
A4:=COUNT(DEA>0 AND DIFF >0,A3)=0; 
A5:=CROSS(DIFF ,DEA); 
A6:=BARSLAST(A5); 
A7:=REF(A6,A6+1)+A6; 
A8:=(DIFF+DEA)/2; 
A9:=(HIGH+LOW)/2; 
A10:=A5 AND A7<A3 AND A4 AND A8>REF(A8,A7) AND A9<REF(A9,A7) AND MACD>0; 
DRAWTEXT(A10,DIFF*0.95,'★金叉买入'),coloryellow; 
DIFF:EMA(CLOSE,5) - EMA(CLOSE,26); 
DEA:EMA(DIFF,50); 
MACD:2*(DIFF-DEA),COLORSTICK; 
A1:=BARSLAST(REF(CROSS(DIFF,DEA),1)); 
B1:=REF(C,A1+1)>C AND REF(DIFF,A1+1)<DIFF AND CROSS(DIFF,DEA); 
A2:=BARSLAST(REF(CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3)),1)); 
B2:=REF(C,A2+1)>C AND REF("KDJ.K"(9,3,3),A2+1)<"KDJ.K"(9,3,3) AND CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3)); 
A3:=BARSLAST(REF(CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)),1)); 
B3:=REF(C,A3+1)>C AND REF("RSI.RSI1"(6,12,24),A3+1)<"RSI.RSI1"(6,12,24) AND CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)); 
C1:=BARSLAST(REF(CROSS(DEA,DIFF),1)); 
D1:=REF(C,C1+1)<C AND REF(DIFF,C1+1)>DIFF AND CROSS(DEA,DIFF); 
C2:=BARSLAST(REF(CROSS("KDJ.D"(9,3,3),"KDJ.K"(9,3,3)),1)); 
D2:=REF(C,C2+1)<C AND REF("KDJ.K"(9,3,3),C2+1)>"KDJ.K"(9,3,3) AND CROSS("KDJ.D"(9,3,3),"KDJ.K"(9,3,3)); 
C3:=BARSLAST(REF(CROSS("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24)),1)); 
D3:=REF(C,C3+1)<C AND REF("RSI.RSI1"(6,12,24),C3+1)>"RSI.RSI1"(6,12,24) AND CROSS("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24)); 
低位金叉:CROSS(DIFF,DEA) AND DIFF<-0.1,NODRAW; 
STICKLINE(低位金叉,0,DIFF,1,0),colorred; 
DRAWTEXT(低位金叉,DIFF,' 低位金叉'),colorred; 
DRAWTEXT(B1>0,MACD,'MACD底背'),colorred; 
DRAWTEXT(B2>0,MACD,'KDJ底背'),colorred; 
DRAWTEXT(B3>0,MACD*0.99,'RSI底背'),colorred; 
DRAWTEXT(D1>0,MACD,'MACD顶背'),colorgreen; 
DRAWTEXT(D2>0,MACD,'KDJ顶背'),colorgreen; 
DRAWTEXT(D3>0,MACD*0.99,'RSI顶背'),colorgreen; 
STICKLINE(B1>0,0,MACD,2,0),colorred; 
STICKLINE(B2>0,0,MACD,2,0),COLORFF00FF; 
STICKLINE(B3>0,0,MACD,2,0),coloryellow; 
STICKLINE(D1>0,0,MACD,2,0),COLOR00FF00; 
STICKLINE(D2>0,0,MACD,2,0),COLORFFCC66; 
STICKLINE(D3>0,0,MACD,2,0),colorwhite; 
STICKLINE(MACD>REF(MACD,1) AND MACD>0,0,MACD,0,0),colorred; 
STICKLINE(MACD<=REF(MACD,1) AND MACD>0,0,MACD,0,0),coloryellow; 
STICKLINE(MACD<REF(MACD,1) AND MACD<0,0,MACD,0,0),colorcyan; 
STICKLINE(MACD>=REF(MACD,1) AND MACD<0,0,MACD,0,0),colormagenta; 
STICKLINE(C>0,0,0,50,1),colorblue; 
N1:=9; 
LC:=REF(CLOSE,1); 
RSI1:=SMA(MAX(CLOSE-LC,0),N1,1)/SMA(ABS(CLOSE-LC),N1,1)*100,colorwhite,NODRAW; 
RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100); 
FF:=EMA(CLOSE,3); 
MA15:=EMA(CLOSE,21); 
DDD:DRAWTEXT(CROSS(FF,MA15),MACD,'底背'),colormagenta; 
DDDD:DRAWTEXT(CROSS(88,RSI),MACD,'顶背'),colorgreen; 
DRAWICON(CROSS(88,RSI),IF(MACD>0,MACD,0),39); 
DRAWICON(CROSS(FF,MA15),IF(MACD>0,0,MACD),38); 
SHORT:=6; 
LONG:=13; 
MID:=4; 
DIFJ:=EMA(CLOSE,SHORT)-EMA(CLOSE,LONG); 
DEAJ:=EMA(DIFJ,MID); 
MACDK:=(DIFJ-DEAJ)*2,COLORSTICK; 
MACDJC:=CROSS(DIFJ,DEAJ); 
NK:=9; 
MKS1:=3; 
MK2:=3; 
RSV1:=(CLOSE-LLV(LOW,NK))/(HHV(HIGH,NK)-LLV(LOW,NK))*100; 
KS1:=SMA(RSV1,MKS1,1); 
DS1:=SMA(KS1,MK2,1); 
JS1:=3*KS1-2*DS1; 
KDJC:=CROSS(KS1,DS1); 
NN1:=5; 
NN2:=10; 
NN3:=20; 
NN4:=30; 
BBI:=(MA(CLOSE,NN1)+MA(CLOSE,NN2)+MA(CLOSE,NN3)+MA(CLOSE,NN4))/4,colorred,LINETHICKS1; 
BBIJC:=CROSS(C,BBI),colorred; 
N5:=6; 
LCK:=REF(CLOSE,1); 
AAS:=ABS(HIGH-LCK); 
BB:=ABS(LOW-LCK); 
CCK:=ABS(HIGH-REF(LOW,1)); 
DDK:=ABS(LCK-REF(OPEN,1)); 
R:=IF(AAS>BB AND AAS>CCK,AAS+BB/2+DDK/4,IF(BB>CCK AND BB>AAS,BB+AAS/2+DDK/4,CCK+DDK/4)); 
X:=(CLOSE-LCK+(CLOSE-OPEN)/2+LCK-REF(OPEN,1)); 
SI:=16*X/R*MAX(AAS,BB); 
ASI:=SUM(SI,0); 
MASI:=SUM(ASI,6); 
ASIJC:=CROSS(ASI,MASI),colorblue; 
MTM:=CLOSE-REF(CLOSE,12); 
MTMJC:=CROSS(MTM,0),colorbrown; 
四:=MACDJC+KDJC+BBIJC+ASIJC+MTMJC=4; 
五:=MACDJC+KDJC+BBIJC+ASIJC+MTMJC=5; 
EE:=HHV(DIFF,40); 
//分析家公式网 www.fxjgsw.com 
STICKLINE(四,0,EE,2,0),coloryellow; 
STICKLINE(四,0,EE/2,4,0),colorblue; 
STICKLINE(五,0,EE,2,0),colorred; 
STICKLINE(五,0,EE/2,4,0),colorblue; 
DRAWTEXT(四,EE,'买'),coloryellow; 
DRAWTEXT(五,EE,'必买'),colorred; 
底背:=SUM(低位金叉+B1+B2+B3,5)>=3; 
 | 




