Pivot跟ZigZag比較

zaqimon

我不確定這東西是不是叫做Pivot
反正就是N bar H/L Peak轉折點的連線
(Pivot好像也可以指轉折價位的意思)
不確定能用來幹麼

這張圖是黃色PivotLine(3 bar)跟紫色ZigZag(1%)的比較


以下是程式碼

1. SetBarsRequired(100); // may be needed
   
2. 
   
3. n_bar = Param("N bar", 7, 3, 39, 2);
   
4. 
   
5. n_bar = (n_bar-1)/2;
   
6. 
   
7. // use loop scoring method instead of look-around at each bar
   
8. 
   
9. ScoreUp = 0;
   
10. for(cnt=-n_bar; cnt<=n_bar; cnt++)
    
11. {
    
12.     if(cnt==0) continue; // no need compare same bar
    
13.     for(i=n_bar; i<BarCount-n_bar; i++)
    
14.     {
    
15.         if(H[i]>H[i+cnt])
    
16.         {
    
17.             ScoreUp[i] += 1;
    
18.         }
    
19.         // special case, same value when cnt<0, replicate previous bar's ScoreUp
    
20.         else if(H[i]==H[i+cnt])
    
21.         {
    
22.             if(cnt<0)
    
23.             {
    
24.                 ScoreUp[i] = ScoreUp[i-1];
    
25.             }
    
26.         }
    
27.     }
    
28. }
    
29. ScoreDn = 0;
    
30. for(cnt=-n_bar; cnt<=n_bar; cnt++)
    
31. {
    
32.     if(cnt==0) continue; // no need compare same bar
    
33.     for(i=n_bar; i<BarCount-n_bar; i++)
    
34.     {
    
35.         if(L[i]<L[i+cnt])
    
36.         {
    
37.             ScoreDn[i] += 1;
    
38.         }
    
39.         // special case, same value when cnt<0, replicate previous bar's ScoreDn
    
40.         else if(L[i]==L[i+cnt])
    
41.         {
    
42.             if(cnt<0)
    
43.             {
    
44.                 ScoreDn[i] = ScoreDn[i-1];
    
45.             }
    
46.         }
    
47.     }
    
48. }
    
49. 
    
50. // filter pivot point and connect with LineArray()
    
51. 
    
52. prev_up_x = Null;
    
53. prev_up_y = Null;
    
54. prev_dn_x = Null;
    
55. prev_dn_y = Null;
    
56. curr_state = 0; // 0: init, 1: up, -1: down
    
57. PivotLine = Null;
    
58. 
    
59. for(i=n_bar; i<BarCount-n_bar; i++)
    
60. {
    
61.     LA_update = false;
    
62.     // rare case, single bar Up/Dn pivot, (I prioritize to) extend curr_state direction
    
63.     if(ScoreUp[i]==n_bar*2 && ScoreDn[i]==n_bar*2)
    
64.     {
    
65.         if(curr_state==1)
    
66.         {
    
67.             if(H[i]>prev_up_y)
    
68.             {
    
69.                 LA = LineArray(prev_dn_x, prev_dn_y, i, H[i]);
    
70.                 LA_update = true;
    
71.                 prev_up_x = i;
    
72.                 prev_up_y = H[i];
    
73.             }
    
74.         }
    
75.         else if(curr_state==-1)
    
76.         {
    
77.             if(L[i]<prev_dn_y)
    
78.             {
    
79.                 LA = LineArray(prev_up_x, prev_up_y, i, L[i]);
    
80.                 LA_update = true;
    
81.                 prev_dn_x = i;
    
82.                 prev_dn_y = L[i];
    
83.             }
    
84.         }
    
85.         else // 0: init, (I choose to) change curr_state to 1
    
86.         {
    
87.             curr_state = 1;
    
88.             prev_up_x = i;
    
89.             prev_up_y = H[i];
    
90.             // also give down pivot value, this init value is not a big deal
    
91.             prev_dn_x = i;
    
92.             prev_dn_y = L[i];
    
93.         }
    
94.     }
    
95.     else
    
96.     {
    
97.         if(ScoreUp[i]==n_bar*2) // up pivot
    
98.         {
    
99.             if(curr_state==1) // state extend
    
100.             {
     
101.                 if(H[i]>prev_up_y)
     
102.                 {
     
103.                     LA = LineArray(prev_dn_x, prev_dn_y, i, H[i]);
     
104.                     LA_update = true;
     
105.                     prev_up_x = i;
     
106.                     prev_up_y = H[i];
     
107.                 }
     
108.             }
     
109.             else if(curr_state==-1) // state change
     
110.             {
     
111.                 curr_state = 1;
     
112.                 LA = LineArray(prev_dn_x, prev_dn_y, i, H[i]);
     
113.                 LA_update = true;
     
114.                 prev_up_x = i;
     
115.                 prev_up_y = H[i];
     
116.             }
     
117.             else // 0: init
     
118.             {
     
119.                 curr_state = 1;
     
120.                 prev_up_x = i;
     
121.                 prev_up_y = H[i];
     
122.                 // also give down pivot value, this init value is not a big deal
     
123.                 prev_dn_x = i;
     
124.                 prev_dn_y = L[i];
     
125.             }
     
126.         }
     
127.         else if(ScoreDn[i]==n_bar*2) // down pivot
     
128.         {
     
129.             if(curr_state==-1) // state extend
     
130.             {
     
131.                 if(L[i]<prev_dn_y)
     
132.                 {
     
133.                     LA = LineArray(prev_up_x, prev_up_y, i, L[i]);
     
134.                     LA_update = true;
     
135.                     prev_dn_x = i;
     
136.                     prev_dn_y = L[i];
     
137.                 }
     
138.             }
     
139.             else if(curr_state==1) // state change
     
140.             {
     
141.                 curr_state = -1;
     
142.                 LA = LineArray(prev_up_x, prev_up_y, i, L[i]);
     
143.                 LA_update = true;
     
144.                 prev_dn_x = i;
     
145.                 prev_dn_y = L[i];
     
146.             }
     
147.             else // 0: init
     
148.             {
     
149.                 curr_state = -1;
     
150.                 prev_dn_x = i;
     
151.                 prev_dn_y = L[i];
     
152.                 // also give up pivot value, this init value is not a big deal
     
153.                 prev_up_x = i;
     
154.                 prev_up_y = H[i];
     
155.             }
     
156.         }
     
157.     }
     
158.     if(LA_update) // update PivotLine array when needed
     
159.     {
     
160.         PivotLine = IIf(IsNull(LA), PivotLine, LA);
     
161.     }
     
162. } // END for
     
163. 
     
164. // show pivot point, ScoreXx == n_bar*2
     
165. if(ParamToggle("Show Pivot?","No|Yes",1))
     
166. {
     
167.     PlotShapes(IIf(ScoreUp==n_bar*2, shapeSmallCircle, shapeNone), colorBrightGreen, 0, H, 12);
     
168.     PlotShapes(IIf(ScoreDn==n_bar*2, shapeSmallCircle, shapeNone), colorRed, 0, L, -12);
     
169. }
     
170. 
     
171. Plot( PivotLine, "", ParamColor("Color", colorGold), ParamStyle("Style") | styleNoLabel | styleNoTitle);

複製代碼