九毛八公式指标
DIFF1:=EMA(CLOSE,SHORT) - EMA(CLOSE,LONG); DEA1:=EMA(DIFF1,M); MACD:=2*(DIFF1-DEA1); DIFF : EMA(CLOSE,SHORT) - EMA(CLOSE,LONG),colorff00ff,linethick2; DEA : EMA(DIFF1,M),colorwhite,linethick2; AH:HHV(DIFF1,55),COLOR6600ff,linethick2,layer0; PARTLINE(ah,ah),COLORWHITE,POINTDOT,linethick2,layer0; DRAWICON( ref(aH=diff1,1) and DIFF<REF(DIFF1,1),AH,8),ALIGN1; AL:LLV(DIFF1,55),COLOR248a24,linethick2,layer0; PARTLINE(al,Al),COLORWHITE,POINTDOT,linethick2,layer0; DRAWICON( ref(al=diff1,1) and DIFF>REF(DIFF1,1),al,7),ALIGN1; {●60零上金叉:IF(CROSS(DIFF,DEA) AND DIFF>0,0.3,0),COLOR6600ff,POINTDOT; STICKLINE(●60零上金叉,DIFF,ah,4,0),COLOR6600ff;} ■零下金叉:IF(CROSS(DIFF,DEA) AND DIFF<-0.001,0.3,0),COLORWHITE,POINTDOT; STICKLINE(■零下金叉,0.1,0.15,6,0),COLORWHITE; JCCOUNT:=COUNT(CROSS(DIFF,DEA),BARSLAST(DEA>=0)); ■二次金叉:IF(CROSS(DIFF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1,0.2,0),COLOR3C86CC,POINTDOT; STICKLINE(■二次金叉,0.15,0.2,6,0),COLOR3C86CC; A3:=CROSS(DIFF,DEA) AND DEA<0; ■零下二次金叉:IF(FILTER(COUNT(A3,21)=2,10) AND DEA<0,0.05,0),COLORF58F98,POINTDOT; STICKLINE(■零下二次金叉,0.25,0.3,6,0),COLORF58F98; A1:=BARSLAST(REF(CROSS(DIFF,DEA),1)); ■底背离:IF(REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA),0.1,0),COLORFFFF00; 底背离1:STICKLINE(REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA),0,AL,4,0),COLOR00FF00; STICKLINE(■底背离,0.2,0.25,6,0),COLORFFFF00; {DRAWLINE(A1=0,DEA,■底背离,DEA,0),COLORYELLOW}; {A2:=BARSLAST(REF(CROSS(DEA,DIFF),1)); 顶背离:STICKLINE(REF(CLOSE,A2+1)<CLOSE AND REF(DIFF,A2+1)>DIFF AND CROSS(DEA,DIFF),0,DIFF,4,0),COLORBLACK; DRAWLINE(A2=0,DEA,顶背离,DEA,0),COLORGREEN;}
公式模块：
diff1:=ema(close,short) - ema(close,long);
dea1:=ema(diff1,m); macd:=2*(diff1-dea1); diff : ema(close,short) - ema(close,long),colorff00ff,linethick2; dea : ema(diff1,m),colorwhite,linethick2; ah:hhv(diff1,55),color6600ff,linethick2; if(ah,ah,drawnull),colorwhite,pointdot,linethick2; drawicon( ref(ah=diff1,1) and diff<ref(diff1,1),ah,8); al:llv(diff1,55),color248a24,linethick2; if(al,al,drawnull),colorwhite,pointdot,linethick2; drawicon( ref(al=diff1,1) and diff>ref(diff1,1),al,7); {●60零上金叉:if(cross(diff,dea) and diff>0,0.3,0),color6600ff,pointdot; stickline(●60零上金叉,diff,ah,4,0),color6600ff;} ■零下金叉:if(cross(diff,dea) and diff<-0.001,0.3,0),colorwhite,pointdot; stickline(■零下金叉,0.1,0.15,6,0),colorwhite; jccount:=count(cross(diff,dea),barslast(dea>=0)); ■二次金叉:if(cross(diff,dea) and dea<0 and count(jccount=2,21)=1,0.2,0),color3c86cc,pointdot; stickline(■二次金叉,0.15,0.2,6,0),color3c86cc; a3:=cross(diff,dea) and dea<0; ■零下二次金叉:if(filter(count(a3,21)=2,10) and dea<0,0.05,0),colorf58f98,pointdot; stickline(■零下二次金叉,0.25,0.3,6,0),colorf58f98; a1:=barslast(ref(cross(diff,dea),1)); ■底背离:if(ref(close,a1+1)>close and diff>ref(diff,a1+1) and cross(diff,dea),0.1,0),colorffff00; 底背离1:stickline(ref(close,a1+1)>close and diff>ref(diff,a1+1) and cross(diff,dea),0,al,4,0),color00ff00; stickline(■底背离,0.2,0.25,6,0),colorffff00; {drawline(a1=0,dea,■底背离,dea,0),coloryellow}; {a2:=barslast(ref(cross(dea,diff),1)); 顶背离:stickline(ref(close,a2+1)<close and ref(diff,a2+1)>diff and cross(dea,diff),0,diff,4,0),colorblack; drawline(a2=0,dea,顶背离,dea,0),colorgreen;}
