公式网-网站导航


网站搜索：  

股票公式指标网 发表于2009/12/7 8:10:33

控盘

控盘

 

C/C++ www.gszb.com 股票公式指标网提供 Code复制内容到剪贴板
  1. 回报理想，大家对我昨日发的主图感兴趣，再次奉献   
  2. {控盘}   
  3. {N 26  5  300   
  4. P 1   0.1 10   
  5. M 26  5   300    
  6. Q 2   0.1 10 }   
  7. input:n(26),p(1),m(26),q(2);   
  8. DRAWTEXTABS(10,10,'所属板块：'+BKNAME),COLORYELLOW;   
  9. DRAWTEXTREL(10,185,STKLABEL+' '+STKNAME),LINETHICK4,ColorFFFF80;   
  10. var1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);   
  11. var2:=REF(var1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);   
  12. var3:=REF(var2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);   
  13. var4:=REF(var3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);   
  14. var5:=REF(var4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);   
  15. var6:=REF(var5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);   
  16. var7:=REF(var6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);   
  17. var8:=REF(var7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);   
  18. var9:=REF(var8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);   
  19. varA:=REF(var9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);   
  20. varB:=REF(varA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);   
  21. varC:=REF(varB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);   
  22. STICKLINE(var1 OR var2 OR var3 OR var4 OR var5 OR var6 OR var7 OR   
  23. var8 OR var9 OR varA OR varB OR varC,CLOSE,open,3,0),COLORRED;{红1}   
  24. varD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);   
  25. varE:=REF(varD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);   
  26. varF:=REF(varE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);   
  27. var10:=REF(varF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);   
  28. var11:=REF(var10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);   
  29. var12:=REF(var11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);   
  30. var13:=REF(var12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);   
  31. var14:=REF(var13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);   
  32. var15:=REF(var14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);   
  33. var16:=REF(var15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);   
  34. var17:=REF(var16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);   
  35. var18:=REF(var17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);   
  36. STICKLINE(varD OR varE OR varF OR var10 OR var11 OR var12 OR var13 OR   
  37. var14 OR var15 OR var16 OR var17 OR var18,CLOSE,open,3,0),COLORgreen;{绿色}   
  38. var19:=REF(varD OR varE OR varF OR var10 OR var11 OR var12 OR var13 OR   
  39. var14 OR var15 OR var16 OR var17 OR var18,1) AND var1;   
  40. STICKLINE(var19,open,close,5,0),COLORYELLOW;{黄色}   
  41. var1A:=REF(var1 OR var2 OR var3 OR var4 OR var5 OR var6 OR var7 OR   
  42. var8 OR var9 OR varA OR varB OR varC,1) AND varD;   
  43. STICKLINE(var1A,REF(CLOSE,1),REF(CLOSE,2),6,2),Color00FF00;   
  44.   
  45. {STICKLINE(var19,REF(CLOSE,1),REF(CLOSE,2),8,0),COLOR00FFFF;}   
  46. STICKLINE(var1A,REF(CLOSE,1),REF(CLOSE,2),8,0),COLORFF00FF;{紫红色}   
  47.   
  48. 红色持股:0,linethick0,COLORRED;   
  49. 晶红卖出:var1A,linethick0,COLORFF50FF;   
  50. 绿色持币:0,linethick0,COLOR00d900;   
  51. 黄色买入:var19,linethick0,COLOR00ffff;   
  52. DRAWICON(var19,open*0.95,7),ALIGN1;   
  53. {DRAWICON(var19,REF(CLOSE,1),7),ALIGN1;}   
  54. DRAWICON(var1A,REF(CLOSE,1)*1.05,8),ALIGN1;   
  55.   
  56. MA5:ma(c,5),COLORWHITE;   
  57. DD5:=MA5<REF(MA5,1);   
  58. PARTLINE(MA5,DD5),color00FF00;   
  59. x:=(3*c+l+o+h)/6;   
  60. 多空线:(20*x+19*ref(x,1)+18*ref(x,2)+17*ref(x,3)+16*ref(x,4)+15*ref(x,5)+14*ref(x,6)   
  61. +13*ref(x,7)+12*ref(x,8)+11*ref(x,9)+10*ref(x,10)+9*ref(x,11)+8*ref(x,12)   
  62. +7*ref(x,13)+6*ref(x,14)+5*ref(x,15)+4*ref(x,16)+3*ref(x,17)+2*ref(x,18)+   
  63. ref(x,20))/210,colorff00ff,linethick1;   
  64. {用法：黄托底买进，绿压顶买出。}   
  65. DD:=多空线<REF(多空线,1);   
  66. PARTLINE(多空线,DD),colorblue,linethick3;   
  67. A:=(MA5>多空线);   
  68. PARTLINE(多空线,A),COLORYELLOW,POINTDOT;   
  69. A1:=(MA5<多空线);   
  70. PARTLINE(多空线,A1),COLORWHITE;   
  71. v1:=CLOSE*VOL;   
  72. v2:=EMA(v1,13)/EMA(VOL,13);   
  73. CYS:=(EMA((CLOSE-v2)/v2,1)*100);   
  74. AA:=CYS;   
  75. MIDD:=MA(CYS,20);   
  76. CC:=MIDD+0.85*STD(CYS,10);   
  77. tM6:=AA>CC;   
  78. PARTLINE(MA5,tM6),colorred,linethick2;   
  79. MID :  MA(CLOSE,N),COLORYELLOW;   
  80. UPPER: MID + P*STD(CLOSE,N),POINTDOT,COLORBLUE;   
  81. UPPER1: MID + Q*STD(CLOSE,M),LINETHICK2,COLORBLUE;   
  82. LOWER: MID - P*STD(CLOSE,N),POINTDOT,colorgreen;   
  83. LOWER1: MID - Q*STD(CLOSE,M),LINETHICK2,colorgreen;   
  84. {附加段}   
  85.   
  86. 流通盘:=FINANCE2(37)/10000;   
  87. 市盈率:=DYNAINFO(39);   
  88. 市净率:= DYNAINFO(58);   
  89. 每股收益:=FINANCE2(3);   
  90. 每股净资产:=FINANCE2(4);   
  91. 净资产收益率:=FINANCE2(5);   
  92. F:=COST(5 );J:=COST(95 );   
  93. M:=COST(15 );X:=COST(85 );   
  94. 量能饱和度:IF((AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100>100,100,(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100),COLORRED,LINETHICK0;   
  95. DRAWTEXTABS(190,25,'市盈率:'+市盈率+' '),LINETHICK1,COLORF00FF0;   
  96. {DRAWTEXTABS(270,25,'市净率:'+市净率+' '),LINETHICK1,COLORF00FF0;}   
  97. DRAWTEXTABS(280,25,'每股净资产:'+每股净资产+' '),LINETHICK1,COLORF00FF0;   
  98. {DRAWTEXTABS(450,25,'净资产收益率:'+净资产收益率+' '),LINETHICK1,COLORF00FF0;}   
  99. DRAWTEXTABS(10,25,'每股收益:'+每股收益+'元 '),LINETHICK1,COLORF00FF0;   
  100. DRAWTEXTABS(110,25,'流通盘:'+流通盘+' '),LINETHICK1,COLORF00FF0;   
  101. DRAWTEXTABS(10,40,'今日量能饱和度:'+NUMTOSTRN(量能饱和度,0)+'%'),LINETHICK1,COLORRED;   
  102. {DRAWTEXTABS(4000,25,'业绩:'+NUMTOSTRN(FINANCE2(3),2)),LINETHICK1,COLORF00FF0;}   
  103. DRAWTEXTABS(400,25,'公积金:'+NUMTOSTRN(FINANCE2(7),2)),LINETHICK1,COLORF00FF0;   
  104. DRAWTEXTABS(150,40,'用法：黄托底买进，绿压顶买出。'),COLORYELLOW;{BL控盘};   

 



网站搜索：  



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