大智慧MACD改进指标公式
<div class="stock-fc-code-box"><br/><br/><br/><p>SHORT:=5;<br><br/>LONG:=25;<br><br/>M:=10;<br><br/>0;<br><br/>DIFF:=(EMA(CLOSE,SHORT)/EMA(CLOSE,LONG)-1)*100;<br><br/>partline(diff,diff>ref(diff,1),rgb(255,0,0),diff<ref(diff,1),rgb(0,255,0)),linethick2;<br><br/>DEA:EMA(DIFF,M),coloryellow;<br><br/>macd:3*(DIFF-DEA), COLORSTICK;<br><br/>macdx:macd;<br><br/>partline(macdx,macdx>ref(macdx,1),rgb(255,0,0),macdx<ref(macdx,1),rgb(0,255,0));<br><br/>Var1:=EMA(CLOSE,35)-EMA(CLOSE,17);<br><br/>Var2:=EMA(Var1,5);<br><br/>jgdx:TROUGHBARS(3,10,1)<1 AND crOSS(Var1,Var2),colorred;<br><br/>{zds:=hhvall(macdx);<br><br/>RSV:=((CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*zds)-(zds/2);<br><br/>K:=SMA(RSV,3,1);<br><br/>D:=SMA(K,3,1);<br><br/>Jb:=3*K-2*D;<br><br/>zdjb:=hhvall(jb);<br><br/>j:jb*zds/zdjb;<br><br/>DRAWTEXTAbs(40,5,'图中白色线为kdj的J线'),Colorred;}<br><br/>{difa:=abs(diff);<br><br/>diff角度:=atan((difa/ref(difa,2)-1)*100)*180/3.1415926535;<br><br/>DRAWTEXTABS(40,10,'■diff角度:'+NUMTOSTRN(diff角度,2)+''),ColorFFFF00;}<br><br/>{drawtextabs(440,10,'！！注意： 日k线的bbiday的颜色变化和MACD的背离信号！！'),colorred;}<br><br/>{diffday:"macd.diff#day";}<br><br/>jc:=cross(diff,dea);<br><br/>sc:=cross(dea,diff);<br><br/>djck:=(count(jc,barslast(diff>0)));<br><br/>ssjc:=(count(jc,barslast(diff<0)));<br><br/>usck:=(count(sc,barslast(diff<0)));<br><br/>jcd:=if(jc,dea,0);{金叉点}<br><br/>scd:=if(sc,dea,0);{死叉点}<br><br/>drawtext(jc and diff<0,jcd,numtostr(djck)+'金叉'),colorred;<br><br/>drawtext(jc and diff>0,jcd,numtostr(ssjc)+'金叉'),colorred;<br><br/>drawtext(sc and diff>0,scd,numtostr(usck)+'死叉'),colorgreen;<br><br/>A1:=BARSLAST(ref(cross(diff,dea) anddea<0,1));<br><br/>B1:=ref(c,A1+1)>c and ref(diff,A1+1)<diff and cross(diff,dea)anddea<0;<br><br/>DRAWTEXT(FILTER(B1>0,5),diff-0.01,'*MACD底背离'),COLOryellow;<br><br/>C1:=BARSLAST(ref(cross(dea,diff),1))anddea>0;<br><br/>D1:=ref(c,C1+1)<c and ref(diff,C1+1)>diff and cross(dea,diff)anddea>0;<br><br/>DRAWTEXT(FILTER(D1>0,5),diff+0.01,'*MACD顶背离'),COLORred;<br><br/>{gd:=if(diff<ref(diff,1) and ref(diff,1)<ref(diff,2) and ref(diff,2)>ref(diff,3) and ref(diff,3)>ref(diff,4),ref(diff,2),0);<br><br/>gdk:=count(gd>0,barslast(diff<0));<br><br/>drawtext(gd>0 and diff>0,ref(diff,2),numtostr(gdk)+'拐点'),coloryellow;}<br><br/>{0007--MACD金死叉间最大、最小值}<br><br/>A1:=CROSS("MACD.MACD",0);<br><br/>A2:=BARSLAST(A1);<br><br/>A3:=HHVBARS("MACD.MACD" ,A2+1);<br><br/>A4:=BACKSET(REF(A3>=1,1) AND "MACD.MACD"<0,A3);<br><br/>A5:=BACKSET(REF(A4=0,1) AND A4=1,2);<br><br/>高值:IF(FILTER(A5,2),"MACD.MACD",0);<br><br/>DRAWICON(高值>0,高值,4);<br><br/>B1:=CROSS(0,"MACD.MACD");<br><br/>B2:=BARSLAST(B1);<br><br/>B3:=LLVBARS("MACD.MACD" ,B2+1);<br><br/>B4:=BACKSET(REF(B3>=1,1) AND "MACD.MACD">0,B3);<br><br/>B5:=BACKSET(REF(B4=0,1) AND B4=1,2);<br><br/>低值:IF(FILTER(B5,2),"MACD.MACD",0);<br><br/>DRAWICON(低值<0,低值,5); <br><br/>{A1:=BARSLAST(ref(cross(diff,dea),1));<br><br/>B1:=ref(c,A1+1)>c and ref(diff,A1+1)<diff and cross(diff,dea);<br><br/>DRAWTEXT(FILTER(B1>0,5),0,'MACD'),COLORGREEN,ALIGN0;;<br><br/>Stickline(FILTER(B1>0,5),-1,0,1,0),COLORGREEN;<br><br/>{A2:=BARSLAST(ref(cross("kdj.k","kdj.d"),1));<br><br/>B2:=ref(c,A2+1)>c and ref("kdj.k",A2+1)<"kdj.k" and cross("kdj.k","kdj.d");<br><br/>DRAWTEXT(FILTER(B2>0,5),0.5,'KDJ'),COLORYELLOW,ALIGN0;;<br><br/>Stickline(FILTER(B2>0,5),0.5,-1,1,0),COLORYELLOW;<br><br/>A3:=BARSLAST(ref(cross("rsi.RSI1","RSI.RSI2"),1));<br><br/>B3:=ref(c,A3+1)>c and ref("RSI.RSI1",A3+1)<"RSI.RSI1" and cross("RSI.RSI1","RSI.RSI2");<br><br/>DRAWTEXT(FILTER(B3>0,5),-0.25,'RSI'),COLORCYAN,ALIGN0;;<br><br/>Stickline(FILTER(B3>0,5),-1,-0.25,1,0),COLORCYAN;}<br><br/>{C1:=BARSLAST(ref(cross(dea,diff),1));<br><br/>D1:=ref(c,C1+1)<c and ref(diff,C1+1)>diff and cross(dea,diff);<br><br/>DRAWTEXT(FILTER(D1>0,5),-0.5,'MACD'),COLORwhite,ALIGN0;<br><br/>Stickline(FILTER(D1>0,5),-0.5,1,1,0),COLORwhite;<br><br/>{C2:=BARSLAST(ref(cross("kdj.d","kdj.k"),1));<br><br/>D2:=ref(c,C2+1)<c and ref("kdj.k",C2+1)>"kdj.k" and cross("kdj.d","kdj.k");<br><br/>DRAWTEXT(FILTER(D2>0,5),0,'KDJ'),COLORwhite,ALIGN0;<br><br/>Stickline(FILTER(D2>0,5),1,0,1,0),COLORwhite;<br><br/>C3:=BARSLAST(ref(cross("RSI.RSI2","RSI.RSI1"),1));<br><br/>D3:=ref(c,C3+1)<c and ref("RSI.RSI1",C3+1)>"RSI.RSI1" and cross("RSI.RSI2","RSI.RSI1");<br><br/>DRAWTEXT(FILTER(D3>0,5),0.25,'RSI'),COLORMAGENTA,ALIGN0;;<br><br/>Stickline(FILTER(D3>0,5),1,0.25,1,0),COLORMAGENTA;};<br/>DRAWTEXTABS(1,10,'~☆~更多精选指标请访问：995168.cn'),COLORRED;</p><p><br></p><p><br></p><br/><p></p><br/></div>
页:
[1]