当前位置: 网站首页 > 股票软件公式 > 同花顺公式 > 文章 当前位置: 同花顺公式 > 文章

同花顺源码:漂亮MACD,AI_MACD,万家灯火

点击: 次    来源:顶尖财经    作者:股市狙击 - 小 + 大

1、漂亮MACD

DIFF:EMA(CLOSE,12)-EMA(CLOSE,26),LINETHICK1;
DEA:EMA(DIFF,9),COLOrffaa00,LINETHICK1;
MACD:=2*(DIFF-DEA);
STICKLINE(MACD>=0,MACD,0,4,1),colorred,LINETHICK3;
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,4,0 ),coloryellow,LINETHICK3;
STICKLINE(MACD<0,MACD,0,4,1),colorlired,LINETHICK3;
STICKLINE(MACD<0 AND MACD<REF(MACD,1),0,MACD,2,0),colorligreen,LINETHICK3;
X1:IF(diff<0,diff,0),COLOR0000FF,LINETHICK1;
X2:IF(diff<0,0,diff),colormagenta,LINETHICK1;
X3:IF(diff<dea,diff,dea),COLOR00ff00,linethick1;
X4:IF(diff>dea,dea,dea),linethick1,COLORffbb11;
低位金叉:=CROSS(DIFF,DEA) AND DIFF<-0.1;
STICKLINE(低位金叉,DEA*0.86,DEA*0.66,10,0),colormagenta;
DRAWTEXT(低位金叉,dea*0.96,' ↖【低位金叉】'),colormagenta;
JCCOUNT:=COUNT(CROSS(DIFF,DEA),BARSLAST(DEA>=0));
二次金叉:=CROSS(DIFF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1;
STICKLINE(二次金叉,DEA*0.96,DEA*0.76,10,0),coloryellow;
DRAWICON(二次金叉,dea*1.1,'BUY') ;
DRAWTEXT(二次金叉,DEA*1.30,' ↖【二次金叉】'),coloryellow;
A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));
底背离:=REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA);
STICKLINE(底背离,DEA*1.09,DEA*0.86,10,0),Color6600FF;
DRAWLINE(A1=0,DEA,底背离,DEA,0),colorred,linethick2;
DRAWTEXT(底背离,DEA*1.60,' ↖【多方炮台】'),Color6600FF;
A2:=BARSLAST(REF(CROSS(DEA,DIFF),1));
顶背离:=REF(CLOSE,A2+1)<CLOSE AND REF(DIFF,A2+1)>DIFF AND CROSS(DEA,DIFF);
DRAWLINE(A2=0 ,DEA,顶背离,REF(DEA,A2),0),colorligreen,LINETHICK2;
DRAWLINE(顶背离,DEA,顶背离,REF(DEA,A2),0),colorligreen,LINETHICK2;
DRAWTEXT(顶背离,DEA*1.2,' ↖【顶背离】'),Color00FF00;
FILLRGN(DIFF,DEA,DIFF>DEA AND DIFF>0 AND DIFF>REF(DIFF,1) AND DEA>REF(DEA,1),colormagenta);
FILLRGN(DIFF,DEA,DIFF>DEA AND DIFF>0 AND DIFF>REF(DIFF,1) AND DEA<REF(DEA,1),colorwhite);
FILLRGN(DIFF,DEA,DIFF>DEA AND DIFF>0 AND DIFF<=REF(DIFF,1) AND DEA>REF(DEA,1),colorwhite);
FILLRGN(DIFF,DEA,DIFF>DEA AND DIFF>0 AND DIFF<=REF(DIFF,1) AND DEA<REF(DEA,1),colorwhite);
FILLRGN(DIFF,DEA,DIFF>DEA AND DIFF<0 AND DIFF>REF(DIFF,1) AND DEA>REF(DEA,1),colorred);
FILLRGN(DIFF,DEA,DIFF>DEA AND DIFF<0 AND DIFF>REF(DIFF,1) AND DEA<REF(DEA,1),colorligray);
FILLRGN(DIFF,DEA,DIFF>DEA AND DIFF<0 AND DIFF<=REF(DIFF,1) AND DEA>REF(DEA,1),colorligray);
FILLRGN(DIFF,DEA,DIFF>DEA AND DIFF<0 AND DIFF<=REF(DIFF,1) AND DEA<REF(DEA,1),colorligray);
FILLRGN(DIFF,DEA,DIFF<DEA AND DIFF>0 AND DIFF<REF(DIFF,1) AND DEA>REF(DEA,1),colorligray);
FILLRGN(DIFF,DEA,DIFF<DEA AND DIFF>0 AND DIFF<REF(DIFF,1) AND DEA<REF(DEA,1),colorligreen);
FILLRGN(DIFF,DEA,DIFF<DEA AND DIFF>0 AND DIFF>=REF(DIFF,1) AND DEA>REF(DEA,1),colorlired);
FILLRGN(DIFF,DEA,DIFF<DEA AND DIFF>0 AND DIFF>=REF(DIFF,1) AND DEA<REF(DEA,1),colorlired);
FILLRGN(DIFF,DEA,DIFF<DEA AND DIFF<0 AND DIFF<REF(DIFF,1) AND DEA>REF(DEA,1),colorlired);
FILLRGN(DIFF,DEA,DIFF<DEA AND DIFF<0 AND DIFF<REF(DIFF,1) AND DEA<REF(DEA,1),colorgray);
FILLRGN(DIFF,DEA,DIFF<DEA AND DIFF<0 AND DIFF>=REF(DIFF,1) AND DEA>REF(DEA,1),colorlired);
FILLRGN(DIFF,DEA,DIFF<DEA AND DIFF<0 AND DIFF>=REF(DIFF,1) AND DEA<REF(DEA,1),colorlired);
FH1:=REF(MACD,1)<REF(MACD,2) AND REF(MACD,2)<REF(MACD,3) AND REF(MACD,3)<REF(MACD,4);
FH2:=MACD>=0 AND COUNT(MACD>REF(MACD,1),1)=1;
FH3:=FH1 AND FH2 AND EMA(C,13)>REF(EMA(C,13),1);
FH4:=FH1 AND FH2 AND ABS((DIFF-DEA)/C)<0.018;
FH5:=FH1 AND FH2 AND MACD<0.10;
二次翻红:(FH3 OR FH4 OR FH5),colorred,NODRAW;
低买:CROSS(DIFF,DEA) AND DIFF<0,COLORFF00FF,NODRAW;
DRAWICON(二次翻红,-0.05,1);
DRAWTEXT(二次翻红,-0.35,'↖【翻红】'),colorred;




