公式网-网站导航


网站搜索:  

股票公式指标网 发表于2010/1/13 7:28:13

【JGL_DDV 】捉①版,添加换手率

 

C/C++ www.gszb.com 股票公式指标网提供 Code复制内容到剪贴板
  1. {副图名:JGL_DDV ; (初步正式版);发明人及版权属于JIPGEMLING.见凌见};   
  2. {参数设置:VOL_AMO(1,2,1);锤头处理(1,2,1),};   
  3. {说明:锤头处理=1,以K线中值(C+H+L)/3论多空,锤头处理=2,以K线阴阳论多空}   
  4. {坐标线位置:自动 ;额外Y轴分界 值1=0 };   
  5. {TDX版,中高分辨率屏幕};   
  6.   
  7.   
  8. W:=VOL_AMO;   
  9. EPSL:=0.0001;   
  10. ZZ:=(C+H+L)/3;   
  11. TJ0:=ZZ>MAX(C,O) OR ZZ<MIN(C,O);   
  12. CT:=锤头处理;   
  13. TJ1:=H=L AND C>REF(C,1);   
  14. TJ2:=H=L AND C<REF(C,1);   
  15. {画阴阳量柱}   
  16. V0L:IF(W=1,V,AMOUNT),STICK,COLOREEFFEE;   
  17. STICKLINE(C>OPEN,0,V0L,1.3,1),COLOR1133FA;   
  18. STICKLINE(C<OPEN,0,V0L,1.3,1),COLORCYAN;   
  19. {以下7句组合属核心发明公式,声明知识产权和版权。}   
  20. ZL:=2*(H-L)+ABS(C-O)+3*EPSL;   
  21. EE:=IF(TJ1,EPSL,IF(TJ2,-EPSL,0)){仅处理日线一字涨跌停K线};   
  22. JGL_DTC:=(IF(TJ0 AND CT=1,4/3*(C-(H+L)/2)+ABS(C-O),C-OPEN)+EE)/ZL;   
  23. 主动买:V0L*(1+JGL_DTC)/2,COLOR1133AA,NODRAW;   
  24. 主动卖:V0L*(1-JGL_DTC)/2,COLORCYAN,NODRAW;   
  25. STICKLINE(1,0,ABS(主动买),2.2,1),COLOR1133DE;   
  26. 买卖差:主动买-主动卖,COLOR13AADD,NODRAW;   
  27. {换手}   
  28. 换手:VOL/CAPITAL*100,NODRAW;   
  29. 换手1:=换手*10000;   
  30. 换手2:=换手1-换手1*2;   
  31. STICKLINE(换手2<0,0,换手2,1.8,1),COLORLIMAGENTA;   
  32. 换5:SUM(VOL/CAPITAL*100,5);   
  33. 换①:SUM(VOL/CAPITAL*100,10);   
  34. 换②:SUM(VOL/CAPITAL*100,20);   
  35. 换③:SUM(VOL/CAPITAL*100,30);   
  36. 〖虚量〗:IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL),NODRAW;   
  37. STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,〖虚量〗,0,-1,-1),COLORYELLOW;   
  38. AA:=SUMBARS(VOL,CAPITAL);   
  39. 地量:IF(CAPITAL=0,AMOUNT=LLV(AMOUNT,34),VOL<MA(VOL,AA)/3) ,COLORWHITE;   
  40. STICKLINE(地量,主动买,VOL,0.3,0),COLORWHITE;   
  41. 天量:IF(CAPITAL=0,AMOUNT=HHV(AMOUNT,34),VOL>MA(VOL,AA)*3) ,COLORYELLOW;   
  42. STICKLINE(天量,主动买,VOL,0.3,0),COLORYELLOW;   
  43. {实心柱}   
  44. STICKLINE(主动买>0,0,主动买,2.4,0),COLOR000055;   
  45. STICKLINE(主动买>0,0,主动买,2,0),COLOR000077;   
  46. STICKLINE(主动买>0,0,主动买,1.8,0),COLOR000099;   
  47. STICKLINE(主动买>0,0,主动买,1.5,0),COLOR0000BB;   
  48. STICKLINE(主动买>0,0,主动买,0.9,0),COLOR0000DD;   
  49. STICKLINE(主动买>0,0,主动买,0.3,0),COLOR0000FF;   
  50. JDZ:=ABS(买卖差);   
  51. STICKLINE(主动买>主动卖,0,JDZ,2.3,0)COLOR0035FF;   
  52. STICKLINE(主动买>主动卖,0,JDZ,1.8,0)COLOR0064FF;   
  53. STICKLINE(主动买>主动卖,0,JDZ,1.3,0)COLOR0093FF;   
  54. STICKLINE(主动买>主动卖,0,JDZ,0.8,0)COLOR00C2FF;   
  55. STICKLINE(主动买>主动卖,0,JDZ,0.3,0)COLOR00FFFF;   
  56. STICKLINE(主动买<主动卖,0,JDZ,2.3,0),COLOR006000;   
  57. STICKLINE(主动买<主动卖,0,JDZ,2.1,0),COLOR007500;    
  58. STICKLINE(主动买<主动卖,0,JDZ,1.8,0),COLOR009100;   
  59. STICKLINE(主动买<主动卖,0,JDZ,1.3,0),COLOR00A600;   
  60. STICKLINE(主动买<主动卖,0,JDZ,0.8,0),COLOR00BB00;   
  61. STICKLINE(主动买<主动卖,0,JDZ,0.3,0),COLOR00CC00;   
  62. {曲线}   
  63. SGM:=SUM(IF(BARSCOUNT(C),买卖差,0),3);   
  64. 短:SMA(SGM,13,1)*2.5,COLOREE33FF,LINETHICK1;   
  65. 短M:SMA(短,5,2),COLOR13FE33,LINETHICK1;   
  66. 长:SUM(SGM,64)/20,COLORYELLOW,LINETHICK1;   
  67. 长M:EMA(长,8),COLORFFAA55,LINETHICK1;   
  68.   
  69. STICKLINE(换手2<-50000,0,换手2,0.5,0),COLORMAGENTA;   
  70. STICKLINE(换手2<-170000,0,换手2,0.5,0),COLORGREEN;   



网站搜索:  



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