您現在的位置：程序化交易>>
            
            
            
        期貨公式>>
        交易開拓者(TB)>>
        開拓者知識>>正文內容

            
            
            

                

                

                
                

                

                

                

                

                
                

                    

                        開拓者兩個波峰和波谷的程序源碼　[開拓者 TB]
                    

                    

                        作者：開拓者 TB 來源：cxh99.com 發布時間：2012年09月20日 點擊數：
    
   　【收藏到本網的會員中心】

                    

                    
                    

                    

                    
      
     
    
	
  • 咨詢內容： 我編了一段求前兩個波峰和波谷的程序（可在交易指令下測試），
    
		但效果還不滿意，希望能得到高手的改進，謝謝！
		
      
			
    1. Params
      2. 
			
      
			
    2.         Numeric MyMinLength(5);
      3. 
			
      
			
    3.         // GV10 最近波峰與當前Bar的Bar計數
      4. 
			
      
			
    4.         // GV11 最近波峰的值
      5. 
			
      
			
    5.         // GV12 最近波谷與當前Bar的Bar計數
      6. 
			
      
			
    6.         // GV13 最近波谷的值
      7. 
			
      
			
    7.         // GV14 前一個波峰與當前Bar的Bar計數
      8. 
			
      
			
    8.         // GV15 前一個波峰的值
      9. 
			
      
			
    9.         // GV16 前一個波谷與當前Bar的Bar計數
      10. 
			
      
			
    10.         // GV17 前一個波谷的值
      11. 
			
      
			
    11.        
      12. 
			
      
			
    12. Vars
      13. 
			
      
			
    13.         Numeric MyLength;
      14. 
			
      
			
    14.         Numeric MyHighBar;
      15. 
			
      
			
    15.         Numeric MyHigh;
      16. 
			
      
			
    16.         Numeric MyLow;
      17. 
			
      
			
    17.         Numeric MyLowBar;
      18. 
			
      
			
    18. Begin
      19. 
			
      
			
    19.  
      20. 
			
      
			
    20.         If (BarStatus==0)
      21. 
			
      
			
    21.         {        SetGlobalVar(10,0); SetGlobalVar(11,High); //最近波峰Bar，High
      22. 
			
      
			
    22.                 SetGlobalVar(12,0); SetGlobalVar(13,Low);  //最近波谷Bar，Low
      23. 
			
      
			
    23.                 SetGlobalVar(14,0); SetGlobalVar(15,High);
      24. 
			
      
			
    24.                 SetGlobalVar(16,0); SetGlobalVar(17,Low);
      25. 
			
      
			
    25.         }
      26. 
			
      
			
    26.        
      27. 
			
      
			
    27.         MyLength = GetGlobalVar(12)+1;//取上一波谷到當前Bar的個數
      28. 
			
      
			
    28.         MyLength = IIF(MyLength<=MyMinLength,MyMinLength+1,MyLength);//至少保持最小的波峰距離為5個Bar
      29. 
			
      
			
    29.         MyHighBar = HighestBar(High,MyLength);
      30. 
			
      
			
    30.         MyHigh = Highest(High,MyLength);
      31. 
			
      
			
    31.        
      32. 
			
      
			
    32.         If (GetGlobalVar(10)+1-MyHighBar>=MyMinLength or MyHigh>GetGlobalVar(11))
      33. 
			
      
			
    33.         {        If (GetGlobalVar(10)+1-MyHighBar>=MyMinLength)
      34. 
			
      
			
    34.                 {        SetGlobalVar(14,GetGlobalVar(10)); //保留前一個波峰
      35. 
			
      
			
    35.                         SetGlobalVar(15,GetGlobalVar(11));
      36. 
			
      
			
    36.                 }
      37. 
			
      
			
    37.                 SetGlobalVar(10,MyHighBar);//從上個低谷開始的最高價所在的Bar序數
      38. 
			
      
			
    38.                 SetGlobalVar(11,MyHigh);   //從上個低谷開始的最高價
      39. 
			
      
			
    39.         } Else SetGlobalVar(10,GetGlobalVar(10)+1);
      40. 
			
      
			
    40.  
      41. 
			
      
			
    41.         MyLength = GetGlobalVar(10)+1;//取上一波峰到當前Bar的個數
      42. 
			
      
			
    42.         MyLength = IIF(MyLength<MyMinLength,MyMinLength+1,MyLength);
      43. 
			
      
			
    43.         MyLowBar = LowestBar(Low,MyLength);
      44. 
			
      
			
    44.         MyLow = Lowest(Low,MyLength);
      45. 
			
      
			
    45.         If (GetGlobalVar(12)+1-MyLowBar>=MyMinLength or MyLow<GetGlobalVar(13))
      46. 
			
      
			
    46.         {        If (GetGlobalVar(12)+1-MyLowBar>=MyMinLength)
      47. 
			
      
			
    47.                 {        SetGlobalVar(16,GetGlobalVar(12)); //保留前一個波谷
      48. 
			
      
			
    48.                         SetGlobalVar(17,GetGlobalVar(13));
      49. 
			
      
			
    49.                 }
      50. 
			
      
			
    50.                 SetGlobalVar(12,MyLowBar);//從上個波峰開始的最低價所在的Bar序數
      51. 
			
      
			
    51.                 SetGlobalVar(13,MyLow);//從上個波峰開始的最低價
      52. 
			
      
			
    52.         } Else SetGlobalVar(12,GetGlobalVar(12)+1);
      53. 
			
      
			
    53.  
      54. 
			
      
			
    54.         //驗證顯示
      55. 
			
      
			
    55.         Commentary("CurrBar "+Text(CurrentBar));
      56. 
			
      
			
    56.         Commentary("HighestNear "+Text(GetGlobalVar(11))+" Bar "+Text(GetGlobalVar(10)));
      57. 
			
      
			
    57.         Commentary("LowestNear  "+Text(GetGlobalVar(13))+" Bar "+Text(GetGlobalVar(12)));
      58. 
			
      
			
    58.         Commentary("HighestFar  "+Text(GetGlobalVar(15))+" Bar "+Text(GetGlobalVar(14)));
      59. 
			
      
			
    59.         Commentary("LowestFar   "+Text(GetGlobalVar(17))+" Bar "+Text(GetGlobalVar(16)));
      60. 
			
      
			
    60.        
      61. 
			
      
			
    61. End
      62. 
		
    
		
     
    
	
    • 
	
  • TB技術人員： 請教為什么在實時（BarStatus==2）時，最后一個Bar的計算值的不對的，請高手幫助。謝謝！
		
     
    
	
    • 
	
  • TB客服： 最后一個bar的high和low不斷在變化,所以有可能不對的
		
     
    
	
    • 
	
  • 網友回復： 本帖最后由 efrog 于 2010-9-8 20:45 編輯 
    
		
    
		謝謝，問題就出在這里。增加了BarStatus==1的限制，讓最后一個Bar不參與計算，問題就解決了。
    
		實際上最后Bar的High與Low要參與波峰、波谷的比較，在比較之前還不能直接修正目前的波峰、波谷。
    
		修正的程序如下：
		
      
			
    1. Params
      2. 
			
      
			
    2.         Numeric MyMinLength(5);
      3. 
			
      
			
    3.         // GV10 最近波峰與當前Bar的Bar計數
      4. 
			
      
			
    4.         // GV11 最近波峰的值
      5. 
			
      
			
    5.         // GV12 最近波谷與當前Bar的Bar計數
      6. 
			
      
			
    6.         // GV13 最近波谷的值
      7. 
			
      
			
    7.         // GV14 前一個波峰與當前Bar的Bar計數
      8. 
			
      
			
    8.         // GV15 前一個波峰的值
      9. 
			
      
			
    9.         // GV16 前一個波谷與當前Bar的Bar計數
      10. 
			
      
			
    10.         // GV17 前一個波谷的值
      11. 
			
      
			
    11. Vars
      12. 
			
      
			
    12.         Numeric MyLength;
      13. 
			
      
			
    13.         Numeric MyHighBar;
      14. 
			
      
			
    14.         Numeric MyHigh;
      15. 
			
      
			
    15.         Numeric MyLow;
      16. 
			
      
			
    16.         Numeric MyLowBar;
      17. 
			
      
			
    17. Begin
      18. 
			
      
			
    18.         If (BarStatus==0)
      19. 
			
      
			
    19.         {        SetGlobalVar(10,0); SetGlobalVar(11,High); //最近波峰Bar，High
      20. 
			
      
			
    20.                 SetGlobalVar(12,0); SetGlobalVar(13,Low);  //最近波谷Bar，Low
      21. 
			
      
			
    21.                 SetGlobalVar(14,0); SetGlobalVar(15,High);
      22. 
			
      
			
    22.                 SetGlobalVar(16,0); SetGlobalVar(17,Low);
      23. 
			
      
			
    23.         }
      24. 
			
      
			
    24.        
      25. 
			
      
			
    25.         If (BarStatus==1)
      26. 
			
      
			
    26.         {        MyLength = GetGlobalVar(12)+1;//取上一波谷到當前Bar的個數
      27. 
			
      
			
    27.                 MyLength = IIF(MyLength<=MyMinLength,MyMinLength+1,MyLength);//至少保持最小的波峰距離為5個Bar
      28. 
			
      
			
    28.                 MyHighBar = HighestBar(High,MyLength);
      29. 
			
      
			
    29.                 MyHigh = Highest(High,MyLength);
      30. 
			
      
			
    30.        
      31. 
			
      
			
    31.                 If (GetGlobalVar(10)+1-MyHighBar>=MyMinLength or MyHigh>GetGlobalVar(11))
      32. 
			
      
			
    32.                 {        If (GetGlobalVar(10)+1-MyHighBar>=MyMinLength)
      33. 
			
      
			
    33.                         {        SetGlobalVar(14,GetGlobalVar(10)); //保留前一個波峰
      34. 
			
      
			
    34.                                 SetGlobalVar(15,GetGlobalVar(11));
      35. 
			
      
			
    35.                         }
      36. 
			
      
			
    36.                         SetGlobalVar(10,MyHighBar+1);//從上個低谷開始的最高價所在的Bar序數
      37. 
			
      
			
    37.                         SetGlobalVar(11,MyHigh);   //從上個低谷開始的最高價
      38. 
			
      
			
    38.                 } Else SetGlobalVar(10,GetGlobalVar(10)+1);
      39. 
			
      
			
    39.  
      40. 
			
      
			
    40.                 MyLength = GetGlobalVar(10)+1;//取上一波峰到當前Bar的個數
      41. 
			
      
			
    41.                 MyLength = IIF(MyLength<MyMinLength,MyMinLength+1,MyLength);
      42. 
			
      
			
    42.                 MyLowBar = LowestBar(Low,MyLength);
      43. 
			
      
			
    43.                 MyLow = Lowest(Low,MyLength);
      44. 
			
      
			
    44.                 If (GetGlobalVar(12)+1-MyLowBar>=MyMinLength or MyLow<GetGlobalVar(13))
      45. 
			
      
			
    45.                 {        If (GetGlobalVar(12)+1-MyLowBar>=MyMinLength)
      46. 
			
      
			
    46.                         {        SetGlobalVar(16,GetGlobalVar(12)); //保留前一個波谷
      47. 
			
      
			
    47.                                 SetGlobalVar(17,GetGlobalVar(13));
      48. 
			
      
			
    48.                         }
      49. 
			
      
			
    49.                         SetGlobalVar(12,MyLowBar+1);//從上個波峰開始的最低價所在的Bar序數
      50. 
			
      
			
    50.                         SetGlobalVar(13,MyLow);//從上個波峰開始的最低價
      51. 
			
      
			
    51.                 } Else SetGlobalVar(12,GetGlobalVar(12)+1);
      52. 
			
      
			
    52.         }
      53. 
			
      
			
    53.         //驗證顯示
      54. 
			
      
			
    54.         Commentary("CurrBar "+Text(CurrentBar));
      55. 
			
      
			
    55.         Commentary("HighestNear "+Text(GetGlobalVar(11))+" Bar "+Text(GetGlobalVar(10)));
      56. 
			
      
			
    56.         Commentary("LowestNear  "+Text(GetGlobalVar(13))+" Bar "+Text(GetGlobalVar(12)));
      57. 
			
      
			
    57.         Commentary("HighestFar  "+Text(GetGlobalVar(15))+" Bar "+Text(GetGlobalVar(14)));
      58. 
			
      
			
    58.         Commentary("LowestFar   "+Text(GetGlobalVar(17))+" Bar "+Text(GetGlobalVar(16)));
      59. 
			
      
			
    59. End
      60. 
		
    
		復制代碼
		
     
    
	
    • 
	
  • 網友回復：目前還有二個問題：
    
		 （1）HighestFar、LowestFar的Bar計算有問題
    • 
	
  •  （2）由于使用了Highest和Lowest用戶函數，當最遠的Bar前有更高或更低值時，這兩個函數找到的并不是波峰和波谷。 
    • 



    
   
                    

                        
 

                        
