| 《直效技術(shù)分析新八法》之四:公式
VOL均線 調(diào)為 6 36
直效穩(wěn)定獲利(副圖)
{ 參數(shù) long=26 short=12 m=9} OBV:=MA(SUM(IF(CLOSE>REF(CLOSE,1),VOL,IF(CLOSE<REF(CLOSE,1),-VOL,0)),0)/25000,1); DIFF : EMA(obv,SHORT) - EMA(obv,LONG); bbDIFF:=DIFF-ref(DIFF,1); DEA : EMA(DIFF,M); bbDEA:=DEA-ref(DEA,1); MACD : 2*(DIFF-DEA), COLORSTICK; 柱: 2*(DIFF-DEA),LINEDOT; bb柱:=柱-ref(柱,1); PARTLINE(bbDIFF>0,DIFF),colorcc00ff,LINETHICK2; PARTLINE(bbDIFF<=0,DIFF),colorff9999,LINETHICK2; PARTLINE(bbDEA>0,DEA),color0066ff,LINETHICK2; PARTLINE(bbDEA<=0,DEA),color00ff33,LINETHICK2; PARTLINE(bb柱>0,柱),colorcc00ff,LINETHICK1; PARTLINE(bb柱<=0,柱),colorff9999,LINETHICK1; DIFF速率:bbDIFF*100,LINETHICK0; DEA速率:bbDEA*100,LINETHICK0; 柱速率:bb柱*100,LINETHICK0;
直效主圖 {n=10,150 CX=1,1,2} s1:=if(STKTYPE=0 OR STKTYPE=7,0.999,0.98); s2:=if(STKTYPE=0 OR STKTYPE=7,1.001,1.02);
MA06:MA(C,6),PRECISION2,COLOR00FFFF,LINEDOT; MA18:MA(C,18),PRECISION2,COLOREEEEEE,LINEDOT; PARTLINE(MA06>=REF(MA06,1) AND CX=1,MA06),COLOR0000CC,LINETHICK2; PARTLINE(MA06<REF(MA06,1) AND CX=1,MA06),COLOR009900,LINETHICK2; PARTLINE(MA18>=REF(MA18,1) AND CX=2,MA18),COLOR0000CC,LINETHICK2; PARTLINE(MA18<REF(MA18,1) AND CX=2,MA18),COLOR009900,LINETHICK2; BZA06:=BarsLast(C<MA06); BZB06:=BarsLast(MA06<REF(MA06,1)); BZA18:=BarsLast(C<MA18); BZB18:=BarsLast(MA18<REF(MA18,1)); BDA06:=BarsLast(C>MA06); BDB06:=BarsLast(MA06>REF(MA06,1)); BDA18:=BarsLast(C>MA18); BDB18:=BarsLast(MA18>REF(MA18,1));
V06:MA(VOL,6),LINETHICK0,PRECISION0,COLOR6666CC; V36:MA(VOL,36),LINETHICK0,PRECISION0,COLORFFCC00; VVOL:v,LINETHICK0,PRECISION0,COLORFF00FF; A1:=REF(C,N)=HHV(C,2*N+1); B1:=FILTER(A1,N); C1:=BACKSET(B1,N+1); HD:=FILTER(C1,N); A2:=REF(C,N)=LLV(C,2*N+1); B2:=FILTER(A2,N); C2:=BACKSET(B2,N+1); LD:=FILTER(C2,N); A:=REF(C,BARSLAST(HD)); B:=REF(C,BARSLAST(LD)); t1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ; t2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD); PARTLINE(t1,A),COLORCC6600,LINETHICK2; PARTLINE(t2,B),COLORDDDDDD,LINETHICK2; DRAWNUMBER(t1=0 and ref(t1,1)>0 or ISLASTBAR and t1>0,ref(a,1),ref(a,1),2),COLORCC6600; DRAWNUMBER(t2=0 and ref(t2,1)>0 or ISLASTBAR and t2>0,ref(b,1),ref(b,1),2),COLORDDDDDD; PARTLINE(t1,A*0.9),COLORCC6600,LINETHICK1; DRAWNUMBER(t1=0 and ref(t1,1)>0 or ISLASTBAR and t1>0,ref(a*0.9,1),ref(a*0.9,1),2),COLORCC6600; PARTLINE(t2,B*1.1),COLORDDDDDD,LINETHICK1; DRAWNUMBER(t2=0 and ref(t2,1)>0 or ISLASTBAR and t2>0,ref(b*1.1,1),ref(b*1.1,1),2),COLORCDDDDDD;
DRAWTEXT(BZA06>=2 AND BZB06=1 AND V06>V36 AND CX=1,MA06*s1,'買入'),COLOR0000CC; DRAWTEXT(BDA06>=2 AND BDB06=1 AND CX=1,MA06*s2,'賣出'),COLOR009900; DRAWTEXT(BZA18>=2 AND BZB18=1 AND V06>V36 AND CX=2,MA18*s1,'買入'),COLOR0000CC; DRAWTEXT(BDA18>=2 AND BDB18=1 AND CX=2,MA18*s2,'賣出'),COLOR009900;
tj:=close>open or close=open and close>ref(close,1); stickline(tj and C>MA18,high,low,0.1,0),colorred; stickline(tj and C>MA18,close,open,7,0),colorred; stickline(not(tj) and C>MA18,high,low,0.1,0),colorcyan; stickline(not(tj) and C>MA18,close,open,7,0),colorcyan; stickline(tj and C<MA18,high,low,0.1,0),colorred; stickline(tj and C<MA18,close,open,7,1),colorred; stickline(not(tj) and C<MA18,high,low,0.1,0),colorcyan; stickline(not(tj) and C<MA18,close,open,7,1),colorcyan; | |