公式网-网站导航


网站搜索:  

公式在线 发表于2009/9/15 22:29:12

趋势转折-无未来的转折线(付飞狐源码)

有一位朋友给我发短信,要求飞狐改成通达信,但因通达信无可代用函数,我回复:不能改.
事后,我感到这位朋友会失望的,因此按他的愿意,做个........,不知他合意否?
因个人的习惯把他的短信删掉了,所以无从回复,只好发出来.........

趋势转折-无未来的转折线(付飞狐源码)

 

C/C++ Code复制内容到剪贴板
  1. {通达信用的:}   
  2. {INPUT: N(3,1,100);}   
  3. N:=3;   
  4. {转折}   
  5. Z_1:=(EMA(C,N)-REF(EMA(C,N),1))/REF(EMA(C,N),1)*100;   
  6. Z_2:=IF(Z_1<0,REF(Z_1,BARSLAST(CROSS(0,Z_1))+1),0);   
  7. Z_3:=IF(Z_1>0,REF(Z_1,BARSLAST(CROSS(0,Z_1))+1),0);   
  8. Z_4:=IF(CROSS(0,Z_1),H,L);   
  9.   
  10. DRAWLINE(CROSS(Z_2,Z_3),H,CROSS(Z_3,Z_2),L,0),LINETHICK2,COLORWHITE;   
  11. DRAWLINE(CROSS(Z_3,Z_2),L,CROSS(Z_2,Z_3),H,0),LINETHICK2,COLORMAGENTA;   
  12. DRAWLINE(CROSS(0,Z_1)||CROSS(Z_1,0),Z_4,ISLASTBAR,Z_4,0),LINETHICK2,COLORGREEN;     

 

C/C++ Code复制内容到剪贴板
  1. {飞狐用的:}   
  2. input: N(3,1,100);   
  3.   
  4. {转折}   
  5. Z_1:=(EMA(C,N)-REF(EMA(C,N),1))/REF(EMA(C,N),1)*100;   
  6. Z_2:=IF(Z_1<0,REF(Z_1,BARSLAST(CROSS(0,Z_1))+1),0);   
  7. Z_3:=IF(Z_1>0,REF(Z_1,BARSLAST(CROSS(0,Z_1))+1),0);   
  8. Z_4:=if(CROSS(0,Z_1),H,L);   
  9.   
  10. DRAWLINE(CROSS(Z_2,Z_3),h,CROSS(Z_3,Z_2),L,0),LINETHICK2,COLORWHITE;   
  11. DRAWLINE(CROSS(Z_3,Z_2),l,CROSS(Z_2,Z_3),h,0),LINETHICK2,COLORMAGENTA;   
  12. DRAWLINE(CROSS(0,Z_1)||CROSS(Z_1,0),Z_4,ISLASTBAR,Z_4,0),LINETHICK2,COLORGREEN;     
  13.   
  14. //   

 



网站搜索:  



Copyright © 2009-2010 gszb.com ™,All Rights Reserved. 
公式网-www.gszx.com.cn-股票指标公式网