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

板块KDJ

发布时间：2009/10/3 9:10:51  浏览次数：

板块KDJ

 

C/C++ Code复制内容到剪贴板
  1. if inblock('工程建筑')=1 THEN  BEGIN  M:='工程建筑,';   
  2. 版块H:=STKINDI('991002','涨幅引用.Ch');   
  3. 版块L:=STKINDI('991002','涨幅引用.Cl');   
  4. 版块O:=STKINDI('991002','涨幅引用.CO');   
  5. 版块V:=STKINDI('991002','涨幅引用.Cv');   
  6. 版块C:=STKINDI('991002','涨幅引用.CC');   
  7. 版块涨幅:=STKINDI('991002','涨幅引用.A')*100;end;   
  8. if inblock('新能源')=1 THEN BEGIN  M:='新能源,';   
  9. 版块H:=STKINDI('993585','涨幅引用.Ch');   
  10. 版块L:=STKINDI('993585','涨幅引用.Cl');   
  11. 版块O:=STKINDI('993585','涨幅引用.CO');   
  12. 版块V:=STKINDI('993585','涨幅引用.Cv');   
  13. 版块C:=STKINDI('993585','涨幅引用.CC');   
  14. 版块涨幅:=STKINDI('993585','涨幅引用.A')*100;end;   
  15. if inblock('电力')=1 THEN BEGIN  M:='电力,';   
  16. 版块H:=STKINDI('991003','涨幅引用.Ch');   
  17. 版块L:=STKINDI('991003','涨幅引用.Cl');   
  18. 版块O:=STKINDI('991003','涨幅引用.CO');   
  19. 版块V:=STKINDI('991003','涨幅引用.Cv');   
  20. 版块C:=STKINDI('991003','涨幅引用.CC');   
  21. 版块涨幅:=STKINDI('991003','涨幅引用.A')*100;end;   
  22. if inblock('电子信息')=1 THEN BEGIN  M:='电子信息,';   
  23. 版块H:=STKINDI('991006','涨幅引用.Ch');   
  24. 版块L:=STKINDI('991006','涨幅引用.Cl');   
  25. 版块O:=STKINDI('991006','涨幅引用.CO');   
  26. 版块V:=STKINDI('991006','涨幅引用.Cv');   
  27. 版块C:=STKINDI('991006','涨幅引用.CC');   
  28. 版块涨幅:=STKINDI('991006','涨幅引用.A')*100;end;   
  29. if inblock('房地产')=1 THEN BEGIN  M:='房地产,';   
  30. 版块H:=STKINDI('991007','涨幅引用.Ch');   
  31. 版块L:=STKINDI('991007','涨幅引用.Cl');   
  32. 版块O:=STKINDI('991007','涨幅引用.CO');   
  33. 版块V:=STKINDI('991007','涨幅引用.Cv');   
  34. 版块C:=STKINDI('991007','涨幅引用.CC');   
  35. 版块涨幅:=STKINDI('991007','涨幅引用.A')*100;end;   
  36. if inblock('纺织服装')=1 THEN BEGIN  M:='纺织服装,';   
  37. 版块H:=STKINDI('991008','涨幅引用.Ch');   
  38. 版块L:=STKINDI('991008','涨幅引用.Cl');   
  39. 版块O:=STKINDI('991008','涨幅引用.CO');   
  40. 版块V:=STKINDI('991008','涨幅引用.Cv');   
  41. 版块C:=STKINDI('991008','涨幅引用.CC');   
  42. 版块涨幅:=STKINDI('991008','涨幅引用.A')*100;end;   
  43. if inblock('钢铁')=1 THEN BEGIN  M:='钢铁,';   
  44. 版块H:=STKINDI('991009','涨幅引用.Ch');   
  45. 版块L:=STKINDI('991009','涨幅引用.Cl');   
  46. 版块O:=STKINDI('991009','涨幅引用.CO');   
  47. 版块V:=STKINDI('991009','涨幅引用.Cv');   
  48. 版块C:=STKINDI('991009','涨幅引用.CC');   
  49. 版块涨幅:=STKINDI('991009','涨幅引用.A')*100;end;   
  50. if inblock('供水供气')=1 THEN BEGIN  M:='供水供气,';   
  51. 版块H:=STKINDI('991010','涨幅引用.Ch');   
  52. 版块L:=STKINDI('991010','涨幅引用.Cl');   
  53. 版块O:=STKINDI('991010','涨幅引用.CO');   
  54. 版块V:=STKINDI('991010','涨幅引用.Cv');   
  55. 版块C:=STKINDI('991010','涨幅引用.CC');   
  56. 版块涨幅:=STKINDI('991010','涨幅引用.A')*100;end;   
  57. if inblock('化工化纤')=1 THEN BEGIN  M:='化工化纤,';   
  58. 版块H:=STKINDI('991011','涨幅引用.Ch');   
  59. 版块L:=STKINDI('991011','涨幅引用.Cl');   
  60. 版块O:=STKINDI('991011','涨幅引用.CO');   
  61. 版块V:=STKINDI('991011','涨幅引用.Cv');   
  62. 版块C:=STKINDI('991011','涨幅引用.CC');   
  63. 版块涨幅:=STKINDI('991011','涨幅引用.A')*100;end;   
  64. if inblock('稀缺资源')=1 THEN BEGIN  M:='稀缺资源,';   
  65. 版块H:=STKINDI('993745','涨幅引用.Ch');   
  66. 版块L:=STKINDI('993745','涨幅引用.Cl');   
  67. 版块O:=STKINDI('993745','涨幅引用.CO');   
  68. 版块V:=STKINDI('993745','涨幅引用.Cv');   
  69. 版块C:=STKINDI('993745','涨幅引用.CC');   
  70. 版块涨幅:=STKINDI('993745','涨幅引用.A')*100;end;   
  71. if inblock('电器')=1 THEN BEGIN  M:='电器,';   
  72. 版块H:=STKINDI('991014','涨幅引用.Ch');   
  73. 版块L:=STKINDI('991014','涨幅引用.Cl');   
  74. 版块O:=STKINDI('991014','涨幅引用.CO');   
  75. 版块V:=STKINDI('991014','涨幅引用.Cv');   
  76. 版块C:=STKINDI('991014','涨幅引用.CC');   
  77. 版块涨幅:=STKINDI('991014','涨幅引用.A')*100;end;   
  78. if inblock('新材料')=1 THEN BEGIN  M:='新材料,';   
  79. 版块H:=STKINDI('993120','涨幅引用.Ch');   
  80. 版块L:=STKINDI('993120','涨幅引用.Cl');   
  81. 版块O:=STKINDI('993120','涨幅引用.CO');   
  82. 版块V:=STKINDI('993120','涨幅引用.Cv');   
  83. 版块C:=STKINDI('993120','涨幅引用.CC');   
  84. 版块涨幅:=STKINDI('993120','涨幅引用.A')*100;end;   
  85. if inblock('交通设施')=1 THEN BEGIN  M:='交通设施,';   
  86. 版块H:=STKINDI('991016','涨幅引用.Ch');   
  87. 版块L:=STKINDI('9910160','涨幅引用.Cl');   
  88. 版块O:=STKINDI('991016','涨幅引用.CO');   
  89. 版块V:=STKINDI('991016','涨幅引用.Cv');   
  90. 版块C:=STKINDI('991016','涨幅引用.CC');   
  91. 版块涨幅:=STKINDI('991016','涨幅引用.A')*100;end;   
  92. if inblock('银行类')=1 THEN BEGIN  M:='银行类,';   
  93. 版块H:=STKINDI('991017','涨幅引用.Ch');   
  94. 版块L:=STKINDI('991017','涨幅引用.Cl');   
  95. 版块O:=STKINDI('991017','涨幅引用.CO');   
  96. 版块V:=STKINDI('991017','涨幅引用.Cv');   
  97. 版块C:=STKINDI('991017','涨幅引用.CC');   
  98. 版块涨幅:=STKINDI('991017','涨幅引用.A')*100;end;   
  99. if inblock('旅游酒店')=1 THEN BEGIN  M:='旅游酒店,';   
  100. 版块H:=STKINDI('991018','涨幅引用.Ch');   
  101. 版块L:=STKINDI('991018','涨幅引用.Cl');   
  102. 版块O:=STKINDI('991018','涨幅引用.CO');   
  103. 版块V:=STKINDI('991018','涨幅引用.Cv');   
  104. 版块C:=STKINDI('991018','涨幅引用.CC');   
  105. 版块涨幅:=STKINDI('991018','涨幅引用.A')*100;end;   
  106. if inblock('煤炭石油')=1 THEN BEGIN  M:='煤炭石油,';   
  107. 版块H:=STKINDI('991019','涨幅引用.Ch');   
  108. 版块L:=STKINDI('991019','涨幅引用.Cl');   
  109. 版块O:=STKINDI('991019','涨幅引用.CO');   
  110. 版块V:=STKINDI('991019','涨幅引用.Cv');   
  111. 版块C:=STKINDI('991019','涨幅引用.CC');   
  112. 版块涨幅:=STKINDI('991019','涨幅引用.A')*100;end;   
  113. if inblock('酿酒食品')=1 THEN BEGIN  M:='酿酒食品,';   
  114. 版块H:=STKINDI('991020','涨幅引用.Ch');   
  115. 版块L:=STKINDI('991020','涨幅引用.Cl');   
  116. 版块O:=STKINDI('991020','涨幅引用.CO');   
  117. 版块V:=STKINDI('991020','涨幅引用.Cv');   
  118. 版块C:=STKINDI('991020','涨幅引用.CC');   
  119. 版块涨幅:=STKINDI('991020','涨幅引用.A')*100;end;   
  120. if inblock('农林牧渔')=1 THEN BEGIN  M:='农林牧渔,';   
  121. 版块H:=STKINDI('991021','涨幅引用.Ch');   
  122. 版块L:=STKINDI('991021','涨幅引用.Cl');   
  123. 版块O:=STKINDI('991021','涨幅引用.CO');   
  124. 版块V:=STKINDI('991021','涨幅引用.Cv');   
  125. 版块C:=STKINDI('991021','涨幅引用.CC');   
  126. 版块涨幅:=STKINDI('991021','涨幅引用.A')*100;end;   
  127. if inblock('商业连锁')=1 THEN BEGIN  M:='商业连锁,';   
  128. 版块H:=STKINDI('991023','涨幅引用.Ch');   
  129. 版块L:=STKINDI('991023','涨幅引用.Cl');   
  130. 版块O:=STKINDI('991023','涨幅引用.CO');   
  131. 版块V:=STKINDI('991023','涨幅引用.Cv');   
  132. 版块C:=STKINDI('991023','涨幅引用.CC');   
  133. 版块涨幅:=STKINDI('991023','涨幅引用.A')*100;end;   
  134. if inblock('建材')=1 THEN BEGIN  M:='建材,';   
  135. 版块H:=STKINDI('991024','涨幅引用.Ch');   
  136. 版块L:=STKINDI('991024','涨幅引用.Cl');   
  137. 版块O:=STKINDI('991024','涨幅引用.CO');   
  138. 版块V:=STKINDI('991024','涨幅引用.Cv');   
  139. 版块C:=STKINDI('991024','涨幅引用.CC');   
  140. 版块涨幅:=STKINDI('991024','涨幅引用.A')*100;end;   
  141. if inblock('其他行业')=1 THEN BEGIN  M:='其他行业,';   
  142. 版块H:=STKINDI('991025','涨幅引用.Ch');   
  143. 版块L:=STKINDI('991025','涨幅引用.Cl');   
  144. 版块O:=STKINDI('991025','涨幅引用.CO');   
  145. 版块V:=STKINDI('991025','涨幅引用.Cv');   
  146. 版块C:=STKINDI('991025','涨幅引用.CC');   
  147. 版块涨幅:=STKINDI('991025','涨幅引用.A')*100;end;   
  148. if inblock('汽车类')=1 THEN BEGIN  M:='汽车类,';   
  149. 版块H:=STKINDI('991026','涨幅引用.Ch');   
  150. 版块L:=STKINDI('991026','涨幅引用.Cl');   
  151. 版块O:=STKINDI('991026','涨幅引用.CO');   
  152. 版块V:=STKINDI('991026','涨幅引用.Cv');   
  153. 版块C:=STKINDI('991026','涨幅引用.CC');   
  154. 版块涨幅:=STKINDI('991026','涨幅引用.A')*100;end;   
  155. if inblock('机械')=1 THEN BEGIN  M:='机械,';   
  156. 版块H:=STKINDI('991027','涨幅引用.Ch');   
  157. 版块L:=STKINDI('991027','涨幅引用.Cl');   
  158. 版块O:=STKINDI('991027','涨幅引用.CO');   
  159. 版块V:=STKINDI('991027','涨幅引用.Cv');   
  160. 版块C:=STKINDI('991027','涨幅引用.CC');   
  161. 版块涨幅:=STKINDI('991027','涨幅引用.A')*100;end;   
  162. if inblock('医药')=1 THEN BEGIN  M:='医药,';   
  163. 版块H:=STKINDI('991028','涨幅引用.Ch');   
  164. 版块L:=STKINDI('991028','涨幅引用.Cl');   
  165. 版块O:=STKINDI('991028','涨幅引用.CO');   
  166. 版块V:=STKINDI('991028','涨幅引用.Cv');   
  167. 版块C:=STKINDI('991028','涨幅引用.CC');   
  168. 版块涨幅:=STKINDI('991028','涨幅引用.A')*100;end;   
  169. if inblock('农业龙头')=1 THEN BEGIN  M:='农业龙头,';   
  170. 版块H:=STKINDI('993128','涨幅引用.Ch');   
  171. 版块L:=STKINDI('993128','涨幅引用.Cl');   
  172. 版块O:=STKINDI('993128','涨幅引用.CO');   
  173. 版块V:=STKINDI('993128','涨幅引用.Cv');   
  174. 版块C:=STKINDI('993128','涨幅引用.CC');   
  175. 版块涨幅:=STKINDI('993128','涨幅引用.A')*100;end;   
  176. if inblock('外贸')=1 THEN BEGIN  M:='外贸,';   
  177. 版块H:=STKINDI('991031','涨幅引用.Ch');   
  178. 版块L:=STKINDI('991031','涨幅引用.Cl');   
  179. 版块O:=STKINDI('991031','涨幅引用.CO');   
  180. 版块V:=STKINDI('991031','涨幅引用.Cv');   
  181. 版块C:=STKINDI('991031','涨幅引用.CC');   
  182. 版块涨幅:=STKINDI('991031','涨幅引用.A')*100;end;   
  183. if inblock('教育传媒')=1 THEN BEGIN  M:='教育传媒,';   
  184. 版块H:=STKINDI('991032','涨幅引用.Ch');   
  185. 版块L:=STKINDI('991032','涨幅引用.Cl');   
  186. 版块O:=STKINDI('991032','涨幅引用.CO');   
  187. 版块V:=STKINDI('991032','涨幅引用.Cv');   
  188. 版块C:=STKINDI('991032','涨幅引用.CC');   
  189. 版块涨幅:=STKINDI('991032','涨幅引用.A')*100;end;   
  190. if inblock('仪电仪表')=1 THEN BEGIN  M:='仪电仪表,';   
  191. 版块H:=STKINDI('991033','涨幅引用.Ch');   
  192. 版块L:=STKINDI('991033','涨幅引用.Cl');   
  193. 版块O:=STKINDI('991033','涨幅引用.CO');   
  194. 版块V:=STKINDI('991033','涨幅引用.Cv');   
  195. 版块C:=STKINDI('991033','涨幅引用.CC');   
  196. 版块涨幅:=STKINDI('991033','涨幅引用.A')*100;end;   
  197. if inblock('有色金属')=1 THEN BEGIN  M:='有色金属,';   
  198. 版块H:=STKINDI('991034','涨幅引用.Ch');   
  199. 版块L:=STKINDI('991034','涨幅引用.Cl');   
  200. 版块O:=STKINDI('991034','涨幅引用.CO');   
  201. 版块V:=STKINDI('991034','涨幅引用.Cv');   
  202. 版块C:=STKINDI('991034','涨幅引用.CC');   
  203. 版块涨幅:=STKINDI('991034','涨幅引用.A')*100;end;   
  204. if inblock('造纸印刷')=1 THEN BEGIN  M:='造纸印刷,';   
  205. 版块H:=STKINDI('991035','涨幅引用.Ch');   
  206. 版块L:=STKINDI('991035','涨幅引用.Cl');   
  207. 版块O:=STKINDI('991035','涨幅引用.CO');   
  208. 版块V:=STKINDI('991035','涨幅引用.Cv');   
  209. 版块C:=STKINDI('991035','涨幅引用.CC');   
  210. 版块涨幅:=STKINDI('991035','涨幅引用.A')*100;end;   
  211. if inblock('券商')=1 THEN BEGIN  M:='券商,';   
  212. 版块H:=STKINDI('991036','涨幅引用.Ch');   
  213. 版块L:=STKINDI('991036','涨幅引用.Cl');   
  214. 版块O:=STKINDI('991036','涨幅引用.CO');   
  215. 版块V:=STKINDI('991036','涨幅引用.Cv');   
  216. 版块C:=STKINDI('991036','涨幅引用.CC');   
  217. 版块涨幅:=STKINDI('991036','涨幅引用.A')*100;end;   
  218. if inblock('电力设备')=1 THEN BEGIN  M:='电力设备,';   
  219. 版块H:=STKINDI('991037','涨幅引用.Ch');   
  220. 版块L:=STKINDI('991037','涨幅引用.Cl');   
  221. 版块O:=STKINDI('991037','涨幅引用.CO');   
  222. 版块V:=STKINDI('991037','涨幅引用.Cv');   
  223. 版块C:=STKINDI('991037','涨幅引用.CC');   
  224. 版块涨幅:=STKINDI('991037','涨幅引用.A')*100;end;   
  225. if inblock('数字电视')=1 THEN BEGIN  M:='数字电视,';   
  226. 版块H:=STKINDI('993129','涨幅引用.Ch');   
  227. 版块L:=STKINDI('993129','涨幅引用.Cl');   
  228. 版块O:=STKINDI('993129','涨幅引用.CO');   
  229. 版块V:=STKINDI('993129','涨幅引用.Cv');   
  230. 版块C:=STKINDI('993129','涨幅引用.CC');   
  231. 版块涨幅:=STKINDI('993129','涨幅引用.A')*100;end;   
  232. if inblock('通信')=1 THEN BEGIN  M:='通信,';   
  233. 版块H:=STKINDI('991135','涨幅引用.Ch');   
  234. 版块L:=STKINDI('991135','涨幅引用.Cl');   
  235. 版块O:=STKINDI('991135','涨幅引用.CO');   
  236. 版块V:=STKINDI('991135','涨幅引用.Cv');   
  237. 版块C:=STKINDI('991135','涨幅引用.CC');   
  238. 版块涨幅:=STKINDI('991135','涨幅引用.A')*100;end;   
  239. if inblock('运输物流')=1 THEN BEGIN  M:='运输物流,';   
  240. 版块H:=STKINDI('991136','涨幅引用.Ch');   
  241. 版块L:=STKINDI('991136','涨幅引用.Cl');   
  242. 版块O:=STKINDI('991136','涨幅引用.CO');   
  243. 版块V:=STKINDI('991136','涨幅引用.Cv');   
  244. 版块C:=STKINDI('991136','涨幅引用.CC');   
  245. 版块涨幅:=STKINDI('991136','涨幅引用.A')*100;end;   
  246. if inblock('计算机')=1 THEN BEGIN  M:='计算机,';   
  247. 版块H:=STKINDI('991004','涨幅引用.Ch');   
  248. 版块L:=STKINDI('991004','涨幅引用.Cl');   
  249. 版块O:=STKINDI('991004','涨幅引用.CO');   
  250. 版块V:=STKINDI('991004','涨幅引用.Cv');   
  251. 版块C:=STKINDI('991004','涨幅引用.CC');   
  252. 版块涨幅:=STKINDI('991004','涨幅引用.A')*100;end;   
  253. if inblock('中字头')=1 THEN BEGIN  M:='中字头,';   
  254. 版块H:=STKINDI('993795','涨幅引用.Ch');   
  255. 版块L:=STKINDI('993795','涨幅引用.Cl');   
  256. 版块O:=STKINDI('993795','涨幅引用.CO');   
  257. 版块V:=STKINDI('993795','涨幅引用.Cv');   
  258. 版块C:=STKINDI('993795','涨幅引用.CC');   
  259. 版块涨幅:=STKINDI('993795','涨幅引用.A')*100;end;   
  260. if inblock('QFII持股')=1 THEN BEGIN  M:='QFII持股,';   
  261. 版块H:=STKINDI('993625','涨幅引用.Ch');   
  262. 版块L:=STKINDI('993625','涨幅引用.Cl');   
  263. 版块O:=STKINDI('993625','涨幅引用.CO');   
  264. 版块V:=STKINDI('993625','涨幅引用.Cv');   
  265. 版块C:=STKINDI('993625','涨幅引用.CC');   
  266. 版块涨幅:=STKINDI('993625','涨幅引用.A')*100;end;   
  267. if inblock('航天军工')=1 THEN BEGIN  M:='航天军工,';   
  268. 版块H:=STKINDI('993665','涨幅引用.Ch');   
  269. 版块L:=STKINDI('993665','涨幅引用.Cl');   
  270. 版块O:=STKINDI('993665','涨幅引用.CO');   
  271. 版块V:=STKINDI('993665','涨幅引用.Cv');   
  272. 版块C:=STKINDI('993665','涨幅引用.CC');   
  273. 版块涨幅:=STKINDI('993665','涨幅引用.A')*100;end;   
  274. if inblock('节能环保')=1 THEN BEGIN  M:='节能环保,';   
  275. 版块H:=STKINDI('993645','涨幅引用.Ch');   
  276. 版块L:=STKINDI('993645','涨幅引用.Cl');   
  277. 版块O:=STKINDI('993645','涨幅引用.CO');   
  278. 版块V:=STKINDI('993645','涨幅引用.Cv');   
  279. 版块C:=STKINDI('993645','涨幅引用.CC');   
  280. 版块涨幅:=STKINDI('993645','涨幅引用.A')*100;end;   
  281. if inblock('创投')=1 THEN BEGIN  M:='创投,';   
  282. 版块H:=STKINDI('993695','涨幅引用.Ch');   
  283. 版块L:=STKINDI('993695','涨幅引用.Cl');   
  284. 版块O:=STKINDI('993695','涨幅引用.CO');   
  285. 版块V:=STKINDI('993695','涨幅引用.Cv');   
  286. 版块C:=STKINDI('993695','涨幅引用.CC');   
  287. 版块涨幅:=STKINDI('993695','涨幅引用.A')*100;end;   
  288. if inblock('煤化工')=1 THEN BEGIN  M:='煤化工,';   
  289. 版块H:=STKINDI('993798','涨幅引用.Ch');   
  290. 版块L:=STKINDI('993798','涨幅引用.Cl');   
  291. 版块O:=STKINDI('993798','涨幅引用.CO');   
  292. 版块V:=STKINDI('993798','涨幅引用.Cv');   
  293. 版块C:=STKINDI('993798','涨幅引用.CC');   
  294. 版块涨幅:=STKINDI('993798','涨幅引用.A')*100;end;   
  295. DRAWTEXTREL(10,10,'所属板块及涨幅:'+M+NUMTOSTRN(版块涨幅,2)+'% '),LINETHICK2;   
  296.   
  297.   
  298. REFLINE: 0, 20, 50, 80, 100;   
  299. bRSV:=(版块C-LLV(版块L,9))/(HHV(版块H,9)-LLV(版块L,9))*100;   
  300. bK:SMA(bRSV,3,1);   
  301. bD:SMA(bK,3,1);   
  302. bJ:3*bK-2*bD;   

 

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

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