大智慧【七种K线图】放在一图上可分可合 指标 源码[大智慧公式]

把我们日常需要看的七种K线图放在一图上可合可分方便得很，【0】成本波段K线图 【1】COST成本均线【2】CYC成本均线【23】普通MA均线【4】费氏MA成本均线【5】黄金分割【6】BOLL
这七种K线图是我们日常需要看的K线图，现在有了它不必东翻西找，一图在手改一下参数要合看，分开看，要对比一目了然起不方便，这才是人人需要宝贝呢，我发的图是基本【0】其它变化的就不必上图了



大智慧【七种K线图】放在一图上可合可分方便得很

1. INPUT:N(1,0,1),P(1,0,1),P1(1,0,1),M(1,0,1),Y(1,0,1),W(1,0,1);;
   
2. {K线}
   
3. STICKLINE(CLOSE>OPEN or CLOSE=OPEN and CLOSE>REF(CLOSE,1),LOW,HIGH,0.1,0),colorred;
   
4. STICKLINE(CLOSE>OPEN or CLOSE=OPEN and CLOSE>REF(CLOSE,1),OPEN,CLOSE,8,0),colorred;
   
5. STICKLINE(CLOSE<OPEN or CLOSE=OPEN and CLOSE<=REF(CLOSE,1),LOW,HIGH,0.1,0),colorcyan;
   
6. STICKLINE(CLOSE<OPEN or CLOSE=OPEN and CLOSE<=REF(CLOSE,1),OPEN,CLOSE,8,0),colorcyan;
   
7. STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,8,0 ),COLOR008800;
   
8. STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,6,0 ),COLOR00AA00;
   
9. STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,5,0 ),COLOR00BB00;
   
10. STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,4,0 ),COLOR00CC00;
    
11. STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,3,0 ),COLOR00DD00;
    
12. STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,2,0 ),COLOR00EE00;
    
13. STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1,0 ),COLOR00FF00;
    
14. STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,0,0 ),COLOR00FF00;
    
15. STICKLINE(CLOSE>OPEN,CLOSE,OPEN,8,0) ,COLOR000066;
    
16. STICKLINE(CLOSE>OPEN,CLOSE,OPEN,7,0) ,COLOR000088;
    
17. STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6,0) ,COLOR0000AA;
    
18. STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0) ,COLOR0000BB;
    
19. STICKLINE(CLOSE>OPEN,CLOSE,OPEN,4,0) ,COLOR0000CC;
    
20. STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0) ,COLOR0000DD;
    
21. STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0) ,COLOR0000EE;
    
22. STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0) ,COLOR0000FF;
    
23. STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0,0) ,COLOR0000FF;
    
24. {卖黄金,RSI=80}
    
25. LC:=REF(C,1);
    
26. 卖黄金:((SMA(MAX((C - LC),0),3,1) / SMA(ABS((C - LC)),3,1)) * 100),LINETHICK0;
    
27. STICKLINE(CROSS(80,卖黄金) AND C<O,H,L,2,0),COLOR00ffff,LAYER0;
    
28. STICKLINE(CROSS(80,卖黄金) AND C<O,C,O,9,0 ),COLOR007777,LAYER0;
    
29. STICKLINE(CROSS(80,卖黄金) AND C<O,C,O,8,0 ),COLOR009999,LAYER0;
    
30. STICKLINE(CROSS(80,卖黄金) AND C<O,C,O,6,0 ),COLOR00BBBB,LAYER0;
    
31. STICKLINE(CROSS(80,卖黄金) AND C<O,C,O,4,0 ),COLOR00DDDD,LAYER0;
    
32. STICKLINE(CROSS(80,卖黄金) AND C<O,C,O,2 ,0 ),COLOR00ffff,LAYER0;
    
33. Y5:EMA(CYC(3),5),COLORFFFFFF,LINETHICK1;
    
34. PARTLINE(Y5 ,(Y5>REF(Y5,1))-1,rgb(0,255,0),1,rgb(255,0,0) ),LINETHICK2,LAYER0;
    
35. IF N=1 THEN BEGIN
    
36. {1.成本线A}
    
37. CYC1:COST(1),COLORFF66CC;
    
38. CYC5:COST(5),COLORFF00CC;
    
39. CYC13:COST(13),COLOR00CCCC;
    
40. CYC34:COST(34),COLOR00DEEE;
    
41. CYC55:COST(55),COLOR00ACCC,LINETHICK2;
    
42. CYC79:COST(79),COLORAACC22;
    
43. CYC95:COST(95),COLORGREEN;
    
44. END
    
45. IF P=1 THEN BEGIN
    
46. {2.成本线B}
    
