公式指标平台 股票指标公式源码分享 登录 注册
公式指标平台
未来函数检测
首 页 金钻指标 通达信公式 大智慧公式 同花顺公式 文华财经公式 操盘手公式 东财通公式 飞狐公式 其他公式 公式解答 股票软件 股票池
当前位置：→ 公式指标平台 > 大智慧公式 > 正文 → 正文

大小黑马 全拿下 （源码）

发布时间：2010/5/26 6:57:57  浏览次数：

 

C/C++ www.gszb.com 股票公式指标网提供 Code复制内容到剪贴板
  1. A1:3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1);   
  2. 黑马线:EMA(A1,5),LINETHICK2,COLOR6600FF;   
  3. A2:=(黑马线-REF(黑马线,1))/REF(黑马线,1)*100;   
  4. A3:=EMA(C,5);   
  5. A4:=((C-LLV(L,21))/(HHV(H,21)-LLV(L,21)))*100;   
  6. 趋势线:(MA(3*SMA(A4,6,1)-2*SMA(SMA(A4,5,1),5,1),2)),LINETHICK2,COLORYELLOW;   
  7. A5:=(HHV(H,60)-C)/(HHV(H,60)-LLV(L,60))*100;   
  8. DRAWTEXT(FILTER(REF(黑马线,1)>90 AND A2<0,7),黑马线,'跑'),COLOR00FF00;   
  9. DRAWTEXT(CROSS(A1,黑马线)AND 黑马线<A5,黑马线,'黑马');   
  10. DRAWTEXT(CROSS(黑马线,A5)AND 趋势线<80,黑马线,'追涨');   
  11. DRAWTEXT(CROSS(趋势线,0)AND 黑马线<40,5,'大黑马');   
  12. 底部:(A2<-10 AND A2>REF(A2,1))*25,COLORRED;   
  13. DRAWICON(底部 AND A3>REF(A3,1),25,4);   
  14. 机会来临:REF(IF((MA(C,5)-C)/C>0.04 AND (MA(C,10)-MA(C,5))/MA(C,5)>0.04,30,0),1),COLORF00FF0;   
  15. 大势已去:IF(CROSS(黑马线,A1)AND 黑马线>70 AND 趋势线>80,90,100),COLORFF0000;   
  16. 　  

 

