通达信买点共振的指标副图 源码

1. RV:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;   
2. RG:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100;   
3. J0:=(HIGH+LOW)/2;QJ:=EMA(J0,3);   
4. J1:=IF(CLOSE>QJ,VOL,0);   
5. J2:=IF(CLOSE<QJ,VOL,0);   
6. 量能:IF(CAPITAL<1,MA(VOL,74),MA(SUM(J1-J2,22),3)),COLOR00DDDD,NODRAW;   
7. 趋势:IF(CAPITAL<1,EMA(量能,360),EMA(量能,21)),COLOR008800,NODRAW;   
8. VAR3:=(量能-趋势);   
9. VAR44:=SMA(RV,3,1);   
10. VAR55:=SMA(VAR44,3,1);   
11. STICKLINE(VAR3>0,20,10,5,1),COLOR0000FF;   
12. STICKLINE(VAR3<0,100,90,10,1),COLOR00FF00;   
13. DRAWICON(CROSS(VAR44,VAR55) AND VAR55<30,2,1);   
14. DRAWICON(CROSS(VAR55,VAR44) AND VAR55>30,97,2);   
15. DRAWBAND(VAR55,RGB(0,22,224),VAR44,RGB(255,50,50));   
16. KK:EMA(SMA(RG,3,1),2),COLORFFFFFF;DD:SMA(KK,3,1),COLOR00FFFF;   
17. DRAWTEXT(CROSS(VAR44,VAR55) AND CROSS(KK,DD),10,'共振'),COLOR00FFFF;   
18. 共振点:=(CROSS(VAR44,VAR55) AND CROSS(KK,DD));   
19. STICKLINE(共振点>0,0,100,2,0),COLOR008888;   
20. STICKLINE(共振点>0,0,100,1.5,0),COLOR00AAAA;   
21. STICKLINE(共振点>0,0,100,0.8,0),COLOR00DDDD;   
22. STICKLINE(共振点>0,0,100,0.3,0),COLOR00FFFF;   
23. VAR1:=1;   
24. VAR2:=((((2*CLOSE)+HIGH)+LOW) / 4);   
25. 低金叉进:20,COLORFF00FF,LINETHICK2;   
26. 高死叉出:90,COLORBLUE,LINETHICK2;   
27. VAR4:=LLV(LOW,5);   
28. VAR5:=HHV(HIGH,4);   
29. C1:=(EMA((((VAR2-VAR4)/(VAR5-VAR4))*100),4)*VAR1),COLORFF00FF,LINETHICK2;   
30. C2:=(EMA(((0.667*REF(C1,1))+(0.333*C1)),2)*VAR1),COLORFFFFFF,LINETHICK2;   
31. 条件:=CROSS(C1,C2) AND C1<40;   
32. 条件0:=CROSS(C2,C1) AND C1>90;   
33. TJ1:=CROSS(C1,C2);   
34. TJ2:=CROSS(C2,C1);   
35. TJ3:=CROSS(C1,C2) AND REF(C1,1)<20;   
36. TJ4:=CROSS(C2,C1) AND REF(C1,1)>80;   
37. DRAWTEXT(FILTER((REF(条件,1) AND (REF(LOW,1)>LOW OR TJ2))   
38. OR (REF(条件,2) AND (REF(LOW,2)>LLV(LOW,3) OR TJ2))   
39. OR (REF(条件,3) AND (REF(LOW,3)>LLV(LOW,4) OR TJ2)),4),70,'止'),COLORRED;   
40. {DRAWTEXT(FILTER((REF(条件,1) AND (REF(LOW,1)>LOW OR TJ2))   
41. OR (REF(条件,2) AND (REF(LOW,2)>LLV(LOW,3) OR TJ2))   
42. OR (REF(条件,3) AND (REF(LOW,3)>LLV(LOW,4) OR TJ2)),4),60,'跌'),COLORRED;}   
43. DRAWTEXT(FILTER((REF(条件,1) AND (REF(LOW,1)>LOW OR TJ2)) OR   
44. (REF(条件,2) AND (REF(LOW,2)>LLV(LOW,3) OR TJ2))   
45. OR (REF(条件,3) AND (REF(LOW,3)>LLV(LOW,4) OR TJ2)),4),65,'买'),COLORRED;    
46. DRAWTEXT(条件,20,'买'),COLORRED;   
47. STICKLINE(条件,0,20,2,0),COLORRED;   
48. DRAWTEXT(条件0,85,'卖'),COLORBLUE;   
49. DRAWTEXT(CROSS(C1,75),70,'险区'),COLORGREEN;   
50. DRAWTEXT(TJ3,65,'安'),COLORRED;   
51. DRAWTEXT(TJ3,60,'买'),COLORRED;   
52. DRAWTEXT(TJ4,85,'逃顶'),COLORBLUE;   
53. STICKLINE(TJ4,100,80,2,0),COLORGREEN;   
54.   
55. VAR200:=(CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))*100;   
56. VAR300:=SMA(SMA(VAR200,3,1),3,1)/28.57;   
57. VAR400:=EMA(VAR300,5);   
58. 操盘:=3*VAR300-2*VAR400;   
59. A1:=CROSS(操盘,VAR300) AND VAR300<2.1 AND C>O;   
60. STICKLINE(A1,30,0,4,0),COLOR770077;   
61. STICKLINE(A1,30,0,3,0),COLOR990099;   
62. STICKLINE(A1,30,0,2,0),COLORBB00BB;   
63. STICKLINE(A1,30,0,1,0),COLORDD00DD;   
64. STICKLINE(A1,30,0,0.3,0),COLORFF00FF;   
65. DRAWTEXT(A1,36,'财神到'),COLORRED;