通达信缠论分型分笔主图源码

[复制链接]
查看274 | 回复0 | 2022-7-24 08:56:49 | 显示全部楼层 |阅读模式

 通达信缠论分型分笔主图源码

牛牛指标网提供:www.tdx001.com}

C/C++ www.zegu.cn 择股网提供 Code复制内容到剪贴板
  1. 顶:=BBI+3*STD(BBI,13),COLOR004AFF;   
  2. 底:=BBI-3*STD(BBI,13),COLOR67FF00;   
  3. DRAWBAND(BBI,RGB(97,95,00),顶,RGB(97,95,00));   
  4. DRAWBAND(BBI,RGB(25,75,150),底,RGB(25,75,250));   
  5.   
  6. {MA1:MA(CLOSE,M1);   
  7. MA2:MA(CLOSE,M2),COLORGREEN;   
  8. MA3:MA(CLOSE,M3),COLORRED;   
  9. MA4:MA(CLOSE,M4),COLORYELLOW;}   
  10.   
  11. KU1:=IF(HIGH=HHV(HIGH,3),1,0);   
  12. KD1:=IF(LOW=LLV(LOW,3),1,0);   
  13. UL:=IF(REF(KU1,2)=1 AND REF(KU1,1)=0   
  14. AND KU1=0,REF(HIGH,2),REF(HIGH,2+BARSLAST(REF(KU1,2)=1   
  15. AND REF(KU1,1)=0 AND KU1=0)));   
  16. DL:=IF(REF(KD1,2)=1 AND REF(KD1,1)=0   
  17. AND KD1=0,REF(LOW,2),REF(LOW,2+BARSLAST(REF(KD1,2)=1   
  18. AND REF(KD1,1)=0 AND KD1=0)));   
  19. HV:=H>UL AND H>REF(H,1) ;   
  20. LV:=L<DL AND L<REF(L,1) ;   
  21. GP:=BARSLAST(HV);   
  22. DP:=BARSLAST(LV);   
  23. IP:=IF(GP=0,DP,GP)>3;   
  24. HHV1:=HV AND IP AND H>=HHV(H,BARSLAST(LV));   
  25. LV1:=LV AND IP AND L<=LLV(L,BARSLAST(HV));   
  26. DRAWLINE(LV1,LOW,HHV1, HIGH,0),COLORYELLOW,LINETHICK2;   
  27. DRAWLINE(HHV1,HIGH,LV1, LOW,0),COLORMAGENTA,LINETHICK2;   
  28.   
  29. STICKLINE(CLOSE> REF(CLOSE,1) ,HIGH,LOW,0,1 ),COLORRED;    
  30. STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,3,0 ),COLOR000055;   
  31. STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,2.7,0 ),COLOR000077;    
  32. STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,2.1,0 ),COLOR000099;   
  33. STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,1.5,0 ),COLOR0000BB;   
  34. STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,0.9,0 ),COLOR0000DD;   
  35. STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,0.3,0 ),COLOR0000FF;   
  36. STICKLINE(CLOSE= REF(CLOSE,1) ,HIGH,LOW,0,1 ),COLORWHITE;   
  37. STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,3,0 ),COLOR555555;   
  38. STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,2.7,0 ),COLOR777777;    
  39. STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,2.1,0 ),COLOR999999;   
  40. STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,1.5,0 ),COLORBBBBBB;   
  41. STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,0.9,0 ),COLORDDDDDD;   
  42. STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,0.3,0 ),COLORFFFFFF;   
  43. STICKLINE(CLOSE< REF(CLOSE,1) ,HIGH,LOW,0,1 ),COLORCYAN;   
  44. STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,3,0 ),COLOR990000;   
  45. STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,2.7,0 ),COLORCC0000;    
  46. STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,2.1,0 ),COLORFF4400;   
  47. STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,1.5,0 ),COLORFF8800;   
  48. STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,0.9,0 ),COLORFFCC00;   
  49. STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,0.3,0 ),COLORCYAN;   
  50.   
  51. {笔底分型 选股 预警 确保向下笔成立后的底分型}   
  52. V00:= HIGH<REF(HIGH,1) AND LOW<REF(LOW,1);   
  53. V01:= HIGH<REF(HIGH,1) AND LOW>REF(LOW,1);   
  54. V02:= HIGH>REF(HIGH,1) AND LOW<REF(LOW,1);   
  55. V03:= HIGH>REF(HIGH,1) AND LOW>REF(LOW,1);   
  56. V04:= REF(HIGH,2) < HIGH AND REF(LOW,2) < LOW   
  57. AND REF(HIGH,2) > REF(HIGH,1) AND REF(LOW,2) < REF(LOW,1);   
  58. V1:= COUNT(V00,6)>=3 AND COUNT(V01 OR V02,5)=0 AND LLVBARS(LOW,6) = 1 AND HHVBARS(HIGH,6) >= 5 AND V03;   
  59. V2:= COUNT(V00,7)>=3 AND COUNT(V01 OR V02,6)=1 AND LLVBARS(LOW,7) = 2 AND HHVBARS(HIGH,7) >= 6 AND V04;   
  60. V3:= COUNT(V00,7)>=3 AND COUNT(V01 OR V02,6)=1 AND LLVBARS(LOW,7) = 1 AND HHVBARS(HIGH,7) >= 6 AND V03;   
  61. V4:= COUNT(V00,8)>=3 AND COUNT(V01 OR V02,7)<=2 AND LLVBARS(LOW,8) = 2 AND HHVBARS(HIGH,8) >= 7 AND V04;   
  62. V5:= COUNT(V00,8)>=3 AND COUNT(V01 OR V02,7)<=2 AND LLVBARS(LOW,8) = 1 AND HHVBARS(HIGH,8) >= 7 AND V03;   
  63. V6:= COUNT(V00,9)>=3 AND COUNT(V01 OR V02,8)<=3 AND LLVBARS(LOW,9) = 2 AND HHVBARS(HIGH,9) >= 8 AND V04;   
  64. V7:= COUNT(V00,9)>=3 AND COUNT(V01 OR V02,8)<=3 AND LLVBARS(LOW,9) = 1 AND HHVBARS(HIGH,9) >= 8 AND V03;   
  65. V8:= COUNT(V00,10)>=3 AND COUNT(V01 OR V02,9)<=4 AND LLVBARS(LOW,10) = 2 AND HHVBARS(HIGH,10) >= 9 AND V04;   
  66. V9:= COUNT(V00,10)>=3 AND COUNT(V01 OR V02,9)<=4 AND LLVBARS(LOW,10) = 1 AND HHVBARS(HIGH,10) >= 9 AND V03;   
  67. V10:= COUNT(V00,11)>=3 AND COUNT(V01 OR V02,10)<=5 AND LLVBARS(LOW,11) = 2 AND HHVBARS(HIGH,11) >= 10 AND V04;   
  68. XG:= V1 OR V2 OR V3 OR V4 OR V5 OR V6 OR V7 OR V8 OR V9 OR V10;   
  69. DRAWICON(FILTER(XG=1,5),L*0.97,1);   
  70.   
  71. {笔顶分型 选股 预警 确保向上笔成立后的顶分型}   
  72. HV00:= HIGH>REF(HIGH,1) AND LOW>REF(LOW,1);   
  73. HV01:= HIGH<REF(HIGH,1) AND LOW>REF(LOW,1);   
  74. HV02:= HIGH>REF(HIGH,1) AND LOW<REF(LOW,1);   
  75. HV03:= HIGH<REF(HIGH,1) AND LOW<REF(LOW,1);   
  76. HV04:= REF(HIGH,2) > HIGH AND REF(LOW,2) > LOW AND REF(HIGH,2) > REF(HIGH,1) AND REF(LOW,2) < REF(LOW,1);   
  77. HV1:= COUNT(HV00,6)>=3 AND COUNT(HV01 OR HV02,5)=0 AND HHVBARS(HIGH,6) = 1 AND LLVBARS(LOW,6) >= 5 AND HV03;   
  78. HV2:= COUNT(HV00,7)>=3 AND COUNT(HV01 OR HV02,6)=1 AND HHVBARS(HIGH,7) = 2 AND LLVBARS(LOW,7) >= 6 AND HV04;   
  79. HV3:= COUNT(HV00,7)>=3 AND COUNT(HV01 OR HV02,6)=1 AND HHVBARS(HIGH,7) = 1 AND LLVBARS(LOW,7) >= 6 AND HV03;   
  80. HV4:= COUNT(HV00,8)>=3 AND COUNT(HV01 OR HV02,7)<=2 AND HHVBARS(HIGH,8) = 2 AND LLVBARS(LOW,8) >= 7 AND HV04;   
  81. HV5:= COUNT(HV00,8)>=3 AND COUNT(HV01 OR HV02,7)<=2 AND HHVBARS(HIGH,8) = 1 AND LLVBARS(LOW,8) >= 7 AND HV03;   
  82. HV6:= COUNT(HV00,9)>=3 AND COUNT(HV01 OR HV02,8)<=3 AND HHVBARS(HIGH,9) = 2 AND LLVBARS(LOW,9) >= 8 AND HV04;   
  83. HV7:= COUNT(HV00,9)>=3 AND COUNT(HV01 OR HV02,8)<=3 AND HHVBARS(HIGH,9) = 1 AND LLVBARS(LOW,9) >= 8 AND HV03;   
  84. HV8:= COUNT(HV00,10)>=3 AND COUNT(HV01 OR HV02,9)<=4 AND HHVBARS(HIGH,10) = 2 AND LLVBARS(LOW,10) >= 9 AND HV04;   
  85. HV9:= COUNT(HV00,10)>=3 AND COUNT(HV01 OR HV02,9)<=4 AND HHVBARS(HIGH,10) = 1 AND LLVBARS(LOW,10) >= 9 AND HV03;   
  86. HV10:= COUNT(HV00,11)>=3 AND COUNT(HV01 OR HV02,10)<=5 AND HHVBARS(HIGH,11) = 2 AND LLVBARS(LOW,11) >= 10 AND HV04;   
  87. HXG:=HV1 OR HV2 OR HV3 OR HV4 OR HV5 OR HV6 OR HV7 OR HV8 OR HV9 OR HV10;   
  88. DRAWICON(FILTER(HXG=1,3),H*1.01,2);  

5C11402724.png

5C11402724.png

回复

使用道具 举报

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

本版积分规则