公式网-网站导航


网站搜索:  

股票公式指标网 发表于2010/1/24 8:53:24

结合千钧大班长的DDX系统使用的BS决策系统

结合千钧大班长的DDX系统使用的BS决策系统,请注意千钧DDX一定要是DDX保密*****,
如你改了名字,那就没法显示能量级的,刚发现其实使用千钧DDX显示能量级也很不错。
不结合千钧DDX的版本被我错发到软件区了,抱歉!
与之配套的飞升黑马刚已经发了,请找找。
另外请大家注意压缩文件里的DLL文件看着是LTFunc4,其实他就是最新版本的LTFunc5,只改个文件名多简单,省的改指标。
我私自给他加了个黄金通道,大家看看效果如何?

先把附件FmlDLL下载解压后,放到飞狐安装目录下的FmlDLL文件夹中。
 

C/C++ www.gszb.com 股票公式指标网提供 Code复制内容到剪贴板
  1. {BS决策系统}   
  2. a:="LTFunc4@FORLT2";   
  3. s1:="LTFunc4@LT_S1";    
  4. hs:="LTFunc4@LT_HS";   
  5. ls:="LTFunc4@LT_LS";    
  6. p1:="LTFunc4@LT_P1";   
  7. upp:="LTFunc4@LT_UPP";    
  8. udd:="LTFunc4@LT_UDD";   
  9.   
  10. yngs:Ema(c,14),LINETHICK0;   
  11. a1:yngs*1.1,Linethick1,colorff;   
  12. a4:yngs*0.9,Linethick1,colorff00;   
  13. a2:a1-(a1-a4)*0.191,Linethick1,colorff00ff;   
  14. a3:a1-(a1-a4)*0.618,Linethick1,colorffff;   
  15. b1:llv(a3,3),colorffff;   
  16. b2:if(a3>b1,(a3-(b1-a3)/2),b1),colorffff;   
  17. FILLRGN(c,b1,b2),colorffff;   
  18.   
  19. fb:=if(s1=0,hs,ls);   
  20. tr0:=if(p1=1,'明日收盘价<'+numtostr(udd,2)+',出现S点\n','若明日收盘价>'+numtostr(upp,2)+',出现B点\n');   
  21. tr1:=if(s1=1,'明日收盘价<'+numtostr(ls,2)+',短线卖出机会','若明日收盘价>'+numtostr(hs,2)+'短线买入机会');   
  22. DRAWTEXTEX(C,1,5,10,'□明日收盘价<'+numtostr(udd,2)+'   出现S点'),color00ffff;   
  23. DRAWTEXTEX(C,1,5,50,'□明日收盘价>'+numtostr(upp,2)+'   出现B点'),color00ff00;   
  24. DRAWTEXTEX(C,1,5,90,'□明日收盘价<'+numtostr(ls,2)+'   短线卖出机会'),colorffff00;   
  25. DRAWTEXTEX(C,1,5,130,'□明日收盘价>'+numtostr(hs,2)+'   短线买入机会'),colorff00ff;   
  26.   
  27. d:="DDX保密*****.ddx";   
  28. d1:=ema(abs(d),60);   
  29. d2:=max(d/d1+7.5,7.5);   
  30. d3:=min(d/d1,10);   
  31. DRAWTEXTEX(C,1,5,170,'□能量级别           '+numtostr(d3,1)+' 级'),color00ffff;   
  32.   
  33. DRAWICON(p1=1 and ref(p1,1)=0,l*0.985,'buy1');   
  34. DRAWICON(p1=0 and ref(p1,1)=1,h*1.03,'sell1');   
  35. DRAWICON(s1=1 and ref(s1,1)=0 and (p1+ref(p1,1))<>1,l*0.995,'bs');   
  36. DRAWICON(s1=0 and ref(s1,1)=1 and (p1+ref(p1,1))<>1,h*1.01,'ss');   
  37.   
  38. stickline(p1=1,low,high,1,0),colorred;   
  39. stickline(p1=1,close,open,4.5,0),color0000aa;   
  40. stickline(p1=1,close,open,4,0),color0000cc;   
  41. stickline(p1=1,close,open,3,0),color0000cc;   
  42. stickline(p1=1,close,open,2,0),color0000ee;   
  43. stickline(p1=0,close,open,4.5,0),coloraaaa00;   
  44. stickline(p1=0,close,open,4,0),colorbbbb00;   
  45. stickline(p1=0,close,open,3,0),colorcccc00;   
  46. stickline(p1=0,close,open,2,0),coloreeee00;   
  47. stickline(p1=0,low,high,1,0),colorffff00;   
  48.   
  49. DRAWTEXTEX(c,1,5,900,'所属板块:' + BLKNAME),ALIGN4,colorred;   
  50. DD:=FINANCE( 1);   
  51. SS:=FINANCE( 7);   
  52. BL:=SS/DD*100;   
  53. GG:=FINANCE(33);   
  54. TH:=DYNAINFO(39);   
  55. JZ:=FINANCE(34);   
  56. DRAWTEXTEX(c,1,5,960,'总股本:'+NUMTOSTR(DD,0)+'万股' +'  流通A股:'  
  57. +NUMTOSTR(SS,0)+'万股'+'  流通比例:'+NUMTOSTR(BL,3)+'%'+'  市盈率:'  
  58. +NUMTOSTR(TH,2)+' 倍'+'  收益:'+NUMTOSTR(GG,3)+' 元'+'  净资产:'  
  59. +NUMTOSTR(JZ,3)+' 元'),COLORGREEN;  

2010-01-23_11-05-35.gif



网站搜索:  



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