2、AI_MACD

DIFF := EMA(EMA(CLOSE,12) - EMA(CLOSE,26),5);

DEA  := EMA(DIFF,9);
A1:DIFF;
A2:DEA;
MACDOK:=CROSS(DIFF,DEA) ;
MACD卖点:=CROSS(DEA,DIFF) ;
中间值:=(HHV(H,60)+LLV(L,60) )/2;
ZHANGFU:=(H-REF(C,1))/REF(C,1)*100;
MA3:=MA(C,3);
MA5:=MA(C,5);
MA10:=MA(C,10);
MA20:=MA(C,20);
MA25:=MA(C,25);
MA60:=MA(C,60);
MA90:=MA(C,90);
MA120:=MA(C,120);
A3:= (MA25-MA60)/MA60*100;
A4:= (MA25-MA90)/MA90*100;
A5:= (MA25-MA120)/MA120*100;
A6:=IF(C>=O,C,O);
A7:=(H-A6)/A6*100;
A8:=(H-REF(C,10))/REF(C,10)*100;
A9:=(H-REF(C,11))/REF(C,11)*100;
A10:=(H-REF(C,12))/REF(C,12)*100;
A11:=(H-REF(C,13))/REF(C,13)*100;
A12:=(H-REF(C,14))/REF(C,14)*100;
A13:=(H-REF(C,15))/REF(C,15)*100;
A14:=(H-REF(C,16))/REF(C,16)*100;
A15:=(H-REF(C,17))/REF(C,17)*100;
A16:=(H-REF(C,18))/REF(C,18)*100;
A17:=(H-REF(C,19))/REF(C,19)*100;
A18:=(H-REF(C,20))/REF(C,20)*100;
A19:=(H-REF(C,21))/REF(C,21)*100;
A20:=100;
A21:=A8<A20 AND
A9<A20 AND
A10<A20 AND
A11<A20 AND
A12<A20 AND
A13<A20 AND
A14<A20 AND
A15<A20 AND
A16<A20 AND
A17<A20 AND
A18<A20 AND
A19<A20;
B1:=30;
B2:=(L-REF(H,6))/REF(H,6)*100;
B3:=(L-REF(H,7))/REF(H,7)*100;
B4:=(L-REF(H,8))/REF(H,8)*100;
B5:=(L-REF(H,9))/REF(H,9)*100;
B6:=(L-REF(H,10))/REF(H,10)*100;
B7:=(L-REF(H,11))/REF(H,11)*100;
B8:=(L-REF(H,12))/REF(H,12)*100;
B9:=(L-REF(H,13))/REF(H,13)*100;
B10:=(L-REF(H,14))/REF(H,14)*100;
B11:=(L-REF(H,15))/REF(H,15)*100;
B12:=(L-REF(H,16))/REF(H,16)*100;
B13:=(L-REF(H,17))/REF(H,17)*100;
B14:=(L-REF(H,18))/REF(H,18)*100;
B15:=(L-REF(H,19))/REF(H,19)*100;
B16:=(L-REF(H,20))/REF(H,20)*100;
B17:=(L-REF(H,21))/REF(H,21)*100;
B18:=
B2<B1 AND
B3<B1 AND
B4<B1 AND
B5<B1 AND
B6<B1 AND
B7<B1 AND
B8<B1 AND
B9<B1 AND
B10<B1 AND
B11<B1 AND
B12<B1 AND
B13<B1 AND
B14<B1 AND
B15<B1 AND
B16<B1 AND
B17<B1
;
MID5 :=  MA(CLOSE,5);
UB5:=MID5+2*STD(CLOSE,5),colorred;
MID10 :=  MA(CLOSE,10);
UB10:=MID10+2*STD(CLOSE,10),colorred;
C1:=(H-REF(C,1))/REF(C,1)*100;
C4:=COUNT(C1>4.5,80 )>=5 AND  COUNT(C1>3,60 )>=10;
D1:=MACDOK AND  COUNT(MA60>REF(MA60,1),60)>=20 AND A3<10 AND C4 AND  COUNT(A21,60)>=60 AND  COUNT(B18,20)>=20 AND  ZHANGFU>3.5 AND L<MA25 AND H >MA25;
D2:=  COUNT(MA90>REF(MA90,1),90)>=30 AND A4<10 AND C4 AND  COUNT(A21,90)>=90 AND  COUNT(B18,20)>=20 AND  ZHANGFU>3.5 AND L<MA25 AND H >MA25;
D3:=  COUNT(MA120>REF(MA120,1),120)>=30 AND A5<10 AND C4 AND  COUNT(A21,120)>=120 AND  COUNT(B18,20)>=20 AND  ZHANGFU>3.5 AND L<MA25 AND H >MA25;
横盘突破 := D1 OR D2 OR D3 AND C>O;
买入:=横盘突破  ;
FF:=  (H - REF(C,BARSLAST(买入)) ) / REF(C,BARSLAST(买入) ) *100;
E3:= FF >15  AND  BARSLAST(买入)<30 AND CROSS(DEA,DIFF);
E2:= FF >15  AND  BARSLAST(买入)<30 AND UB5 <REF(UB5,1) AND REF(UB5,1) >=REF(UB5,2) AND REF(UB5,2) >=REF(UB5,3)  AND UB10 >=REF(UB10,1) AND REF(UB10,1) >=REF(UB10,2);
减仓:=E3 OR E2;
卖出:= FF<-20 AND BARSLAST(买入)<30  AND CROSS(DEA,DIFF);
止损:= FF<-10 AND BARSLAST(买入) <20 AND COUNT(买入,21)>=1;
离场:= FF>-10 AND FF <15 AND BARSLAST(买入)==20 AND COUNT(买入,20)==1;
DRAWTEXT(买入 AND COUNT(买入,30)==1,DIFF+0.3,'建仓'),colorred;
DRAWICON( 买入 AND COUNT(买入,30)==1 ,DIFF,1);
DRAWTEXT(   减仓 ,DIFF-0.3,'减仓'),colorgreen;
DRAWICON(   减仓 ,DIFF,2);
DRAWTEXT(   卖出 ,DIFF+0.3,'卖出'),colorgreen;
GG:=COUNT(买入,30)>0  AND  CROSS(DEA,DIFF);




