通达信主力控盘副图 源码

 通达信主力控盘副图 源码

{牛牛指标网提供：www.tdx001.com}复制内容到剪贴板

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

201166881.png