47. cyc5B:CYC(5),DOTLINE;
    
48. cyc13B:cyc(13),DOTLINE;
    
49. cyc34B:cyc(34),DOTLINE;
    
50. cyc55B:cyc(55),DOTLINE;
    
51. cyc89B:cyc(89),DOTLINE;
    
52. cyc144B:cyc(144),DOTLINE;
    
53. cyc0B:MAXCYC,colorff9900,DOTLINE;
    
54. END
    
55. {3.均线A}
    
56. IF P1=1 THEN BEGIN
    
57. MA5:MA(CLOSE,5),COLOR0000ff;
    
58. MA10:MA(CLOSE,10),COLOR00ffff;
    
59. MA20:MA(CLOSE,20),COLORff00ff;
    
60. MA30:MA(CLOSE,30),COLORff99ff;
    
61. MA60:MA(CLOSE,60),COLOR00ff00;
    
62. MA120:MA(CLOSE,120),COLORff9900;
    
63. END
    
64. {4.均线B}
    
65. IF M=1 THEN BEGIN
    
66. MA3B:MA(CLOSE,3);
    
67. MA5B:MA(CLOSE,5);
    
68. MA8B:MA(CLOSE,8);
    
69. MA13B:MA(CLOSE,13);
    
70. MA21B:MA(CLOSE,21);
    
71. MA34B:MA(CLOSE,34);
    
72. MA55B:MA(CLOSE,55);
    
73. MA89B:MA(CLOSE,89);
    
74. MA144B:MA(CLOSE,144);
    
75. 
    
76. END
    
77. {5.黄金比}
    
78. IF Y=1 THEN BEGIN
    
79. X:=BARSLAST(DISPSTATUS=1)+1;
    
80. ah:=hhvall(hhv(h,X));
    
81. al:=llvall(llv(l,X));
    
82. nnl:=DISPSTATUS=2;
    
83. ahl:=ah-al;
    
84. q191:=al+ahl*0.191;
    
85. q382:=al+ahl*0.382;
    
86. q500:=al+ahl*0.500;
    
87. q618:=al+ahl*0.618;
    
88. q809:=al+ahl*0.809;
    
89. 
    
90. DRAWTEXT(nnl,ah,'￣￣￣￣￣￣￣￣￣￣￣￣'),ALIGN1,COLOR0000ff;
    
91. DRAWTEXT(nnl,q809,'￣￣￣￣￣￣￣￣￣￣￣'),ALIGN1,COLORddaa00;
    
92. DRAWTEXT(nnl,q618,'￣￣￣￣￣￣￣￣￣￣￣'),ALIGN1,COLORddaa00;
    
93. DRAWTEXT(nnl,q500,'￣￣￣￣￣￣￣￣￣￣￣'),ALIGN1,COLOR00ffff;
    
94. DRAWTEXT(nnl,q382,'￣￣￣￣￣￣￣￣￣￣￣'),ALIGN1,COLORddaa00;
    
95. DRAWTEXT(nnl,q191,'￣￣￣￣￣￣￣￣￣￣￣'),ALIGN1,COLORddaa00;
    
96. DRAWTEXT(nnl,al,'￣￣￣￣￣￣￣￣￣￣￣￣'),ALIGN1,COLOR00ff00;
    
97. 
    
98. DRAWTEXT(nnl,ah*0.998,'最高.'+ah+''),ALIGN0,Color0047FF,LINETHICK1;
    
99. DRAWTEXT(nnl,q809,'80.9%.' +q809+''),ALIGN0,Color00FFff,LINETHICK1;
    
100. DRAWTEXT(nnl,q618,'61.8%.'+q618+''),ALIGN0,Color0047FF,LINETHICK1;
     
101. DRAWTEXT(nnl,q500,'50%.'+q500+''),ALIGN0,Color00FFff,LINETHICK1;
     
102. DRAWTEXT(nnl,q382,'38.2%.'+q382+''),ALIGN0,Color0047FF,LINETHICK1;
     
103. DRAWTEXT(nnl,q191,'19.1%.'+q191+''),ALIGN0,Color00FFff,LINETHICK1;
     
104. DRAWTEXT(nnl,al*1.01,'最低.'+al+''),ALIGN0,VALIGN2,Color0047FF,LINETHICK1;
     
105. END;
     
106. IF W=1 THEN BEGIN
     
107. {6.BOLL}
     
108. BBI:=(3*C+H+L)/5;
     
109. MID:EMA(BBI,26),COLOR00ff00,DOTLINE;
     
110. UPPER:MID+2*STD(BBI,26),COLORRED,DOTLINE;
     
111. LOWER:MID-2*STD(BBI,26),COLORFF9900,DOTLINE;
     
112. END;

复制代码