公式网-网站导航


网站搜索：  

股票公式指标网 发表于2010/1/7 6:25:19

好用分时指标

 

C/C++ www.gszb.com 股票公式指标网提供 Code复制内容到剪贴板
  1. VAR0:=VOL/CLOSE/2;   
  2. VAR1:=SUM(IF(VAR0 > 100 AND CLOSE > REF(CLOSE,1),VAR0,0),0);   
  3. VAR2:=SUM(IF(VAR0 > 100 AND CLOSE < REF(CLOSE,1),VAR0,0),0);   
  4. VAR3:=SUM(IF(VAR0 < 100 AND CLOSE > REF(CLOSE,1),VAR0,0),0);   
  5. VAR4:=SUM(IF(VAR0 < 100 AND CLOSE < REF(CLOSE,1),VAR0,0),0);   
  6. VAR5:=VAR1 + VAR2 + VAR3 + VAR4;   
  7. VAR6:=IF(BARSTATUS=2,100 * VAR1/VAR5,0);   
  8. VAR7:=IF(BARSTATUS=2,100 * VAR2/VAR5,0);   
  9. VAR8:=IF(BARSTATUS=2,100 * VAR3/VAR5,0);   
  10. VAR9:=IF(BARSTATUS=2,100 * VAR4/VAR5,0);   
  11. 机构买盘:VAR1,LINETHICK3,COLORFF55FF;   
  12. 机构卖盘:VAR2,LINETHICK3,COLORFFFF55;   
  13. 散户买盘:VAR3,COLOR5555FF;   
  14. 散户卖盘:VAR4,COLOR55FF55;   
  15. DRAWTEXTREL(950,870,'机构买盘'),COLORFF00ff;   
  16. DRAWTEXTREL(950,570,'机构卖盘'),COLORFFFF00;   
  17. DRAWTEXTREL(950,320,'散户买盘'),COLOR0000FF;   
  18. DRAWTEXTREL(950,50,'散户卖盘'),COLOR00FF00;   
  19. IF BARSTATUS=2 THEN BEGIN   
  20. DRAWTEXTREL(1030,870,'' + FLOOR(VAR6) + '%'),COLORFF00FF;   
  21. END   
  22. IF BARSTATUS=2 THEN BEGIN   
  23. LOOP0:=FLOOR(VAR7);   
  24. VAR10:='' + LOOP0;   
  25. VAR11:=VAR10 + '%';   
  26. DRAWTEXTREL(1030,570,VAR11),COLORFFFF00;   
  27. END   
  28. IF BARSTATUS=2 THEN BEGIN   
  29. LOOP1:=FLOOR(VAR8);   
  30. VAR12:='' + LOOP1;   
  31. VAR13:=VAR12 + '%';   
  32. DRAWTEXTREL(1030,320,VAR13),COLOR0000FF;   
  33. END   
  34. IF BARSTATUS=2 THEN BEGIN   
  35. LOOP2:=FLOOR(VAR9);   
  36. VAR14:='' + LOOP2;   
  37. VAR15:=VAR14 + '%';   
  38. DRAWTEXTREL(1030,50,VAR15),COLOR00FF00;   
  39. END;   



网站搜索：  



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