相關標簽:

?

均線分筆動能公式 可以近似判斷纏論背馳情況思路：以均線相交的情況作為分筆頂點的依據。（是否有道理，還需檢驗！）
同時以價格乘以時間間隔的開方作為動能。以此作為依據，與前筆比較判定是否背馳。有背馳為細線，無背馳為粗線。源碼

?

MD6:MA(C,3);
MD5:MA(C,8);
MD4:MA(C,21);
MD3:MA(C,55);
MD2:MA(C,144);
MD1:MA(C,377);
L1:=IF(MD2>=MD1,1,0);
L2:=IF(MD3>MD2 OR MD3=MD2 AND L1=0,1,0);
L3:=IF(MD4>MD3 OR MD4=MD3 AND L2=0,1,0);
L4:=IF(MD5>MD4 OR MD5=MD4 AND L3=0,1,0);
L5:=IF(MD6>MD5 OR MD6=MD5 AND L4=0,1,0);
L6:=IF(C>MD6 OR C=MD6 AND L5=0,1,0);
LL1:=L1+L2*2+L3*4;
LL2:=L4+L5*2+L6*4;
GG:=IF(LL2=7 OR LL2=3,H,0.5*L);
GD:=IF(LL2=0 OR LL2=4,L,1.5*H);
均線頂0:=(LL2=7 OR LL2=3 AND (REF(LL2,1)=7 OR REF(LL2,1)=3) AND (H>REF(H,1) )) ;
均線底0:=(LL2=0 OR LL2=4 AND (REF(LL2,1)=0 OR REF(LL2,1)=4) AND (L<REF(L,1))) ;
GG2:=IF(均線頂0,H,0.9*H);
GD2:=IF(均線底0,L,1.1*L);
均線頂A:=FILTERX(均線頂0 AND GG2=HHV(GG2,BARSLAST(均線底0)),BARSLAST(均線底0));
均線底A:=FILTERX(均線底0 AND GD2=LLV(GD2,BARSLAST(均線頂0)),BARSLAST(均線頂0));
修正頂:=均線頂A;
修正底:=均線底A;
最后底:=filterx(修正底,100000);
x1:=if(修正底,barslast(修正頂),if(修正頂,barslast(修正底),0));
erea:=if(修正底,sqrt(x1)*(ref(h,x1)-l),if(修正頂,(h-ref(l,x1))*sqrt(x1),0));
y1:=ref(x1,x1)+x1;
erea2:=ref(erea,y1);
v1:=if(修正底 or 修正頂, sum(v,x1)/10000,0);
v2:=ref(v1,y1);
e2:=ref(erea,y1);
vv1:=v2/e2*erea;
drawnumber(修正底 ,l*0.97,v1,2),coloryellow;
drawnumber(修正底 ,l*0.98,erea,2),colorred;
drawnumber(修正底 ,l*0.99,l,2),colorgreen;
drawnumber(最后底 ,l*0.96,vv1,2),COLORMAGENTA;
drawnumber( 修正頂,h*1.03,v1,2),coloryellow;
drawnumber( 修正頂,h*1.02,erea,2),colorred;
drawnumber( 修正頂,h*1.01,h,2),COLORMAGENTA;
DRAWLINE(修正底,LOW,修正頂 and erea > erea2, HIGH,0),COLORMAGENTA,LINETHICK3;
DRAWLINE(修正底,LOW,修正頂 and erea <= erea2 , HIGH,0),COLORMAGENTA,LINETHICK1;
DRAWLINE(修正頂,HIGH,修正底 and erea > erea2 , LOW,0),COLORGREEN,LINETHICK3;
DRAWLINE(修正頂,HIGH,修正底 and erea <= erea2 , LOW,0),COLORGREEN,LINETHICK1;{程序化交易 www.kzuj.com.cn }

?

公式導入教程: 【通達信公式源碼導入方法教程】 【同花順公式源碼導入方法教程】 【大智慧新一代公式源碼導入方法教程】

?