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

T+0 昨买今卖及预测股价公式

发布时间：2010/4/22 7:42:28  浏览次数：

 

C/C++ www.gszb.com 股票公式指标网提供 Code复制内容到剪贴板
  1. {参数}   
  2. input:N(27,1,250);   
  3. {显示买卖价}   
  4. BUYPRICE:="SHOWINV@BUYPRICE"(1 <mailto:SHOWINV@BUYPRICE>);   
  5. SALEPRICE:="SHOWINV@SALEPRICE"(1 <mailto:SHOWINV@SALEPRICE>);   
  6. IF BUYPRICE> 0 THEN BP:=BUYPRICE;   
  7. {显示昨低买今卖操作数据}   
  8. ppp:=0.015;{输入卖出纯利}   
  9. 成本:=BP*1.006;   
  10. 卖价:成本*(1+ppp),linethick0;   
  11. {四价运用}   
  12. 开盘价:open,linethick0;   
  13. 开盘价1:=REF(open,1);{昨天最低价}   
  14. 最高价:high,linethick0;   
  15. 最高价1:=REF(high,1);   
  16. 最低价:low,linethick0;   
  17. 最低价1:=REF(low,1);   
  18. 最低价2:=REF(low,2);   
  19. 收盘价:CLOSE,linethick0;   
  20. 收盘价1:=REF(CLOSE,1);   
  21.   
  22. {预测系数B2计算公式1}   
  23. A1:=REF(开盘价,1);   
  24. A2:=ABS((REF(收盘价,1)-A1)/A1);   
  25. A3:=ABS((REF(最高价,1)-A1)/A1);   
  26. A4:=ABS((REF(最低价,1)-A1)/A1);   
  27. B1:=ABS((A2+A3+A4)/3);   
  28. B2:开盘价*B1,linethick0;   
  29. 涨跌比:B2/开盘价*100,linethick0;   
  30. {预测公式一 有用到今天开盘价}   
  31. AA:=最高价1;   
  32. BB:=最低价1;   
  33. CC:=开盘价1;   
  34. DD:=收盘价1;   
  35. EE:=(AA+BB+CC+2*DD)/5;   
  36. AAA:=EE+(AA-BB);   
  37. BBB:=2*EE-BB;   
  38. CCC:=2*EE-AA;   
  39. DDD:=EE-(AA-BB);   
  40. 上升突破价:=AAA;   
  41. 上升阻力价:=BBB;   
  42. 下跌支撑价:=CCC;   
  43. 下跌反转价:=DDD;   
  44. EEE:=(EE+上升突破价+上升阻力价+下跌支撑价+下跌反转价)/5;{心理价}   
  45. FFF:=(EEE+开盘价)/2;   
  46. {显示今买最低预测价}   
  47. 预测低一:=开盘价-B2;{今天预测低价一}   
  48. 预测低一1:=REF(预测低一,1);{昨天预测价}   
  49. 预测低一2:=REF(预测低一,2);{前天预测价}   
  50. 预测低二:=(预测低一+FFF)/2;{今天预测低价二}   
  51. 预测低二1:=REF(预测低二,1);{昨天预测价}   
  52. 预测低二2:=REF(预测低二,2);{前天预测价}   
  53. 差额一:=预测低一-low;   
  54. 差额二:=预测低二-low;   
  55. 差比一:=(差额一/low)*100;   
  56. 差比二:=(差额二/low)*100;   
  57. {显示今日最高预测价公式}   
  58. 预测高一:=开盘价+B2;{今天预测高价一}   
  59. {第二今日最高预测价公式}   
  60. 预测高二:=MA(REF(HIGH,1)/REF(CLOSE,2),N)*REF(CLOSE,1);{今天预测高价二}   
  61. 预测高二1:=ref(预测高二,1);{昨天预测价}   
  62. 预测高二2:=ref(预测高二,2);{前天预测价}   
  63. {设定弱势预测最高价，YPP可自行调整}   
  64. YPP一:=0.985;{预测高一弱势价}   
  65. YPP二:=0.989;{预测高二弱势价}   
  66. 熊价一:=预测高一*YPP一;   
  67. 熊价一1:=REF(熊价一,1);   
  68. 熊价二:=预测高二*YPP二;   
  69. 熊价二1:=REF(熊价二,1);   
  70. 平均价一:=(预测高一+预测高二)/2;   
  71. 平均价二:=(熊价一+熊价二)/2;   
  72. {测试昨最低及昨预测低卖出成功率}   
  73. check1:(high-预测低二1)/预测低二1*100,linethick0;   
  74. low1:=ref(low,1);   
  75. check2:(high-low1)/low1*100,linethick0;   
  76. DRAWTEXTREL(10,60,'      【今日低买操作数据】      【昨低买今卖操作数据】 纯利设定：'+NUMTOSTRN(ref(ppp*100,0),2)+'%     【依据预测价 计算卖出价】' ),coloryellow,linethick1;   
  77. DRAWTEXTREL(10,200,'  【今日低买】 预测价  目前差价  目前差比'),Color8000FF,linethick1;   
  78. DRAWTEXTREL(10,350,'    预测低一： '+NUMTOSTRN(ref(预测低一,0),2)+'元   '+ NUMTOSTRN(ref(差额一,0),2)+'元   '+  NUMTOSTRN(ref(差比一,0),2)   +'%'),colorffffff,linethick1;   
  79. DRAWTEXTREL(10,600,'    预测低二： '+NUMTOSTRN(ref(预测低二,0),2)+'元   '+ NUMTOSTRN(ref(差额二,0),2)+'元   '+  NUMTOSTRN(ref(差比二,0),2)   +'%'),colorffffff,linethick1;   
  80. DRAWTEXTREL(320,500,'   今 最低价：'+NUMTOSTRN(ref(最低价,0),2)+'元        最高价：'+NUMTOSTRN(ref(最高价,0),2)+'元'),coloryellow,linethick1;   
  81. DRAWTEXTREL(320,745,'   昨 最低价：'+NUMTOSTRN(ref(最低价1,0),2)+'元       最高价：'+NUMTOSTRN(ref(最高价1,0),2)+'元'),COLORD3A9FF,linethick1;   
  82. DRAWTEXTREL(320,615,'      开盘价：'+NUMTOSTRN(ref(开盘价,0),2)+'元        收盘价：'+NUMTOSTRN(ref(收盘价,0),2)+'元'),coloryellow,linethick1;   
  83. DRAWTEXTREL(320,860,'      开盘价：'+NUMTOSTRN(ref(开盘价1,0),2)+'元       收盘价：'+NUMTOSTRN(ref(收盘价1,0),2)+'元'),COLORD3A9FF,linethick1;   
  84. {显示昨低买今卖操作数据}   
  85. DRAWTEXTREL(320,200,'        【买入价】    税后成本    卖出价  到位'),Colorffff80,linethick1;   
  86. DRAWTEXTREL(320,350,'          '+NUMTOSTR(BP)+'元      '+NUMTOSTR(成本)+'元    '+NUMTOSTR(卖价)+'元'),COLORffffff,linethick1;   
  87. {显示依据预测价计算卖出价}   
  88. DRAWTEXTREL(660,200,'  【预测数据】  强 势  到位    弱 势   到位'),Color8000FF,linethick1;   
  89. DRAWTEXTREL(660,350,'    预测高一： '+NUMTOSTRN(ref(预测高一,0),2)+'元          '+ NUMTOSTRN(ref(熊价一,0),2)+'元'),colorffffff,linethick1;   
  90. DRAWTEXTREL(660,500,'    预测高二： '+NUMTOSTRN(ref(预测高二,0),2)+'元          '+ NUMTOSTRN(ref(熊价二,0),2)+'元'),colorffffff,linethick1;   
  91. DRAWTEXTREL(660,650,'    平均价  ： '+NUMTOSTRN(ref(平均价一,0),2)+'元          '+ NUMTOSTRN(ref(平均价二,0),2)+'元'),colorffffff,linethick1;   
  92. {显示卖出与否}   
  93. BBP1:=high>BP or high=BP;   
  94. BBP2:=high<BP;   
  95. IF BARSTATUS=2 AND BBP1 THEN BEGIN     DRAWTEXTREL(320,350,'★'),COLORRED,linethick1;   
  96. END   
  97. ELSE   
  98. IF BARSTATUS=2 AND BBP2 THEN BEGIN     DRAWTEXTREL(320,350,'●'),COLORgreen,linethick1;   
  99. END   
  100. {显示今日低买操作}   
  101. ssssu1:=预测低一>low or 预测低一=low;   
  102. ssssu2:=预测低一<low;   
  103. IF BARSTATUS=2 AND ssssu1 THEN BEGIN    
  104. DRAWTEXTREL(10,480,'           到 位: ★'),COLORRED,linethick1;   
  105. END   
  106. ELSE   
  107. IF BARSTATUS=2 AND ssssu2 THEN BEGIN    
  108. DRAWTEXTREL(10,480,'           到 位: ●'),COLORgreen,linethick1;   
  109. END   
  110. ssssu3:=预测低二>low or 预测低二=low;   
  111. ssssu4:=预测低二<low;   
  112. IF BARSTATUS=2 AND ssssu3 THEN BEGIN    
  113. DRAWTEXTREL(10,730,'           到 位: ★'),COLORRED,linethick1;   
  114. END   
  115. ELSE   
  116. IF BARSTATUS=2 AND ssssu4 THEN BEGIN    
  117. DRAWTEXTREL(10,730,'           到 位: ●'),COLORgreen,linethick1;   
  118. END   
  119. {昨日低买操作结果}   
  120. lssssu1:=预测低一1>最低价1 or 预测低一1=最低价1;   
  121. lssssu2:=预测低一1<最低价1;   
  122. IF BARSTATUS=2 AND lssssu1 THEN BEGIN         DRAWTEXTREL(10,480,'       昨 ★ '+NUMTOSTRN(ref(预测低一1,0),2)+'元'),COLORRED,linethick1;   
  123. END   
  124. ELSE   
  125. IF BARSTATUS=2 AND lssssu2 THEN BEGIN         DRAWTEXTREL(10,480,'       昨 ● '+NUMTOSTRN(ref(预测低一1,0),2)+'元'),COLORgreen,linethick1;   
  126. END   
  127. lssssu3:=预测低二1>最低价1 or 预测低二=最低价1;   
  128. lssssu4:=预测低二1<最低价1;   
  129. IF BARSTATUS=2 AND lssssu3 THEN BEGIN    
  130. DRAWTEXTREL(10,730,'                           昨 ★ '+NUMTOSTRN(ref(预测低二1,0),2)+'元'),COLORRED,linethick1;   
  131. END   
  132. ELSE   
  133. IF BARSTATUS=2 AND lssssu4 THEN BEGIN    
  134. DRAWTEXTREL(10,730,'                           昨 ● '+NUMTOSTRN(ref(预测低二1,0),2)+'元'),COLORgreen,linethick1;   
  135. END   
  136. {昨今日四价涨跌比}   
  137. su1:=最低价>最低价1;   
  138. su2:=最低价=最低价1;   
  139. su3:=最低价<最低价1;   
  140. IF BARSTATUS=2 AND su1 THEN BEGIN    DRAWTEXTREL(470,500,'★'),COLORRED,linethick1;   
  141. END   
  142. ELSE   
  143. IF BARSTATUS=2 AND su2 THEN BEGIN    DRAWTEXTREL(470,500,'★'),COLORffffff,linethick1;   
  144. END   
  145. ELSE   
  146. IF BARSTATUS=2 AND su3 THEN BEGIN    DRAWTEXTREL(470,500,'●'),COLORgreen,linethick1;   
  147. END   
  148. su4:=最高价>最高价1;   
  149. su5:=最高价=最高价1;   
  150. su6:=最高价<最高价1;   
  151. IF BARSTATUS=2 AND su4 THEN BEGIN    DRAWTEXTREL(620,500,'★'),COLORRED,linethick1;   
  152. END   
  153. ELSE   
  154. IF BARSTATUS=2 AND su5 THEN BEGIN    DRAWTEXTREL(620,500,'★'),COLORffffff,linethick1;   
  155. END   
  156. ELSE   
  157. IF BARSTATUS=2 AND su6 THEN BEGIN    DRAWTEXTREL(620,500,'●'),COLORgreen,linethick1;   
  158. END   
  159. su7:=开盘价>开盘价1;   
  160. su8:=开盘价=开盘价1;   
  161. su9:=开盘价<开盘价1;   
  162. IF BARSTATUS=2 AND su7 THEN BEGIN    DRAWTEXTREL(470,615,'★'),COLORRED,linethick1;   
  163. END   
  164. ELSE   
  165. IF BARSTATUS=2 AND su8 THEN BEGIN    DRAWTEXTREL(470,615,'★'),COLORffffff,linethick1;   
  166. END   
  167. ELSE   
  168. IF BARSTATUS=2 AND su9 THEN BEGIN    DRAWTEXTREL(470,615,'●'),COLORgreen,linethick1;   
  169. END   
  170. suu1:=收盘价>收盘价1;   
  171. suu2:=收盘价=收盘价1;   
  172. suu3:=收盘价<收盘价1;   
  173. IF BARSTATUS=2 AND suu1 THEN BEGIN   DRAWTEXTREL(620,615,'★'),COLORRED,linethick1;   
  174. END   
  175. ELSE   
  176. IF BARSTATUS=2 AND suu2 THEN BEGIN   DRAWTEXTREL(620,615,'★'),COLORffffff,linethick1;   
  177. END   
  178. ELSE   
  179. IF BARSTATUS=2 AND suu3 THEN BEGIN   DRAWTEXTREL(620,615,'●'),COLORgreen,linethick1;   
  180. END   
  181. {显示预测高价}   
  182. ssuu1:=预测高一<high or 预测高一=high;   
  183. ssuu2:=预测高一>high;   
  184. IF BARSTATUS=2 AND ssuu1 THEN BEGIN   DRAWTEXTREL(660,350,'★'),COLORRED,linethick1;   
  185. END   
  186. ELSE   
  187. IF BARSTATUS=2 AND ssuu2 THEN BEGIN   DRAWTEXTREL(660,350,'●'),COLORgreen,linethick1;   
  188. END   
  189. ssuu3:=预测高二<high or 预测高二=high;   
  190. ssuu4:=预测高二>high;   
  191. IF BARSTATUS=2 AND ssuu3 THEN BEGIN   DRAWTEXTREL(660,500,'★'),COLORRED,linethick1;   
  192. END   
  193. ELSE   
  194. IF BARSTATUS=2 AND ssuu4 THEN BEGIN   DRAWTEXTREL(660,500,'●'),COLORgreen,linethick1;   
  195. END   
  196. ssuu5:=平均价一<high or 平均价一=high;   
  197. ssuu6:=平均价一>high;   
  198. IF BARSTATUS=2 AND ssuu5 THEN BEGIN   DRAWTEXTREL(660,650,'★'),COLORRED,linethick1;   
  199. END   
  200. ELSE   
  201. IF BARSTATUS=2 AND ssuu6 THEN BEGIN    DRAWTEXTREL(660,650,'●'),COLORgreen,linethick1;   
  202. END   
  203. ssu1:=熊价一<high or 熊价一=high;   
  204. ssu2:=熊价一>high;   
  205. IF BARSTATUS=2 AND ssu1 THEN BEGIN    DRAWTEXTREL(660,350,'★ '),COLORRED,linethick1;   
  206. END   
  207. ELSE   
  208. IF BARSTATUS=2 AND ssu2 THEN BEGIN    DRAWTEXTREL(660,350,'●'),COLORgreen,linethick1;   
  209. END   
  210. ssu3:=熊价二<high or 熊价二=high;   
  211. ssu4:=熊价二>high;   
  212. IF BARSTATUS=2 AND ssu3 THEN BEGIN    DRAWTEXTREL(660,500,'★'),COLORRED,linethick1;   
  213. END   
  214. ELSE   
  215. IF BARSTATUS=2 AND ssu4 THEN BEGIN    DRAWTEXTREL(660,500,'●'),COLORgreen,linethick1;   
  216. END   
  217. ssu5:=平均价二<high or 平均价二=high;   
  218. ssu6:=平均价二>high;   
  219. IF BARSTATUS=2 AND ssu5 THEN BEGIN    DRAWTEXTREL(660,650,'★'),COLORRED,linethick1;   
  220. END   
  221. ELSE   
  222. IF BARSTATUS=2 AND ssu6 THEN BEGIN    DRAWTEXTREL(660,650,'●'),COLORgreen,linethick1;   
  223. END   
  224. chec1:=预测低二1*1.006*(1+ppp)<high or 预测低二1*1.006*(1+ppp)=high;   
  225. chec2:=预测低二1*1.006*(1+ppp)>high;   
  226. IF BARSTATUS=2 AND chec1 THEN BEGIN   DRAWTEXTREL(660,780,'    测 试:  昨预测低二 ★ '),COLORRED,linethick1;   
  227. END   
  228. ELSE   
  229. IF BARSTATUS=2 AND chec2 THEN BEGIN   DRAWTEXTREL(660,780,'    测 试:  昨预测低二 ●'),COLORgreen,linethick1;   
  230. END   
  231. chec3:=high>最低价1*1.006*(1+ppp) or high=最低价1*1.006*(1+ppp);   
  232. chec4:=high<最低价1*1.006*(1+ppp);   
  233. IF BARSTATUS=2 AND chec3 THEN BEGIN   DRAWTEXTREL(660,780,'    昨最低价 ★ '),COLORRED,linethick1;   
  234. END   
  235. ELSE   
  236. IF BARSTATUS=2 AND chec4 THEN BEGIN   DRAWTEXTREL(660,780,'    昨最低价 ●'),COLORgreen,linethick1;   
  237. END   
  238. 卖一:=预测低二1*1.006*(1+ppp);   
  239. 卖二:=最低价1*1.006*(1+ppp);   
  240. DRAWTEXTREL(660,880,'    卖出价:    '+NUMTOSTRN(ref(卖一,0),2)+'元      '+ NUMTOSTRN(ref(卖二,0),2)+'元'),colorffffff,linethick1;   

源码2--5行：
 

C/C++ www.gszb.com 股票公式指标网提供 Code复制内容到剪贴板
  1. {显示买卖价}   
  2. BUYPRICE:="SHOWINV@BUYPRICE"(1 <mailto:SHOWINV@BUYPRICE>);   
  3. SALEPRICE:="SHOWINV@SALEPRICE"(1 <mailto:SHOWINV@SALEPRICE>);   
  4. IF BUYPRICE> 0 THEN BP:=BUYPRICE;  


提示错误：
line 5: C1035 未定义的变量  mailto
Line 5: C1001 :语法错误：“：”

解决办法：
1.删除这三行。 （只是不再显示买卖价）
2.改为：       （改为以下测试通过高手看看对否）
 

C/C++ www.gszb.com 股票公式指标网提供 Code复制内容到剪贴板
  1. {显示买卖价}   
  2. BUYPRICE:="SHOWINV@BUYPRICE"(1);   
  3. SALEPRICE:="SHOWINV@SALEPRICE"(1);   
  4. IF BUYPRICE> 0 THEN BP:=BUYPRICE;  


修改后显示图：　

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

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