通达信主力控盘 源码

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

 通达信主力控盘 源码

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

复制内容到剪贴板
  1. VAR1:=EMA(EMA(CLOSE,3),1);   
  2. VAR2:=(((CLOSE - MA(CLOSE,6)) / MA(CLOSE,6)) * 100);   
  3. VAR3:=(((CLOSE - MA(CLOSE,12)) / MA(CLOSE,12)) * 100);   
  4. VAR4:=(((CLOSE - MA(CLOSE,33)) / MA(CLOSE,33)) * 100);   
  5. VAR5:=(((VAR2 + (2 * VAR3)) + (3 * VAR4)) / 6);   
  6. VAR6:=MA(VAR5,3);   
  7. 开始控盘:=STICKLINE((VAR6 <= (0 - 10)),0,(0 - 20),3.5,0),COLOR00AAFF;   
  8. STICKLINE((VAR6 <= (0 - 10)),0,(0 - 20),3.5,0),COLOR0044FF;   
  9. STICKLINE((VAR6 <= (0 - 10)),0,(0 - 20),2.5,0),COLOR0088FF;   
  10. STICKLINE((VAR6 <= (0 - 10)),0,(0 - 20),3,0),COLOR00AAFF;   
  11.   
  12. 控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;   
  13. STICKLINE(控盘<0,控盘,0,3.5,0),COLORFFAA00;   
  14. STICKLINE(控盘<0,控盘,0,3.5.2,0),COLORFF4400;   
  15. STICKLINE(控盘<0,控盘,0,2.5,0),COLORFF8800;   
  16. STICKLINE(控盘<0,控盘,0,0,0),COLORFFAA00;   
  17. 主力出货:0,COLORFFAA00;   
  18. STICKLINE(控盘>REF(控盘,3) AND 控盘>0,控盘,0,3.5,0),COLOR000088;   
  19. STICKLINE(控盘>REF(控盘,3) AND 控盘>0,控盘,0,2.5,0),COLOR0000AA;   
  20. STICKLINE(控盘>REF(控盘,3) AND 控盘>0,控盘,0,1.5,0),COLOR0000CC;   
  21. STICKLINE(控盘>REF(控盘,3) AND 控盘>0,控盘,0,1,0),COLOR0000EE;   
  22. 主力吸货:0,COLOR0000FF;   
  23. STICKLINE(控盘<REF(控盘,3) AND 控盘>0,控盘,0,3.5,0),COLOR008800;   
  24. STICKLINE(控盘<REF(控盘,3) AND 控盘>0,控盘,0,2.5,0),COLOR00AA00;   
  25. STICKLINE(控盘<REF(控盘,3) AND 控盘>0,控盘,0,1.5,0),COLOR00CC00;   
  26. STICKLINE(控盘<REF(控盘,3) AND 控盘>0,控盘,0,1,0),COLOR00EE00;   
  27. STICKLINE(DDX<0,0,DDX,3.5,0),COLOR008800;   
  28. STICKLINE(DDX<0,0,DDX,2.5,0),COLOR00AA00;   
  29. STICKLINE(DDX<0,0,DDX,1.5,0),COLOR00CC00;   
  30. STICKLINE(DDX<0,0,DDX,1,0),COLOR00EE00;   
  31. 对倒出货洗盘:0,COLOR00FF00;   
  32. 黄色底部吸货:0,COLORYELLOW;   
  33.   
  34.   
  35.   
  36. DRAWTEXT(CROSS(控盘,0),0-3,'买追'),COLORFF00FF;   
  37. DRAWTEXT(CROSS(0,控盘),0-0,'卖'),COLORGREEN;   
  38. DATA:=5;   
  39. {多头买入} DRAWICON(ZIG(3,DATA)>REF(ZIG(3,DATA),1)    
  40. AND REF(ZIG(3,DATA),1)<=REF(ZIG(3,DATA),2)    
  41. AND REF(ZIG(3,DATA),2)<=REF(ZIG(3,DATA),3),L*0.98,1);   
  42. {多头卖出} DRAWICON(ZIG(3,DATA)<REF(ZIG(3,DATA),1)    
  43. AND REF(ZIG(3,DATA),1)>=REF(ZIG(3,DATA),2)    
  44. AND REF(ZIG(3,DATA),2)>=REF(ZIG(3,DATA),3),H*1.02,2);   

E07436268.jpg

E07436268.jpg

回复

使用道具 举报

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

本版积分规则