{n:1,100,9;m1:1,100,3;m2:1,100,3} DIFF:= EMA(CLOSE,12) - EMA(CLOSE,26); DEA :=EMA(DIFF,27); MACD:= 2*(DIFF-DEA); {双佛手向上} 双佛手向上:=CLOSE>OPEN AND MA(CLOSE,5)>MA(CLOSE,10) AND MA(CLOSE,10)>MA(CLOSE,30) AND DIFF>DEA AND MACD>REF(MACD,1) AND DIFF>0 AND DEA>0 AND MA(VOL,5)>MA(VOL,34) AND MA(CLOSE,30)>=REF(MA(CLOSE,30),1); DRAWTEXT(双佛手向上,1.5,'◆佛手'),COLORFFFFFF; DRAWTEXT(双佛手向上,2,' ◆佛手'),COLORFFFFFF; DRAWTEXT(双佛手向上,5,'◆佛手'),COLORFFFFFF; {漫步青云} DJE:=DIFF>=0 AND DEA>=0 AND CROSS(DIFF,DEA); A5:=MA(CLOSE,5)>MA(CLOSE,10); V5:=VOL>MA(VOL,5) AND MA(VOL,5)>MA(VOL,10); 漫步青云:=DJE AND A5 AND V5 AND MA(CLOSE,30)>=REF(MA(CLOSE,30),1); DRAWTEXT(漫步青云,-0.2,' ★漫云'),COLORFFFF00; DRAWTEXT(漫步青云,2,' ★漫云'),COLORFFFF00; {空中缆绳} B:=MIN(DIFF,DEA)/MAX(DIFF,DEA)>0.95; 空中缆绳:=MA(CLOSE,30)>REF(MA(CLOSE,30),1) AND DIFF>0 AND DEA>0 AND MACD>REF(MACD,1) AND B; {小鸭出水} 小鸭出水:=MA(C,30)>=REF(MA(C,30),1) AND DIFF<0 AND DEA<0 AND CROSS(DIFF,DEA) AND MA(C,5)>MA(C,10) AND MA(V,5)>MA(V,34); DRAWTEXT(小鸭出水,0.5,'■小鸭 '),COLOR00FFFF; DRAWTEXT(小鸭出水,5,'■小鸭 '),COLOR00FFFF; {海底捞月} 海底捞月:=DIFF<0 AND DEA<0 AND CROSS(DIFF,DEA) AND VOL>MA(VOL,5) AND MA(VOL,5)>MA(VOL,34) AND MA(C,30)>=REF(MA(C,30),1); DRAWTEXT(海底捞月,DEA,' □□海底'),COLORWHITE; DRAWTEXT(海底捞月,3,' □□海底'),COLORWHITE; {天鹅展翅} 天鹅展翅:=MACD>0 AND CROSS(DIFF,0); DRAWTEXT(天鹅展翅,-5,'●展翅'),COLORRED; DRAWTEXT(天鹅展翅,5,'●展翅'),COLORRED; DRAWTEXT(天鹅展翅,0,'●展翅'),COLORRED; RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100; K:=SMA(RSV,M1,1),LINETHICK2,COLORWHITE; D:=SMA(K,M2,1),COLORYELLOW; 量能:=3*K-2*D,LINETHICK2; RSIE:=EMA(量能,3); DIFF2 : EMA(RSIE,12) - EMA(RSIE,26); BBDIFF:=DIFF2-REF(DIFF2,1); DEA2: EMA(DIFF2,9); DRAWBAND(DIFF2,RGB(255,105,180),DEA2,RGB(34,139,34)); BBDEA:=DEA2-REF(DEA2,1); MACD1 : 2*(DIFF2-DEA2), COLORSTICK; STICKLINE(MACD1<REF(MACD1,1)AND MACD1>0,0,MACD1,2,0),COLORFFFF00; STICKLINE(MACD1<REF(MACD1,1)AND MACD1<0,0,MACD1,2,0),COLOR00FF00; STICKLINE(MACD1>REF(MACD1,1)AND MACD1<0,0,MACD1,2,0),COLOR0099FF; STICKLINE(MACD1>REF(MACD1,1)AND MACD1>0,0,MACD1,2,0),COLORRED; 0,COLORFF8855,LINETHICK2; IF(DIFF2>DEA2,DIFF2,DRAWNULL),COLORRED,LINETHICK2; IF(DEA2>REF(DEA2,1),DEA2,DRAWNULL),COLORMAGENTA; DRAWICON(CROSS(DIFF2,DEA2),DEA2,1); DRAWICON(CROSS(DEA2,DIFF2),DEA2,2); 低位金叉:=CROSS(DIFF2,DEA2) AND DIFF2<-0.1; STICKLINE(低位金叉,0,-1.5,2,0),COLORFFFF00; DRAWTEXT(低位金叉,DIFF2,' 低位金叉'),COLORFFFF00; JCCOUNT:=COUNT(CROSS(DIFF2,DEA2),BARSLAST(DEA2>=0)); 二次金叉:=CROSS(DIFF2,DEA2) AND DEA2<0 AND COUNT(JCCOUNT=2,21)=1; STICKLINE(二次金叉,0,-1,5,0),COLORFF00FF; DRAWICON(二次金叉,DEA2*1.2,11) ; DRAWTEXT(二次金叉,DEA2,'②二次金叉'),COLORRED; A1:=BARSLAST(REF(CROSS(DIFF2,DEA2),1)); 底背离:=REF(CLOSE,A1)>CLOSE AND DIFF2>REF(DIFF2,A1) AND CROSS(DIFF2,DEA2); STICKLINE(底背离,0,1.5,3,0),COLOR00FF00; DRAWLINE(A1=0,DEA2,底背离,DEA2,0),COLORRED,LINETHICK2; DRAWTEXT(底背离,MACD1,' 底背离'),COLORFFFFFF; A2:=BARSLAST(REF(CROSS(DEA2,DIFF2),1)); 顶背离:=REF(CLOSE,A2)<CLOSE AND REF(DIFF2,A2)>DIFF2 AND CROSS(DEA2,DIFF2); STICKLINE(顶背离,0,2,3,0),COLORFF8855; DRAWLINE(A2=0,DEA2,顶背离,DEA2,0),COLORFF8855,LINETHICK2; DRAWTEXT(顶背离,DEA2,' 顶背离'),COLORFF8855; DRAWTEXT(空中缆绳,DEA2,' 加油'),COLORFF00FF; DRAWTEXT(空中缆绳,5,' 加油'),COLORFF00FF; |
|