有思路，想編寫各種指標公式，程序化交易模型，選股公式，預警公式的朋友

                        
可聯系技術人員 QQ: 262069696  點擊在線交流進行 有償 編寫！（不貴！點擊查看價格！）
                        

                        

                        
                        

                            

                        

                        

                    

                    
                    

                         【字體：小 大】【打印文章】【查看評論】
 
  
                    

                    
                    

                       
相關文章

                       
                     

                     
                

                

                  
                

                

                

                

                

            

            
        

        
        
        
        
    

    
    

    

     









    
        
    



主站蜘蛛池模板：
国产精品入口免费麻豆|
无码国产精品一区二区免费vr|
伊人色综合视频一区二区三区|
蜜桃臀av高潮无码|
国产欧美精品午夜在线播放|
91进入蜜桃臀在线播放|
小说都市欧美亚洲|
中文字幕无码日韩专区免费|
日韩欧国产精品一区综合无码|
亚洲另类古典武侠|
毛片免费全部无码播放|
伊人任线任你躁|
精品国偷自产在线视频|
国产三区视频在线观看|
高跟丝袜美女一级毛片|
国产精品91视频|
91啦视频在线|
在线毛片片免费观看|
zoom和okzoom在线视频|
成人免费一区二区三区在线观看|
国产乱人伦av在线a|
青青青青久久久久国产|
国自产精品手机在线观看视频|
www.污网站|
岛国a香蕉片不卡在线观看|
亚洲免费人成在线视频观看|
波多结衣一区二区三区|
伊人久久精品无码AV一区|
精品国产成a人在线观看|
四虎国产精品永久免费网址|
色欲色av免费观看|
国产乱理伦片在线观看大陆|
青青青青青免精品视频|
国产婷婷色一区二区三区|
日本高清在线免费|
国产福利一区视频|
亚洲综合15p|
国产精品v欧美精品∨日韩|
xvdeviosbbc黑人|
尾野真知子日韩专区在线|
中文字幕一精品亚洲无线一区
|