当前位置:→ 公式网 > 通达信公式 > 正文  公式解密、改选股等业务 联系点击查看详情...

以下是通达信庄家仓位副图源码(无源码的请下载附件导入)

 通达信庄家仓位副图源码

C/C++ Code复制内容到剪贴板
  1. A1:=CAPITAL;   
  2. A2:=(((H + L) + O) + C) / 4;   
  3. A3:=(((INDEXH + INDEXL) + INDEXO) + INDEXC) / 4;   
  4. A4:=(A2 - (REF(A2,1))) / (REF(A2,1));   
  5. A5:=(A3 - (REF(A3,1))) / (REF(A3,1));   
  6. A6:=(((SUM(A4,10)) + (SUM(A5,10))) / 10) * 1000;   
  7. A7:=IF(((A6 > 0) AND (A6 < 75)),A6,(IF((A6 > 75),75,0)));   
  8. A8:=IF(((A6 < 0) AND (A6 > -75)),REVERSE(A6),(IF((A6 < -75),75,0)));   
  9. STICKLINE(A8,150,(150 - A8),3,1),COLOR825200;   
  10. STICKLINE(A7,150,(150 - A7),3,1),COLOR7A67CF;   
  11. {A9:=(VOL * (((A2 * 2) - HIGH) - LOW)) / (HIGH - LOW);   
  12. A10:=IF(((HIGH = LOW) AND (A2 < (REF(A2,1)))),(-1 * VOL),VOL);   
  13. A11:=IF((HIGH = LOW),A10,A9);   
  14. A12:=SUM(A11,11);   
  15. A13:=(A12 / (A1 * 11)) * 10000;   
  16. A14:=IF(((A13 < 150) AND (A13 > -150)),A13,150);   
  17. A15:=IF((A14 > 0),A14,0);   
  18. A16:=IF((A14 < 0),REVERSE(A14),0);   
  19. STICKLINE((A14 > 0),0,A15,3,1),COLORYELLOW;   
  20. STICKLINE((A14 < 0),0,A16,3,0),COLOR2E9F15;}   
  21. A17:=(SUM((A2 * VOL),16)) / (SUM(VOL,16));   
  22. A18:=(SUM((A2 * VOL),11)) / (SUM(VOL,11));   
  23. A19:=(SUM((A2 * VOL),6)) / (SUM(VOL,6));   
  24. A20:=((SUM((A2 * VOL),7)) - (A2 * VOL)) / ((SUM(VOL,7)) - VOL);   
  25. A21:=((A18 - A17) / A2) * 1000;   
  26. A22:=IF((A21 > 50),50,(IF((A21 < -50),-50,A21)));   
  27. A23:=((A19 - A18) / A2) * 1000;   
  28. A24:=IF((A23 > 50),50,(IF((A23 < -50),-50,A23)));   
  29. A25:=((((A19 - A20) / A20) * 5) / 4) * 1000;   
  30. A26:=IF((A25 > 50),50,(IF((A25 < -50),-50,A25)));   
  31. A27:=(A22 + A24) + A26;   
  32. 红柱线:IF((A27 > 0),A27,0),COLOR003ADB,LINETHICK2;   
  33. 兰柱线:IF((A27 < 0),REVERSE(A27),0),COLORE99A2C,LINETHICK2;   
  34. {A28:=IF((兰柱线 < 150),兰柱线,(IF((兰柱线 = 150),65,0)));   
  35. A29:=IF((兰柱线 = 150),60,0);   
  36. A30:=IF((红柱线 < 150),红柱线,(IF((红柱线 = 150),65,0)));   
  37. A31:=IF((红柱线 = 150),60,0);   
  38. A32:=(((红柱线 > (REF(红柱线,1))) AND (红柱线 > 49)) AND (CLOSE < (REF(CLOSE,1)))) AND ((OPEN < (REF(CLOSE,1))) OR ((OPEN = (REF(CLOSE,1))) AND ((HIGH / (REF(CLOSE,1))) < 1.02)));   
  39. DRAWICON(A32,90,9),COLORGREEN;}   
  40. {超跌短线买点:(兰柱线 = 150) AND ((CLOSE < OPEN) OR (CLOSE > OPEN)),COLORRED;   
  41. A33:=SUMBARS(VOL,(A1 * 0.8));   
  42. A34:=IF((A33 < 9),9,A33);   
  43. A35:=HHV(A2,A34);   
  44. A36:=LLV(A2,A34);   
  45. A37:=IF((A35 = A36),0,((100 * (A2 - A36)) / (A35 - A36)));}   
  46. {中趋势线:(1.5 * (SUM(A37,6))) / 6,LINETHICK2,COLORRED;   
  47. 长趋势线:(SUM(中趋势线,6)) / 6,LINETHICK2,COLORGREEN;}   
  48. {A38:=((HIGH - A2) > (A2 - LOW)) OR ((HIGH = LOW) AND (LOW < (REF(CLOSE,1))));   
  49. A39:=FILTER(A38,5);}   
  50. A40:=EMA((((CLOSE - (LLV(LOW,25))) / ((HHV(HIGH,25)) - (LLV(LOW,25)))) * 4),4);   
  51. {DRAWTEXT((FILTER((A40 > 3.6),10)),155,'考虑出货'),COLORGREEN;}   
  52. {DRAWTEXT((FILTER((A40 < 0.25),5)),30,'考虑买入'),COLORRED;   
  53. A42:=(EMA((((CLOSE - (LLV(LOW,33))) / ((HHV(HIGH,21)) - (LLV(LOW,33)))) * 100),20)) * 0.998;   
  54. A43:=EMA(((0.667 * (REF(A42,1))) + (0.333 * A42)),1);   
  55. STICKLINE((A43 < 20),20,(20 + 20),4,0),COLORMAGENTA;   
  56. DRAWTEXT((超跌短线买点 = 1),60,'超跌短线买点'),COLORWHITE;   
  57. DRAWTEXT((A32 = 1),60,'超强短线买点'),COLORYELLOW;   
  58. 买方能量:(A15),COLORYELLOW,LINETHICK1;};   
  59. {新加}   
  60. MACD:="MACD.MACD"(12,26,9)*25;   
  61. STICKLINE((MACD>0),MACD,0,3,1),COLOR003ADB,LINETHICK2;   
  62. STICKLINE((MACD < 0),MACD,0,3,1),COLORE99A2C,LINETHICK2;   
  63. STICKLINE(( "MACD.MACD"(12,26,9)>"MACD.DIF"(12,26,9) AND MACD < 0 ),MACD,0,3,1),COLORFF00FF,LINETHICK2;   
  64. DIF负:IF("MACD.DIF"(12,26,9)<0,兰柱线,DRAWNULL),COLORGREEN,LINETHICK2;   

 

{公式在线提供:www.gszx.com.cn}



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