通达信火龙珠通达信主图 源码

[复制链接]
查看215 | 回复0 | 2022-7-24 09:01:45 | 显示全部楼层 |阅读模式

 通达信火龙珠通达信主图 源码

{牛牛指标网提供:www.tdx001.com}复制内容到剪贴板
  1. {火龙珠主图源码}   
  2. A:=BARSCOUNT(C);   
  3. AH:=HHV(HIGH,120);   
  4. AL:=LLV(LOW,120);   
  5. B0:=(AH-AL)/40;   
  6. B1:=HIGH+B0;   
  7. B2:=LOW-B0;   
  8. AMV0:=((VOL * (((OPEN + CLOSE) + HIGH) + LOW)) / 4);   
  9. 势:=(EMA(AMV0,21) / EMA(VOL,21));   
  10. 压线:((6 * HHV(势,2)) - (5 * 势)),LINETHICK1,COLOREE8400;   
  11. I:=IF(CLOSE<REF(CLOSE,1),VOL/CAPITAL*10053,0);   
  12. 初晴:= ABS(EMA(I,13.3)-18)/WINNER(CLOSE)*IF((CLOSE-MA(CLOSE,6))/MA(CLOSE,6)<-0.04,1,0);   
  13. 黄点出低吸:IF(初晴,L*0.983,DRAWNULL),POINTDOT,COLOR00FFFF,LINETHICK5;   
  14. N1:=BARSCOUNT(5) ;   
  15. N:=((N1 - CURRBARSCOUNT ) + 1);   
  16. HH:=HHV(HIGH,N);   
  17. LL:=LLV(LOW,N);   
  18. 最高:=HHV(N1,1),POINTDOT;   
  19. 最低:=LLV(N1,1),COLOR00FFFF;   
  20. DIFF:=(EMA(CLOSE,5) - EMA(CLOSE,26));   
  21. DEA:=EMA(DIFF,3);   
  22. MACD:=(2 * (DIFF - DEA));   
  23. MA5:=MA(CLOSE,5);   
  24. MA20:=MA(CLOSE,20);   
  25. MA120:=MA(CLOSE,120);   
  26. AA10:=MA(CLOSE,10);   
  27. Y:=((LLV(LOW,1) = LLV(LOW,60)) AND ((CLOSE / REF(CLOSE,1)) > 1.04));   
  28. WX:=MA(CLOSE,0);   
  29. MB5:=(MA(CLOSE,15) * IF((20 < 5),WX,1));   
  30. MB7:=(MA(CLOSE,20) * IF((20 < 7),WX,1));   
  31. M5:=(MA(CLOSE,15) * IF((20 < 5),WX,1));   
  32. DDD:=(EMA(CLOSE,10) - EMA(CLOSE,100));   
  33. AMA:=EMA(DDD,4);   
  34. BMA:=(EMA(CLOSE,3) - EMA(CLOSE,30));   
  35. BMB:=EMA(BMA,4);   
  36. BMA1:=(EMA(CLOSE,13) - EMA(CLOSE,30));   
  37. SS:=(MA(CLOSE,8) * 0.998),COLORFFFFFF;   
  38. 买:=(DDD >= AMA AND BMA >= BMB);   
  39. HH1:=FILTER(((DDD >= AMA) AND (BMA >= BMB)),33);   
  40. DRAWICON(HH1,SS,6);   
  41. VARR1:=((SMA(MAX((CLOSE - REF(CLOSE,1)),0),12,1) / SMA(ABS((CLOSE - REF(CLOSE,1))),12,1)) * 100);   
  42. DRAWICON(CROSS(82,VARR1),(HIGH * 1.07),5);   
  43. VAR1:=REF(CLOSE,1);   
  44. VAR2:=((SMA(MAX((CLOSE - VAR1),0),12,1) / SMA(ABS((CLOSE - VAR1)),12,1)) * 100);   
  45. 顶部雷达:=(CROSS(80,VAR2) * 1);   
  46. 趋势线:=((3 * SMA((((CLOSE - LLV(LOW,28)) / (HHV(HIGH,28) - LLV(LOW,28))) * 100),5,1)) - (2 * SMA(SMA((((CLOSE - LLV(LOW,27)) / (HHV(HIGH,27) - LLV(LOW,27))) * 100),5,1),3,1)));   
  47. 短期乖离率:=(((CLOSE - MA(CLOSE,13)) / MA(CLOSE,13)) * 100);   
  48. DRAWTEXT(FILTER((IF(((CROSS(趋势线,10) AND ((CLOSE / LOW) > 1.04)) AND (短期乖离率 < 0.35)),1,0) AND (CLOSE > OPEN)),5),(LOW - 0.07),'底'),COLOR00FFFF;   
  49. VARA:=EMA(((AMOUNT / VOL) / 100),3);   
  50. D:=LLV(CLOSE,20);   
  51. XXY:=EMA(VARA,88);   
  52. XXD:=(XXY * 0.74);   
  53. DRAWTEXT(FILTER(((((((短期乖离率 < 6) AND (OPEN <= D)) AND (LOW <= XXD)) AND ((CLOSE / OPEN) > 1.03)) AND (CLOSE > REF(CLOSE,1))) AND ((CLOSE / LOW) > 1.03)),5),(LOW - (LOW * 0.09)),'★'),COLORFF00FF;   
  54. 均价:=((((HIGH + LOW) + OPEN) + CLOSE) / 4);   
  55. B:=((2 * EMA(LLV(均价,88),5)) - 均价);   
  56. 黄买:=((3 * B) - (2 * SMA(B,5,1))),COLORFF0033,LINETHICK1;   
  57. Y2:=DRAWTEXT(CROSS(CLOSE,黄买),L*0.97,'● '),COLORFF00FF;   
  58. DRAWTEXT(CROSS(CLOSE,黄买),L*0.97,'¤ '),COLORMAGENTA;   
  59. 黄点出买:=IF(Y2,L*0.97-0.01,DRAWNULL),CIRCLEDOT,COLOR00FFFF,LINETHICK2;   
  60. 买进价:=((C-REF(MA(C,55),1))/6+MA(C,55))*1.004;   
  61. 买进条件:=CROSS(C,买进价) AND 买进价>REF(买进价,1);   
  62. 买进:STICKLINE(买进条件,H,L,0,0),COLORMAGENTA,LINETHICK2;    
  63. STICKLINE(买进条件,O,C,3,0),COLORMAGENTA,LINETHICK2;   
  64. DRAWICON(买进条件,L*0.97,1),COLORRED;   
  65. KS:=(C-MA(C,33))/MA(C,33)*(-200);   
  66. RKS:=REF(KS,1);   
  67. FT:=RKS/KS>=1.23 AND RKS>=8 AND C/REF(C,1)>=1.03;   
  68. 反弹:STICKLINE(FT,H,L,0,1),COLORMAGENTA,LINETHICK2;    
  69. STICKLINE(FT,O,C,3,0),COLORYELLOW,LINETHICK2;   
  70. K1:=BACKSET(SS>=REF(SS,1),2),COLORFFFFCC,LINETHICK1;   
  71. 红线出买:IF(K1,SS, DRAWNULL),COLORRED,LINETHICK2;   
  72. K2:=BACKSET(SS<=REF(SS,1),2);   
  73. 弱:IF(K2,SS, DRAWNULL),COLORCYAN,LINETHICK2;   
  74. 粉点出买:IF(买,红线出买*0.988,DRAWNULL),POINTDOT,COLORFF66FF,LINETHICK5;   
  75. VAR10:=MA(C,80)-MA(C,10)/3;   
  76. VAR11:=REF(C,1);   
  77. VAR12:=SMA(MAX(C-VAR11,0),18,1)/SMA(ABS(C-VAR11),18,1)*100;   
  78. 高1:=REF(HHV(H,10),20);    
  79. 低1:=REF(LLV(L,10),20);   
  80. H1:=高1-(高1-低1)*0.191;    
  81. H2:=高1-(高1-低1)*0.382;    
  82. H3:=高1-(高1-低1)*0.5;    
  83. H4:=高1-(高1-低1)*0.618;    
  84. H5:=高1-(高1-低1)*0.809;   
  85. 顶:=REFDATE(高1,DATE),COLORWHITE;   
  86. 中线:REFDATE(H1,DATE),COLORYELLOW,POINTDOT;   
  87. 二:=REFDATE(H2,DATE),COLOR33FF33{ MAGENTA},POINTDOT;   
  88. 三:=REFDATE(H3,DATE),COLORLIGRAY;   
  89. 四:=REFDATE(H4,DATE),COLORRED;   
  90. 水平线:REFDATE(H5,DATE),COLORWHITE,POINTDOT;   
  91. 低:=REFDATE(低1,DATE),COLORYELLOW,POINTDOT;   
  92. DRAWTEXT( C=C AND CURRBARSCOUNT=50,中线+0.02,'中线'),COLORYELLOW;    
  93. DRAWTEXT( C=C AND CURRBARSCOUNT=20,水平线-0.02,' 水平线'),COLORFFFFCC;   
  94. KSS:=(C-MA(C,33))/MA(C,33)*(-200);   
  95. RKSS:=REF(KSS,1);   
  96. VAR101:=MA(C,80)-MA(C,10)/3;   
  97. VAR111:=REF(C,1);   
  98. VAR122:=SMA(MAX(C-VAR111,0),18,1)/SMA(ABS(C-VAR111),18,1)*100;   
  99. DRAWICON(CROSS(79,VAR12),H*1.035,2);   
  100. DRAWTEXT(CROSS(79,VAR122),H*1.04,' 抛↓'),COLOR33FF33;   
  101. {垂直1:=IF(CURRBARSCOUNT=0,REFDATE(HHV(H,240),DATE),DRAWNULL),STICK;   
  102. STICKLINE(低,HHV(H,240),LLV(L,240-239),0,0),STICK,COLORCYAN;}   

732522563.jpg

732522563.jpg

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则