公式网-网站导航


网站搜索:  

股票公式指标网 发表于2009/12/4 7:44:32

精确涨停

源码来自会昌股民【飞狐版】,技术问题由赵鑫鑫505老师解决,感谢二位老师的思路,为继承“来自理想,与理想分享”的传统,特将修改成大智慧的源码分享,喜欢的朋友自己拿好了。
精确涨停

C/C++ www.gszb.com 股票公式指标网提供 Code复制内容到剪贴板
  1. input:WS(0,0,9);{//WS是N的尾数,WS=0,尾数,0~9之间整数,可调节参数}   
  2. RSV:=(C-LLV(L,15))/(HHV(H,15)-LLV(L,15))*100;   
  3. K:=(SMA(RSV,10,1));   
  4. D:=(SMA(K,5,1));   
  5. KK:=INTPART(SMA(RSV,10,1));   
  6. DD:=INTPART((SMA(K,5,1)));   
  7. N:KK+DD,LINETHICK1,COLORGREEN;   
  8. A:KK-DD,LINETHICK1,COLORWHITE;   
  9. A1:REF(KK-DD,1),LINETHICK1,COLORCYAN;   
  10. A2:=REF(KK-DD,2);   
  11. STICKLINE(N<25,-25,-15,10,0),align0,linethick3,COLORYELLOW;   
  12. {表格竖线}   
  13. x:=DISPSTATUS=2=BARPOS;   
  14. k:=(DISPSTATUS=3)-(DISPSTATUS=2)/110;   
  15. x1:=(DISPSTATUS=2)+INTPART(12*k)=BARPOS;   
  16. x2:=(DISPSTATUS=2)+INTPART(28*k)=BARPOS;   
  17. x3:=(DISPSTATUS=2)+INTPART(46*k)=BARPOS;   
  18. x4:=(DISPSTATUS=2)+INTPART(62*k)=BARPOS;   
  19. x5:=(DISPSTATUS=2)+INTPART(80*k)=BARPOS;   
  20. x6:=(DISPSTATUS=2)+INTPART(103*k)=BARPOS;   
  21. VERTLINE(x or x1 or x2 or x3  or x4 or x5 or x6,1 ),colorgray;   
  22. {表格横线}   
  23. DRAWLINE(x,-20,x6,-20,0),colorgray;   
  24. DRAWLINE(x,14,x6,14,0),colorgray;   
  25. DRAWLINE(x,49,x6,49,0),colorgray;   
  26. DRAWLINE(x,83,x6,83,0),colorgray;   
  27. DRAWLINE(x,120,x6,120,0),colorgray;   
  28. {卖点}   
  29. 卖:=7*SMA((C-LLV(L,27))/(HHV(H,27)-LLV(L,27))*30,4,1)   
  30. -3*SMA(SMA((C-LLV(L,27))/(HHV(H,27)-LLV(L,27))*30,4,1),3,1)   
  31. -sma(SMA(SMA((C-LLV(L,27))/(HHV(H,27)-LLV(L,27))*30,4,1),3,1),2,1);   
  32. {-----------------【图解模板】---------------------}   
  33. 尾数:MOD(n,10),LINETHICK1,COLORWHITE;   
  34. N的尾数:IF(尾数=WS,0,1),LINETHICK1,COLORWHITE;   
  35. {信号}   
  36. STICKLINE(尾数=WS,38,-20,5,0),COLORGRAY;    
  37. drawicon(N<15,-20,1),ALIGN0;    
  38. {drawicon(A1=0,-20,10),ALIGN0;    
  39. drawicon((A>8 and A1>=0 and A2<0),-20,6),ALIGN0;    
  40. drawicon(A>8 and A1<-8,-20,4),ALIGN0;    
  41. {填表}  {我的电脑上表格没有显示,先这么用吧,楼主注释 }   
  42. xx1:=ref(N,3);     xx2:=ref(N,2);     xx3:=ref(N,1);      xx4:=N;   
  43. DRAWTEXT(x,108,' (N值) '),COLORGREEN;{//------------------}   
  44. DRAWTEXT(x1,108,' 前三天 = '+NUMTOSTR(xx1)),COLORGREEN;     
  45. DRAWTEXT(x2,108,' 前二天 = '+NUMTOSTR(xx2)),COLORGREEN;     
  46. DRAWTEXT(x3,108,' 前一天 = '+NUMTOSTR(xx3)),COLORGREEN;     
  47. DRAWTEXT(x4,108,' 当  天 = '+NUMTOSTR(xx4)),COLORGREEN;     
  48. DRAWTEXT(x5,108,' N值小于25时,要格外注意'),COLORGREEN;   
  49. yy1:=ref(A1,3);    yy2:=ref(A1,2);    yy3:=ref(A1,1);    yy4:=A1;   
  50. DRAWTEXT(x,71,' (A1值) '),COLORCYAN;{//------------------}   
  51. DRAWTEXT(x1,71,' 前三天 = '+NUMTOSTR(yy1)),COLORCYAN;    
  52. DRAWTEXT(x2,71,' 前二天 = '+NUMTOSTR(yy2)),COLORCYAN;    
  53. DRAWTEXT(x3,71,' 前一天 = '+NUMTOSTR(yy3)),COLORCYAN;    
  54. DRAWTEXT(x4,71,' 前一天 = '+NUMTOSTR(yy4)),COLORCYAN;    
  55. DRAWTEXT(x5,71,' A1=0 时,很容易大涨'),COLORCYAN;   
  56. ZZ1:=ref(kk,3);   ZZ2:=ref(kk,2);    ZZ3:=ref(kk,1);    ZZ4:=kk;   
  57. DRAWTEXT(x,38,' (KK值) '),ColorE9A6E9;{//-----------------}   
  58. DRAWTEXT(x1,38,' 前三天 = '+NUMTOSTR(ZZ1)),ColorE9A6E9;   
  59. DRAWTEXT(x2,38,' 前二天 = '+NUMTOSTR(ZZ2)),ColorE9A6E9;   
  60. DRAWTEXT(x3,38,' 前一天 = '+NUMTOSTR(ZZ3)),ColorE9A6E9;   
  61. DRAWTEXT(x4,38,' 当  天 = '+NUMTOSTR(ZZ4)),ColorE9A6E9;   
  62. DRAWTEXT(x5,38,' KK值一天比一天大为正转'),ColorE9A6E9;   
  63. WW1:=ref(DD,3);   WW2:=ref(DD,2);   WW3:=ref(DD,1);    WW4:=DD;   
  64. DRAWTEXT(x,2,' (DD值) '),COLORYELLOW;{//------------------}   
  65. DRAWTEXT(x1,2,' 前三天 = '+NUMTOSTR(WW1)),COLORYELLOW;   
  66. DRAWTEXT(x2,2,' 前二天 = '+NUMTOSTR(WW2)),COLORYELLOW;   
  67. DRAWTEXT(x3,2,' 前一天 = '+NUMTOSTR(WW3)),COLORYELLOW;   
  68. DRAWTEXT(x4,2,' 当  天 = '+NUMTOSTR(WW4)),COLORYELLOW;   
  69. DRAWTEXT(x5,2,' DD值一天比一天大为正转'),COLORYELLOW;   
  70. DRAWTEXT(x6,120,' \n \n \n \n \n \n 大盘走牛时,\n N的尾数相同,\n 不小心 \n 就会让你 \n 骑上一匹黑马'),COLORWHITE;   
  71. DRAWTEXT(cross(78.89,卖),120,' ★ \n▽'),ALIGN0,ColorFF9000;   

 



网站搜索:  



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