C/C++ www.gszb.com 股票公式指标网提供 Code复制内容到剪贴板
  1. 主图源码，奉上：   
  2. input: n(5,0,999,1),n1(10,0,999,1),n2(20,0,999,1),n3(30,0,999,1);   
  3. A74:=MA(CLOSE,20);   
  4. A75:=(CLOSE > MA(CLOSE,5));   
  5. A76:=(MA(CLOSE,5) > MA(CLOSE,10));   
  6. A77:=(CLOSE > MA(CLOSE,10));   
  7. A78:=(MA(CLOSE,5) > MA(CLOSE,20));   
  8. A79:=(CLOSE > MA(CLOSE,20));   
  9. A710:=REF(A74,1);   
  10. A711:=(A74 > A710);   
  11. AVX:=(((((IF(A75,10,(0 - 10)) + IF(A76,10,(0 - 10))) + IF(A77,10,(0 - 10))) + IF(A78,10,(0 - 10))) + IF(A79,10,(0 - 10))) + IF(A711,10,(0 - 10)));   
  12. DSLX:=(CLOSE / INDEXC);   
  13. DSLX1:=MA(DSLX,5);   
  14. DSLX2:=MA(DSLX,10);   
  15. V1:=MA(VOL,5);   
  16. V2:=MA(VOL,10);T := BARSLAST(DISPSTATUS=1)+1;   
  17. T := BARSLAST(DISPSTATUS=1)+1;   
  18. HHg := HHV(H, T);   
  19. ddg := LLV(L, T);   
  20. {Hk := LL-HH; G12 := LL-HK*1.55; }   
  21. IF BARSTATUS=2 and c<200 and ((CROSS(AVX,1) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN    
  22. DRAWTEXTABS(12,70,'该股的量能理想，有明显走强迹象，可以考虑中线进场参与，仓位在2/3左右。   '),color0000FF,LINETHICK3;    
  23. IF BARSTATUS=2 and c<200 and ((CROSS(AVX,1) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN    
  24. DRAWTEXTABS(12,70,'该股虽然走势趋强，但量能还显不足，可以考虑短线进场，仓位在1/2左右。   '),color0000FF,LINETHICK3;   
  25. IF BARSTATUS=2 and c<200 and ((CROSS(AVX,1) AND (V1 > V2)) AND (DSLX < DSLX1)) THEN    
  26. DRAWTEXTABS(12,70,'该股量价配合良好，但相对其它股票并没有明显走强，可以考虑短线进场，仓位1/2左右。   '),color0000FF,LINETHICK3;   
  27. IF BARSTATUS=2 and c<200 and ((CROSS(AVX,1) AND (V1 <= V2)) AND (DSLX < DSLX1)) THEN    
  28. DRAWTEXTABS(12,70,'该股形态尚可，但量能不足，股票也未完全走强，可以短线参与，仓位1/3左右。   '),color0000FF,LINETHICK3;   
  29. IF BARSTATUS=2 and c<200 and ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN    
  30. DRAWTEXTABS(12,70,'该股形态变坏，但走势相对其它股票尚可，重仓者减持大半，清仓者可以观望。   '),color00FF00,LINETHICK3;   
  31. IF BARSTATUS=2 and c<200 and ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN    
  32. DRAWTEXTABS(12,70,'该股随大盘一起下跌，程明显缩量走势，考虑到大盘风险，减持或清仓。   '),color00FF00,LINETHICK3;   
  33. IF BARSTATUS=2 and c<200 and ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX < DSLX1)) THEN    
  34. DRAWTEXTABS(12,70,'该股放量下跌，走势明显偏弱，离场观望。   '),color00FF00,LINETHICK3;   
  35. IF BARSTATUS=2 and c<200 and ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX < DSLX1)) THEN    
  36. DRAWTEXTABS(12,70,'该股缩量下跌，走势偏弱，离场观望。   '),color00FF00,LINETHICK3;   
  37. IF BARSTATUS=2 and c<200 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN    
  38. DRAWTEXTABS(12,70,'该股形态良好，强势明显，量能充足，可以继续持有。   '),color00FFFF,LINETHICK3;   
  39. IF BARSTATUS=2 and c<200 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN    
  40. DRAWTEXTABS(12,70,'该股上行趋势不变，强势依然，但量能开始转弱，注意风险。   '),color00FFFF,LINETHICK3;   
  41. IF BARSTATUS=2 and c<200 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)) THEN    
  42. DRAWTEXTABS(12,70,'该股仍然具备上涨潜力，但股性偏弱，可考虑减仓。   '),color00FFFF,LINETHICK3;   
  43. IF BARSTATUS=2 and c<200 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX < DSLX1)) THEN    
  44. DRAWTEXTABS(12,70,'该股走势趋弱，量能不足，减持大部分筹码。   '),color00FFFF,LINETHICK3;   
  45. IF BARSTATUS=2 and c<200 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN    
  46. DRAWTEXTABS(12,70,'该股形态不佳，注意成交量的变化，但目前不适合参与。   '),COLOR00FF00,LINETHICK3;   
  47. IF BARSTATUS=2 and c<200 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN    
  48. DRAWTEXTABS(12,70,'该股趋势不明，股价偏弱，注意量能变化，目前不宜参与。   '),COLOR00FF00,LINETHICK3;   
  49. IF BARSTATUS=2 and c<200 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)) THEN    
  50. DRAWTEXTABS(12,70,'该股有走强迹象，但量能不足，趋势不明，不适合操作。   '),COLOR00FF00,LINETHICK3;   
  51. IF BARSTATUS=2 and c<200 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX < DSLX1)) THEN    
  52. DRAWTEXTABS(12,70,'该股走势太弱，没有参与价值。   '),COLOR00FF00,LINETHICK3;   
  53. IF BARSTATUS=2 and c>200 and (CROSS(AVX,1) AND (V1 >= V2)) THEN    
  54. DRAWTEXTABS(12,70,'大盘量能理想，有明显走强迹象，可以考虑中线进场参与，仓位在2/3左右，   '),color0000FF,LINETHICK3;   
  55. IF BARSTATUS=2 and c>200 and (CROSS(AVX,1) AND (V1 >= V2)) THEN    
  56. DRAWTEXTABS(12,70,'如前期经过一轮下跌，此时为最佳买点，但如果前期有过一段涨幅则介入需谨慎。   '),color0000FF,LINETHICK3;   
  57. IF BARSTATUS=2 and c>200 and (CROSS(AVX,1) AND (V1 < V2)) THEN    
  58. DRAWTEXTABS(12,70,'大盘虽然走势趋强，但量能还显不足，如果前期经过一轮下跌，   '),color0000FF,LINETHICK3;   
  59. IF BARSTATUS=2 and c>200 and (CROSS(AVX,1) AND (V1 < V2)) THEN    
  60. DRAWTEXTABS(12,70,'可以考虑短线进场，仓位在1/2左右，一旦量能放大可以加仓买入。   '),color0000FF,LINETHICK3;   
  61. IF BARSTATUS=2 and c>200 and (CROSS(1,AVX) AND (V1 >= V2)) THEN    
  62. DRAWTEXTABS(12,70,'大盘形态走坏，重仓者可以减去大部分仓位。   '),color00FF00,LINETHICK3;   
  63. IF BARSTATUS=2 and c>200 and (CROSS(1,AVX) AND (V1 < V2)) THEN    
  64. DRAWTEXTABS(12,70,'大盘缩量调整，注意风险，短线清仓观望。   '),color00FF00,LINETHICK3;   
  65. IF BARSTATUS=2 and c>200 and (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) THEN    
  66. DRAWTEXTABS(12,70,'大盘走势良好，量能理想，可以继续持有强势股。   '),color00FFFF,LINETHICK3;   
  67. IF BARSTATUS=2 and c>200 and (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) THEN    
  68. DRAWTEXTABS(12,70,'大盘形态良好，但量能稍显不足，随时准备减仓。   '),color00FFFF,LINETHICK3;   
  69. IF BARSTATUS=2 and c>200 and (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) THEN    
  70. DRAWTEXTABS(12,70,'大盘趋势不明，注意成交量变化，目前不适宜进场。   '),COLOR00FF00,LINETHICK3;   
  71. IF BARSTATUS=2 and c>200 and (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) THEN    
  72. DRAWTEXTABS(12,70,'大盘趋势向下，量能萎缩，不适合进场。   '),COLOR00FF00,LINETHICK3;   
  73. var100:='所属板块:';   
  74. if inblock('电力')=1 then var100:=var100+' 电力';   
  75. if inblock('电脑')=1 then var100:=var100+' 电脑';   
  76. if inblock('电器')=1 then var100:=var100+' 电器';   
  77. if inblock('电子信息')=1 then var100:=var100+' 电子信息';   
  78. if inblock('房地产')=1 then var100:=var100+' 房地产';   
  79. if inblock('纺织服装')=1 then var100:=var100+' 纺织服装';   
  80. if inblock('钢铁')=1 then var100:=var100+' 钢铁';   
  81. if inblock('工程建筑')=1 then var100:=var100+' 工程建筑';   
  82. if inblock('供水供气')=1 then var100:=var100+' 供水供气';   
  83. if inblock('化工')=1 then var100:=var100+' 化工';   
  84. if inblock('化纤')=1 then var100:=var100+' 化纤';   
  85. if inblock('机械')=1 then var100:=var100+' 机械';   
  86. if inblock('建材')=1 then var100:=var100+' 建材';   
  87. if inblock('交通工具')=1 then var100:=var100+' 交通工具';   
  88. if inblock('交通设施')=1 then var100:=var100+' 交通设施';   
  89. if inblock('教育传媒')=1 then var100:=var100+' 教育传媒';   
  90. if inblock('金融')=1 then var100:=var100+' 金融';   
  91. if inblock('旅游酒店')=1 then var100:=var100+' 旅游酒店';   
  92. if inblock('煤炭石油')=1 then var100:=var100+' 煤炭石油';   
  93. if inblock('酿酒食品')=1 then var100:=var100+' 酿酒食品';   
  94. if inblock('农林牧渔')=1 then var100:=var100+' 农林牧渔';   
  95. if inblock('其他行业')=1 then var100:=var100+' 其他行业';   
  96. if inblock('汽车')=1 then var100:=var100+' 汽车';   
  97. if inblock('汽配')=1 then var100:=var100+' 汽配';   
  98. if inblock('商业连锁')=1 then var100:=var100+' 商业连锁';   
  99. if inblock('石化')=1 then var100:=var100+' 石化';   
  100. if inblock('通信')=1 then var100:=var100+' 通信';   
  101. if inblock('外贸')=1 then var100:=var100+' 外贸';   
  102. if inblock('医药')=1 then var100:=var100+' 医药';   
  103. if inblock('仪电仪表')=1 then var100:=var100+' 仪电仪表';   
  104. if inblock('有色金属')=1 then var100:=var100+' 有色金属';   
  105. if inblock('运输物流')=1 then var100:=var100+' 运输物流';   
  106. if inblock('造纸印刷')=1 then var100:=var100+' 造纸印刷';   
  107. if inblock('安徽')=1 then var100:=var100+' 安徽';   
  108. if inblock('北*京')=1 then var100:=var100+' 北*京';   
  109. if inblock('福建')=1 then var100:=var100+' 福建';   
  110. if inblock('甘肃')=1 then var100:=var100+' 甘肃';   
  111. if inblock('广东')=1 then var100:=var100+' 广东';   
  112. if inblock('广西')=1 then var100:=var100+' 广西';   
  113. if inblock('贵州')=1 then var100:=var100+' 贵州';   
  114. if inblock('海南')=1 then var100:=var100+' 海南';   
  115. if inblock('河北')=1 then var100:=var100+' 河北';   
  116. if inblock('河南')=1 then var100:=var100+' 河南';   
  117. if inblock('黑龙江')=1 then var100:=var100+' 黑龙江';   
  118. if inblock('湖北')=1 then var100:=var100+' 湖北';   
  119. if inblock('湖南')=1 then var100:=var100+' 湖南';   
  120. if inblock('吉林')=1 then var100:=var100+' 吉林';   
  121. if inblock('江苏')=1 then var100:=var100+' 江苏';   
  122. if inblock('江西')=1 then var100:=var100+' 江西';   
  123. if inblock('辽宁')=1 then var100:=var100+' 辽宁';   
  124. if inblock('内蒙古')=1 then var100:=var100+' 内蒙古';   
  125. if inblock('宁夏')=1 then var100:=var100+' 宁夏';   
  126. if inblock('青海')=1 then var100:=var100+' 青海';   
  127. if inblock('山东')=1 then var100:=var100+' 山东';   
  128. if inblock('山西')=1 then var100:=var100+' 山西';   
  129. if inblock('陕西')=1 then var100:=var100+' 陕西';   
  130. if inblock('上海')=1 then var100:=var100+' 上海';   
  131. if inblock('深圳')=1 then var100:=var100+' 深圳';   
  132. if inblock('四川')=1 then var100:=var100+' 四川';   
  133. if inblock('天津')=1 then var100:=var100+' 天津';   
  134. if inblock('***')=1 then var100:=var100+' ***';   
  135. if inblock('新*疆')=1 then var100:=var100+' 新*疆';   
  136. if inblock('云南')=1 then var100:=var100+' 云南';   
  137. if inblock('浙江')=1 then var100:=var100+' 浙江';   
  138. if inblock('重庆')=1 then var100:=var100+' 重庆';   
  139. if inblock('3G')=1 then var100:=var100+' 3G';   
  140. if inblock('H股')=1 then var100:=var100+' H股';   
  141. if inblock('QFII持股')=1 then var100:=var100+' QFII持股';   
  142. if inblock('ST')=1 then var100:=var100+' ST';   
  143. if inblock('奥*运')=1 then var100:=var100+' 奥*运';   
  144. if inblock('创投')=1 then var100:=var100+' 创投';   
  145. if inblock('次新股')=1 then var100:=var100+' 次新股';   
  146. if inblock('大盘')=1 then var100:=var100+' 大盘';   
  147. if inblock('股权改革')=1 then var100:=var100+' 股权改革';   
  148. if inblock('股权投资')=1 then var100:=var100+' 股权投资';   
  149. DD:=FINANCE2(35);   
  150. SS:=FINANCE2(37);   
  151. GG:=FINANCE2(3);   
  152. TH:=DYNAINFO(39);   
  153. DRAWTEXTABS(8,30,'总股本:'+NUMTOSTRn(DD,0)+'万股' +' 流通A股:'+NUMTOSTRn(SS,0)+'万股'+'市盈率:'+NUMTOSTRn(TH,2)+' 倍'+'  每股收益:'+NUMTOSTRn(GG,3)+' 元'),ColorFFFFDD;   
  154. DRAWTEXTABS(8,50,var100+' '),ColorFFDE00;   
  155. SAT:=IF((AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100>100,100,(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100);   
  156. DRAWTEXTREL(12,5,'量能饱和度：'+NUMTOSTRN(SAT,0)),LINETHICK3,Color8000FF;   
  157. AA10:MA(CLOSE,8),color0000FF;   
  158. AA12:MA(CLOSE,12),color0000FF;   
  159. BB10:=((ATAN((AA10 - REF(AA10,1))) * 3.1416) * 10);   
  160. BB12:=((ATAN((AA12 - REF(AA12,1))) * 3.1416) * 10);   
  161. MA13:=MA(CLOSE,13);   
  162. FILLRGN(AA10,AA12,(((AA12 <= AA10) AND (BB12 >= 1)) AND (BB10 >= 1))),Color0098FF;   
  163. FILLRGN(AA10,AA12,(((AA12 >= AA10) AND (BB10 <= 1)) AND (BB10 <= 1))),color00FF00;   
  164. x1:=(C+L+H)/3;   
  165. bb13:=atan(ema(x1,13)-ref(ema(x1,13),1))*3.1416*10;   
  166. ema8:=ema(c,8);   
  167. DRAWTEXT(filter(bb13>1 and ema(x1,13)>ref(ema(x1,8),1),10),   
  168. ema8,'∠45上升'),colorwhite;   
  169. 压力:MA(REF(HHV(C,30),1),2),Color9DFFFF;   
  170. 支撑:MA(REF(LLV(C,30),1),2),ColorABFF46;    
  171. AA1:=AMOUNT/V;   
  172. BB1:=L<AA1*0.9;   
  173. CC1:=(C-REF(C,1))/REF(C,1)*100>1.2;   
  174. DD1:=L<MA(C,5)*0.921;   
  175. EE1:=V<MA(V,5)*1.5;   
  176. FF1:=BB1 AND CC1 AND DD1 AND EE1;   
  177. DRAWTEXT(ff1,(LOW* 0.99),'老鼠仓'),Color4080FF;   
  178. A51:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1);   
  179. 黑马线:=EMA(A51,5);   
  180. A54:=((C-LLV(L,21))/(HHV(H,21)-LLV(L,21)))*100;   
  181. 趋势线:=(MA(3*SMA(A54,6,1)-2*SMA(SMA(A54,5,1),5,1),2));   
  182. DRAWTEXT(CROSS(趋势线,0)AND 黑马线<40,(HIGH* 0.97),'▲大黑马'),COLORYELLOW;   
  183. LC:=REF(CLOSE,1);   
  184. RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);   
  185. FF:=EMA(CLOSE,3);   
  186. MA15:=EMA(CLOSE,21);   
  187. DRAWTEXT(CROSS(FF,MA15),(LOW * 0.99),'B'),Coloryellow;   
  188. DRAWTEXT(CROSS(88,RSI),(HIGH * 1.02),'S'),Colorgreen;   
  189. VAR2:=LLV(LOW,27);   
  190. VAR3:=HHV(HIGH,34);   
  191. VAR4:=EMA((CLOSE-Var2)/(Var3-Var2)*4,4)*25;   
  192. 注意买:=IF((Var4<10),80,100);   
  193. RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;   
  194. K:=SMA(RSV,3,1);   
  195. D:=SMA(K,3,1);   
  196. J:=3*K-2*D;   
  197. 超跌:=IF(J<0,10,0);   
  198. BDDD:=LLV(J,2)=LLV(J,8);   
  199. 买入:=IF(CROSS(J,REF(J+0.01,1)) AND BDDD AND J<20,30,0);   
  200. DRAWTEXT(买入 AND 注意买=100 AND 超跌=0,low,'短线'),Color8000FF;   
  201. MTM:=C-REF(C,1);   
  202. DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);   
  203. 买:=IF(LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2)),1,0);   
  204. DRAWTEXT(filter(买=1,5),LOW-0.03,'拉升'),ColorFFDE00;   
  205. 　  

大小黑马 全拿下 （源码）

资源下载链接   资源大小：2KB
精品资源推荐
公式指标平台栏目导航

关于我们 - 联系我们 - 广告合作 - 下载声明 - 网站帮助 - 友情链接 - 网站地图 - RSS订阅 - TOP
湘ICP备09016573号 增值电信业务经营ICP许可证：湘B2-20210269 湘公网安备43108102000039号
Copyright © GSZB.COM ,All Rights Reserved.
股票公式,股票指标,股票软件,股票知识