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

以下是通达信天地买卖主图源码(无源码的请下载附件导入)

通达信天地买卖主图源码

C/C++ Code复制内容到剪贴板
  1. 天:80,COLORBLUE,LINETHICK4,POINTDOT;   
  2. 海:20,COLORFF00FF,LINETHICK4,POINTDOT;   
  3. ZKK:"KD.K#WEEK"(9,3,3),COLORRED;   
  4. ZKD:"KD.D#WEEK"(9,3,3),COLORYELLOW;   
  5. KCD:=FILTER(CROSS(ZKK,ZKD) AND REF(ZKD,1)<30,13);   
  6. KCD1:=FILTER(CROSS(ZKK,ZKD) AND REF(ZKD,1)>30,13);   
  7. DRAWICON(KCD1,ZKD,23);   
  8. XG1:=KCD;   
  9. STICKLINE(XG1,20,10,4,0),COLOR000099;   
  10. STICKLINE(XG1,20,10,2,0),COLOR0000BB;   
  11. STICKLINE(XG1,20,10,1,0),COLOR0000DD;   
  12. STICKLINE(XG1,0,20,0.3,0),COLOR0000FF;   
  13. DRAWTEXT(XG1,20,'K买'),COLOR0000FF;   
  14. SCD:=FILTER(CROSS(ZKD,ZKK) AND REF(ZKK,1)>78,13);   
  15. STICKLINE(SCD,90,80,4,0),COLOR009900;   
  16. STICKLINE(SCD,90,80,2,0),COLOR00BB00;   
  17. STICKLINE(SCD,90,80,1,0),COLOR00DD00;   
  18. STICKLINE(SCD,100,80,0.3,0),COLOR00FF00;   
  19. DRAWTEXT(SCD,95,'K卖'),COLOR00FF00;   
  20.   
  21. DIFW:="MACD.DIF#WEEK"(12,26,9);   
  22. DEAW:="MACD.DEA#WEEK"(12,26,9);   
  23. FCA:=FILTER(CROSS(DIFW,DEAW) AND REF(DEAW,1)<0,13);   
  24. XG2:=FCA;   
  25. STICKLINE(XG2,10,20,4,0),COLOR990099;   
  26. STICKLINE(XG2,10,20,2,0),COLORBB00BB;   
  27. STICKLINE(XG2,10,20,1,0),COLORDD00DD;   
  28. STICKLINE(XG2,10,20,0.3,0),COLORFF00FF;   
  29. DRAWTEXT(XG2,10,'M买'),COLORFF00FF;   
  30. SCA:=FILTER(CROSS(DEAW,DIFW) AND REF(DIFW,1)>0,13);   
  31. STICKLINE(SCA,90,80,4,0),COLOR999900;   
  32. STICKLINE(SCA,90,80,2,0),COLORBBBB00;   
  33. STICKLINE(SCA,90,80,1,0),COLORDDDD00;   
  34. STICKLINE(SCA,90,80,0.3,0),COLORFFFF00;   
  35. DRAWTEXT(SCA,83,'M卖'),COLORFFFF00;   
  36. STICKLINE(XG1 AND XG2,20,80,0.1,0 ),COLORFF00FF;   
  37. DRAWTEXT(XG1 AND XG2,50,'K.M买'),COLORRED;   
  38. DRAWTEXT(XG1 AND XG2,43,'全仓'),COLORRED;   
  39. STICKLINE(SCD AND SCA,20,80,0.1,0 ),COLOR00FF00;   
  40. DRAWTEXT(SCD AND SCA,50,'K.M卖'),COLORFF0000;   
  41. DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26);   
  42. DEA:=EMA(DIFF,9);   
  43. TJ1:=DIFF>DEA;   
  44. SA1:=DIFF<DEA;   
  45. RSV:=(CLOSE-LLV(LOW,12))/(HHV(HIGH,12)-LLV(LOW,12))*100;   
  46. K:=SMA(RSV,3,1);   
  47. D:=SMA(K,3,1);   
  48. TJ2:=K>D;   
  49. SA2:=K<D;   
  50. LC:=REF(CLOSE,1);   
  51. RSI1:=(SMA(MAX(CLOSE-LC,0),9,1))/(SMA(ABS(CLOSE-LC),9,1))*100;   
  52. RSI2:=(SMA(MAX(CLOSE-LC,0),26,1))/(SMA(ABS(CLOSE-LC),26,1))*100;   
  53. TJ3:=RSI1>RSI2;   
  54. SA3:=RSI1<RSI2;   
  55. LWR1:=SMA(RSV,3,1);   
  56. LWR2:=SMA(LWR1,3,1);   
  57. TJ4:=LWR1>LWR2;   
  58. SA4:=LWR1<LWR2;   
  59. BBI:=(MA(CLOSE,3)+MA(CLOSE,9)+MA(CLOSE,12)+MA(CLOSE,26))/4;   
  60. TJ5:=CLOSE>BBI;   
  61. SA5:=C<BBI;   
  62. MTM:=CLOSE-REF(CLOSE,1);   
  63. MMS:=100*EMA(EMA(MTM,9),9)/EMA(EMA(ABS(MTM),9),3);   
  64. MMM:=100*EMA(EMA(MTM,26),12)/EMA(EMA(ABS(MTM),26),12);   
  65. TJ6:=MMS>MMM;   
  66. SA6:=MMS<MMM;   
  67. TTJ:=TJ1 AND TJ2 AND TJ3 AND TJ4 AND TJ5 AND TJ6;   
  68. TTJ0:=FILTER(TTJ,13);   
  69. GOLD:=TTJ0;   
  70. STICKLINE(GOLD,20,30,4,0),COLOR009999;   
  71. STICKLINE(GOLD,20,30,2,0),COLOR00BBBB;   
  72. STICKLINE(GOLD,20,30,1,0),COLOR00DDDD;   
  73. STICKLINE(GOLD,10,30,0.3,0),COLOR00FFFF;   
  74. DRAWTEXT(GOLD,33,'金指'),COLOR00FFFF;   
  75. SAA:=SA1  AND SA2 AND SA3 AND SA4 AND SA5 AND SA6;   
  76. SAA0:=FILTER(SAA,13);   
  77. SAIL:=SAA0;   
  78. STICKLINE(SAIL,80,70,4,0),COLOR990000;   
  79. STICKLINE(SAIL,80,70,2,0),COLORBB0000;   
  80. STICKLINE(SAIL,80,70,1,0),COLORDD0000;   
  81. STICKLINE(SAIL,90,70,0.3,0),COLORFF0000;   
  82. DRAWTEXT(SAIL,75,'指卖'),COLORFF0000;   

 

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

 



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