3、万家灯火( 股 民 学 院 : http://www.58188.com )

STICKLINE(TROUGHBARS(3,15,1)=0 AND HIGH>LOW+0.01,138,168,10,0 ),COLORF00FF0;

STICKLINE(PEAKBARS(3,15,1)=1,138,168,10,0 ),colorgreen;
TYP:= CLOSE;
EC1:(EMA((TYP-MA(TYP,20))/(0.015*AVEDEV(TYP,20)),13)), colorred,LINETHICK2;
EC2:(EMA((TYP-MA(TYP, 9))/(0.015*AVEDEV(TYP, 9)),4 )), colorcyan,LINETHICK1;
AA:=LLV(LOW, 36);BB:=HHV(HIGH,30);
DD:=(EMA(((CLOSE-AA)/(BB-AA))*(4),4))*(25);
KK:=(((DD-LLV(DD,21))/(HHV(DD,21)-LLV(DD,21)))*(4))*(25);
STICKLINE(CROSS(KK,90) AND (DD<40),48,68,10,0),COLORF00FF0;
STICKLINE((COUNT((DD>REF(DD,1)),1)=1) AND (REF(DD,1)<REF(REF(DD,1),1)) AND (DD<10),33,-33,3,1),COLORF00FF0;
M3:=(REF(C,1)+REF(C,2)+O)/3;
M4:=(REF(C,1)+REF(C,2)+REF(C,3)+O)/4;
D4:(CLOSE-M4)/M4*100,coloryellow,NODRAW;
MA43:=MA(C,43);
LOW43:=(3*C+40*MA43-REF(C,40)-REF(C,41)-REF(C,42))/43;
L43:IF(LOW43>200,LOW43/100,LOW43),NODRAW;
EMA610:=EMA(CLOSE,610);
DE:(CLOSE-EMA610)/EMA610*100,NODRAW,colorcyan;
STICKLINE( (CLOSE > EMA610) AND CROSS(CLOSE,EMA610*1.1) ,  -48,-68,9,0),coloryellow;
STICKLINE( CROSS(EMA610,CLOSE) ,                           -98,-78,9,0),colorgreen;
STICKLINE( CROSS(CLOSE,EMA610) ,                           -48,-68,9,0),coloryellow;
STICKLINE( (CLOSE > EMA610) AND CROSS(EMA610*1.06,CLOSE) , -48,-68,9,0),COLORF00FF0;
STICKLINE( (CLOSE > EMA610) AND (CLOSE<EMA610*1.06) ,      -98,-78,9,0),colorgray;
STICKLINE( 1, 79, 80,6,0),colorgray;
STICKLINE( 1,-79,-80,6,0),colorgray;
EC3:(EMA((TYP-MA(TYP,52))/(0.015*AVEDEV(TYP,52)),30)), colorgray;
S:=C>REF(C,4);
B:=C<REF(C,4);
S0:=S AND REF(B,1);
S1:=S0 OR ( REF(COUNT(S,9)=9,1) AND S AND REF(S0,9) ) OR ( REF(COUNT(S,18)=18,1) AND S AND REF(S0,18) ) ;
S2:=S AND REF(S1,1);
S3:=S AND REF(S2,1);
S4:=S AND REF(S3,1);
S5:=S AND REF(S4,1);
S6:=S AND REF(S5,1);
S7:=S AND REF(S6,1);
S8:=S AND REF(S7,1);
S9:=S AND REF(S8,1);
B0:=B AND REF(S,1);
B1:=B0 OR ( REF(COUNT(B,9)=9,1) AND S AND REF(B0,9) ) OR ( REF(COUNT(B,18)=18,1) AND S AND REF(B0,18) ) ;
B2:=B AND REF(B1,1);
B3:=B AND REF(B2,1);
B4:=B AND REF(B3,1);
B5:=B AND REF(B4,1);
B6:=B AND REF(B5,1);
B7:=B AND REF(B6,1);
B8:=B AND REF(B7,1);
B9:=B AND REF(B8,1);
STICKLINE(B8,-128,-108,9,0), coloryellow;
STICKLINE(B9,-128,-108,9,0), COLORF00FF0;
STICKLINE(S8, 128, 108,9,0), coloryellow;
STICKLINE(S9, 128, 108,9,0), colorgreen;
MV3:=MA(VOL,3);
MV7:=MA(VOL,7);
MV21:=MA(VOL,21);
STICKLINE( CROSS(MV3,MV7),  6+EC2,  13+EC2, 13,1),colorred;
STICKLINE( CROSS(MV7,MV3), -6+EC2, -13+EC2, 13,1),colorgreen;
STICKLINE( CROSS(MV3,MV21), 6+EC2,  26+EC2,  4,1),colorred;
STICKLINE( CROSS(MV21,MV3),-6+EC2, -26+EC2,  4,1),colorgreen;

上一篇:同花顺源码:主力清洗,T0龙头,回调启动

下一篇:同花顺源码:黑马量柱PRO,空间法则,趋势轨迹