您現在的位置：程序化交易>>
            
            
            
        期貨公式>>
        交易開拓者(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  點擊在線交流進行 有償 編寫！（不貴！點擊查看價格！）
                        

                        

                        
                        

                            

                        

                        

                    

                    
                    

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

                    
                    

                       
相關文章

                       
                     

                     
                

                

                  
                

                

                

                

                

            

            
        

        
        
        
        
    

    
    

    

     









    
        
    



主站蜘蛛池模板：
91成人免费观看|
99精品视频在线观看re|
精品久久欧美熟妇WWW|
奇米色在线视频|
亚洲成a人片在线不卡|
高潮毛片无遮挡高清免费视频
|
冠希与阿娇实干13分钟视频|
xl上司带翻译无马赛樱花|
欧美色欧美亚洲另类二区
|
涩涩涩在线视频|
国产成人无码A区在线观看导航|
久久久久久久无码高潮|
狠狠色噜噜狠狠狠狠97俺也去|
国产特黄1级毛片|
一边摸一边叫床一边爽|
欧美性猛交xxxx乱大交丰满|
国产成人高清亚洲一区app|
一本色道无码道在线观看|
欧美午夜精品久久久久免费视
|
√8天堂资源地址中文在线|
√天堂资源在线|
欧美最猛黑人xxxx黑人|
国产午夜福利在线观看红一片|
www.亚洲成在线|
最近中文字幕高清中文字幕电影二|
又黄又爽又色的视频|
337p日本欧洲亚洲大胆色噜噜|
日本口工全彩漫画|
亚洲综合在线一区二区三区|
麻豆乱码国产一区二区三区|
天天综合网天天综合色|
久精品国产欧美亚洲色aⅴ大片|
精品一区二区三区自拍图片区
|
精品久久久久久中文字幕一区
|
欧美高清视频www夜色资源网|
国产在线98福利播放视频免费|
ffee性护士vihaos中国|
日韩精品一区二区三区在线观看
|
97精品一区二区视频在线观看|
日本高清va在线播放|
亚洲美女综合网|