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

以下是通达信斋主交响乐源码(无源码的请下载附件导入)

 通达信斋主交响乐源码

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

  1. 玄:=1+(BARSLAST(YEAR!=REF(YEAR,1) OR DATETODAY(DATE)=1));   
  2. 悟斋:=IF(PERIOD=5,玄,DRAWNULL);   
  3. 主:=LLV(L,悟斋);   
  4. 底:CONST(主),NODRAW,COLOR00FF00;   
  5. RC:=底;   
  6. {MACD}   
  7. DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26),COLORBLACK;   
  8. DIFFA:=(RC+DIFF*3);   
  9. DEA:=EMA(DIFF,9),COLORMAGENTA;   
  10. DEAA:=(RC+DEA*3);   
  11. LC:=REF(C,1);   
  12. MA5:=MA(C,5);   
  13. K:=BARSLAST(CURRBARSCOUNT=250);   
  14. 高1:=CONST(IF(ISLASTBAR=1,HHV(H,K),0));   
  15. 低0:=CONST(IF(ISLASTBAR=1,LLV(L,K),0)),COLOR00FF00;   
  16. KJ:=高1-低0;   
  17. GD4:=IF(CURRBARSCOUNT<=250/2,高1,DRAWNULL);   
  18. 高压:=IF(1=1,低0+KJ*0.873,DRAWNULL),COLOR0000FF,NODRAW;   
  19. 压力:=IF(1=1,低0+KJ*0.809,DRAWNULL),COLORFF00FF,NODRAW;   
  20. 上中:=IF(1=1,低0+KJ*0.618,DRAWNULL),COLORMAGENTA,NODRAW;   
  21. 中线:=IF(1=1,低0+KJ/2,DRAWNULL),COLORCCCCCC,POINTDOT;   
  22. 下中:=IF(1=1,低0+KJ*0.382,DRAWNULL),COLORMAGENTA,NODRAW;   
  23. 支撑:=IF(1=1,低0+KJ*0.191,DRAWNULL),COLORFFAA00,NODRAW;   
  24. 超跌:=IF(1=1,低0+KJ*0.127,DRAWNULL),COLORFFAA00,;   
  25. STICKLINE(1=1,GD4,高压,10,0),COLOR330000;   
  26. STICKLINE(1=1,高压,压力,10,0),COLORAA0000;   
  27. STICKLINE(1=1,压力,上中,10,0),COLOR990000;   
  28. STICKLINE(1=1,上中,下中,10,0),COLOR770000;   
  29. STICKLINE(1=1,下中,支撑,10,0),COLOR550000;   
  30. STICKLINE(1=1,支撑,低0,10,0),COLOR110000;   
  31. MACD:=(DIFF-DEA)*4;   
  32. STICKLINE(MACD>0,RC,RC+MACD,1,0),COLORRED;   
  33. STICKLINE(MACD<0,RC,RC+MACD,1,1),COLOR008000;   
  34. STICKLINE(MACD>0 AND MACD<REF(MACD,1),RC,RC+MACD,1,1),COLORFF00AA;   
  35. STICKLINE(MACD<0 AND MACD>REF(MACD,1),RC,RC+MACD,1,0),COLOR889900;   
  36. HH:=HHV(HIGH,5);   
  37. LL:=LLV(LOW,5);   
  38. HH1Z:=BARSLAST((HH > REF(HH,1)));   
  39. LL1Z:=BARSLAST((LL < REF(LL,1)));   
  40. STICKLINE((HH1Z < LL1Z),CLOSE,OPEN,3,0),COLORRED;   
  41. STICKLINE((HH1Z < LL1Z),HIGH,LOW,0,0),COLORRED;   
  42. STICKLINE((HH1Z > LL1Z),CLOSE,OPEN,3,0),COLORBLUE;   
  43. STICKLINE((HH1Z > LL1Z),HIGH,LOW,0,0),COLORBLUE;   
  44. 黄金分割中线:IF(1=1,低0+KJ/2,DRAWNULL),COLORYELLOW,POINTDOT,LINETHICK4;   
  45. 卖:MA5*1.1,LINETHICK2,COLORGREEN;   
  46. 高:MA5*1.05,LINETHICK1,COLORCYAN;   
  47. 中:MA5,LINETHICK2,COLORYELLOW;   
  48. 低:MA5*0.945,LINETHICK1,COLORMAGENTA;   
  49. 买:MA5*0.88,LINETHICK2,COLORRED;   
  50. STICKLINE(C>LC AND C>O,H,H*0.92,0,0),COLORFFFFFF;   
  51. STICKLINE(C>LC AND C>O AND C>高,H,H*0.9,0,0),COLORFFFFFF;   
  52. STICKLINE(1=1,H,L,0,0),COLORFFFFFF;   
  53. STICKLINE(C<LC AND C<O,L,L*1.08,0,0),COLORFFFFFF;   
  54. STICKLINE(C<LC AND C<O AND C<低,L,L*1.1,0,0),COLORFFFFFF;   
  55. IF(C>=LC AND C>O,H,DRAWNULL),POINTDOT,LINETHICK9,COLOR000099;   
  56. IF(C>=LC AND C<O,L*0.98,DRAWNULL),POINTDOT,LINETHICK9,COLORFF5500;   
  57. IF(C<=LC AND C<O,L,DRAWNULL),POINTDOT,LINETHICK9,COLORFF5500;   
  58. IF(C<=LC AND C>O,H*0.995,DRAWNULL),POINTDOT,LINETHICK9,COLORFF5500;   
  59. IF(C<=MA5*0.945,L*1.03,DRAWNULL),POINTDOT,LINETHICK9,COLORFFFF00;   
  60. IF(C<=MA5*0.945,L,DRAWNULL),POINTDOT,LINETHICK9,COLORFFFF00;   
  61. IF(C<=买 AND C<O,L*1.03,DRAWNULL),POINTDOT,LINETHICK9,COLOR00FF00;   
  62. IF(C<=买 AND C<O,L,DRAWNULL),POINTDOT,LINETHICK7,COLOR00FA00;   
  63. IF(C>=MA5*1.05 AND L>MA5*0.945,H*0.97,DRAWNULL),POINTDOT,LINETHICK9,COLOR0000FF;   
  64. IF(C>=MA5*1.05 AND L>MA5*0.945,H,DRAWNULL),POINTDOT,LINETHICK9,COLOR0000FF;   
  65. IF(C>=MA5*1.1,H*0.97,DRAWNULL),POINTDOT,LINETHICK9,COLOR00CCFF;   
  66. IF(C>=MA5*1.1,H,DRAWNULL),POINTDOT,LINETHICK9,COLOR00CCFF;   
  67. IF(FILTER(C<MA5*0.945,10),H*1.25,DRAWNULL),POINTDOT,LINETHICK5,COLORAA0000;   
  68. IF(FILTER(C<MA5*0.945,10),H*1.25,DRAWNULL),POINTDOT,LINETHICK3,COLOR00CCFF;   
  69. DRAWTEXT(FILTER(C<MA5,30),卖,'降调出'),COLORGREEN;   
  70. RSV:=(CLOSE - LLV(LOW,18))/(HHV(HIGH,18) - LLV(LOW,18))*100;   
  71. KZ:=EMA(RSV,3);   
  72. DZ:=EMA(KZ,3);   
  73. JZ:=(3*KZ-2*DZ);   
  74. KDJ1:=REF(COUNT(JZ<REF(JZ,1),5)>=3,1) AND REF(JZ,1)<20;   
  75. KDJ2:=JZ>REF(JZ,1);   
  76. 反转:=IF(FILTER(KDJ1 AND KDJ2,3),50,0),COLORRED;   
  77. VAR22:=REF(LOW,1);   
  78. VAR33:=SMA(ABS(LOW-VAR22),3,1)/SMA(MAX(LOW-VAR22,0),3,1)*100;   
  79. VAR44:=EMA(IF(CLOSE*1.3,VAR33*10,VAR33/10),3);   
  80. VAR55:=LLV(LOW,13);   
  81. VAR66:=HHV(VAR44,13);   
  82. VAR77:=IF(MA(CLOSE,34),1,0);   
  83. VAR888:=EMA(IF(LOW<=VAR55,(VAR44+VAR66*2)/2,0),3)/618*VAR77;   
  84. VAR999:=IF(VAR888>100,100,VAR888);   
  85. 吸筹:=VAR999,LINETHICK1,COLORCD7F32 ;   
  86. HHZ:=CONST(HHV(C,120))*1;   
  87. LLZ:=CONST(LLV(C,120))*1;   
  88. HL:=CONST(IF(CONST((HHZ+LLZ)/2)<CONST(C),LLZ-(HHZ-LLZ)*0.4,HHZ+(HHZ-LLZ)*0.4));   
  89. HH1:=IF(CONST((HHZ+LLZ)/2)>CONST(C),HHZ,HL);   
  90. LL1:=IF(CONST((HHZ+LLZ)/2)<CONST(C),LLZ,HL);   
  91. HLMAX:=MAX(HH1,LL1);   
  92. HLMIN:=MIN(HH1,LL1);   
  93. HLMN1:=(HLMAX+HLMIN)/2;   
  94. HLMN2:=HLMAX-HLMIN;   
  95. HLMN3:=(100-0)/2;   
  96. HLMN4:=100-0;   
  97. STICKLINE(吸筹,(0-50)*HLMN2/100+HLMN1,   
  98. (VAR999-50)*HLMN2/100+HLMN1,2,10),COLORFF00FF;    
  99. STICKLINE(JZ<=0,(90-50)*HLMN2/100+HLMN1,   
  100. (100-50)*HLMN2/100+HLMN1,4,0),COLORYELLOW;   
  101. IF(反转=50,(50-50)*HLMN2/100+HLMN1,   
  102. (0-50)*HLMN2/100+HLMN1),COLORRED;   
  103. K1:(KZ-50)*HLMN2/100+HLMN1,COLORFFFFFF;   
  104. D1:(DZ-50)*HLMN2/100+HLMN1,COLOR00FFFF;   
  105. J1:(JZ-50)*HLMN2/100+HLMN1,COLOR00FF00;   
  106. A5:=EMA(CLOSE,12)-EMA(CLOSE,26);   
  107. A6:=EMA(A5,9);   
  108. A7:=(A5<-0.1 AND A5>A6);   
  109. 财神:IF(A7,LLV(L,21),DRAWNULL),COLORYELLOW,CIRCLEDOT,LINETHICK5;   
  110. VAR326:=IF(CLOSE>REF(CLOSE,1),88,0);   
  111. VAR327:=IF(CLOSE/REF(CLOSE,1)>1.050     AND HIGH/CLOSE<1.010 AND VAR326>0, 91, 0);   
  112. STICKLINE(VAR327>90,L*0.99,L*0.94,2,0),COLORMAGENTA;   
  113. DRAWTEXT(VAR327>90,LOW*0.93,'升调追涨'),COLORMAGENTA;   

斋主交响乐 (源码)



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