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; |