不同週期、不同 chart間的同步..

hipper68

爬了一天的文章...還是沒有找到方法...
請教各位大大了...

我的需求:
1.開兩個 interval 的k線圖, 如下圖 5min & 10min..
2.看5分K時, 點k線時, 10分點也會被highlight ...
   (這部份使用 symbol link 即可以達成)...
3.看完此頁的 K線圖之後, 在5分k往前拉之後, 10分k是否也可以"自動" 往前拉 ???
    (找不到方法！！！)


由於有 review 不同週期歷史K線的需求, 所以會希望能做到不同週期k線的自動同步...以方便觀看...
請教各位大大是否能做到...？？？


=====題外話分隔線============

爬文過程找到一個有趣的功能...  視窗連動 (linked chart)
(http://www.coco-in.net/thread-8042-1-9.html 五樓)
從官方的說明是可以使用不同的 interval...但是我一改 interval, 都會一起改...
官方說明..

• Linked Chart
  Creates linked chart window based on current template and active chart. Linked windows use the same symbol selection, so if you change the selected symbol for one of them, the other one will synchronize automatically. Linked windows can have DIFFERENT viewing time frame selected. Simply activate the window and select desired interval from View menu for one window, then switch to the other one and select different interval for it.This option allows you to select different time frame or indicators' set in each window and easily move through the database
  

water

週末愉快

sdnian

在 Bar Replay 視窗裡拉中間的時間軸 或 直接指定 Bar Replay 視窗中的起啟時間來改變目前顯示圖的時間, 可以達到這個需求. (雖然和您要的做法不太一樣.. 但應該勉強可用)

hipper68

sdnian 發表於 12-7-22 16:26
在 Bar Replay 視窗裡拉中間的時間軸 或 直接指定 Bar Replay 視窗中的起啟時間來改變目前顯示圖的時間, 可 ...

謝謝 S 大....
這方法對我而言..夠用了...
S大對 amibroker 真的很熟...竟然可以找出這種 trick...
真是厲害....

sdnian

哈.. 我只是剛好用這個功能..

jo5918

超讚的邏輯
挺有意思的

zaqimon

這是之前google到的
我有稍微修改了一下
請將最下方AFL放到Include資料夾內且命名為iZoomer.afl
然後在AmiBroker的每個Window內加入下面兩行即可

1. UseZoomer = ParamToggle("Use Zoomer?", "No|Yes", 1);
   
2. #include_once <iZoomer.afl>

複製代碼

不同timeframe不同symbol
不論scrolling或zooming都會同步
設定好interval或symbolic link後即可連Selected bar都能同步
除了scroll到最右側的right margin會有一點點bug不同步外
不過大致上不影響正常使用

1. /*
   
2. 
   
3. Synchronous scrolling on all windows in AmiBroker
   
4. 
   
5. 
   
6. 
   
7. [20120915] zaqimon
   
8. original AFL from htt[deleteme]p:/[deleteme]/finance.groups.yahoo.com/group/amibroker/message/141912
   
9. I did a slight modification.
   
10. 
    
11. 
    
12. <Usage>
    
13. Put this AFL in the Include Folder.
    
14. Add below 2 lines into your AFL
    
15.   UseZoomer = ParamToggle("Use Zoomer?", "No|Yes", 0);
    
16.   #include_once <iZoomer.afl>
    
17. 
    
18. */
    
19. 
    
20. 
    
21. function ZqZoomSync( force )
    
22. {
    
23.     // All variables are made local to guarantee naming collisions or side effects
    
24. //    local bv, dr, Curstdt, Curenddt, prevstdt, prevenddt, Curststr, Curendstr;
    
25.     local LastBarIndex, FirstBarIndex, prevLastBarIndex, prevFirstBarIndex, prevFirstDateTime, DT, BI, LastDateTime, FirstDateTime, LastDateTimestr, FirstDateTimestr;
    
26.     local OAB, OAD, dcount, i, OADoc, OAW, OADocWin, res;
    
27.     // Get a count of the number of documents
    
28.     OAB = CreateObject( "Broker.Application" );
    
29.     OAD = OAB.Documents;
    
30.     dcount = OAD.Count;
    
31.     // Process multiple windows (documents)
    
32.     res = False;
    
33.     if ( dcount > 1 )
    
34.     {
    
35.         // Get current and last start and end DateTimes's
    
36.         LastBarIndex = Status( "LastVisibleBarIndex" );
    
37.         FirstBarIndex = Status( "FirstVisibleBarIndex" );
    
38.         //Nblankbar = Status( "LastVisibleBarIndex" ) - BarCount; // [zq] not used !!
    
39.         
    
40.         // [zq] BarIndex may always be the same due to QuickAFL, check prevFirstDateTime in addition
    
41.         prevLastBarIndex = Nz( StaticVarGet( "_prevLastVisibleBarIndex" ) );
    
42.         prevFirstBarIndex = Nz( StaticVarGet( "_prevFirstVisibleBarIndex" ) );
    
43.         prevFirstDateTime = Nz( StaticVarGet( "_prevFirstDateTime" ) );
    
44.         
    
45.         // [zq] move outside if() statement for checking prevFirstDateTime
    
46.         DT = DateTime();
    
47.         BI = BarIndex();
    
48.         LastDateTime = LastValue( ValueWhen( LastBarIndex == BI, DT ) ); // [zq] LastDateTime could be empty
    
49.         FirstDateTime = LastValue( ValueWhen( FirstBarIndex == BI, DT ) );
    
50.         
    
51.         // Check for a new date/time range
    
52. //        _TRACE(""+FirstBarIndex+", "+LastBarIndex);
    
53.         if ( LastBarIndex != prevLastBarIndex OR FirstBarIndex != prevFirstBarIndex OR FirstDateTime != prevFirstDateTime OR force )
    
54.         {
    
55.             // Set the new last values
    
56.             StaticVarSet( "_prevLastVisibleBarIndex", LastBarIndex );
    
57.             StaticVarSet( "_prevFirstVisibleBarIndex", FirstBarIndex );
    
58.             StaticVarSet( "_prevFirstDateTime", FirstDateTime );
    
59.             
    
60.             LastDateTimestr = DateTimeToStr( LastDateTime );
    
61.             FirstDateTimestr = DateTimeToStr( FirstDateTime );
    
62. //            _TRACE(""+FirstDateTimestr+", "+LastDateTimestr);
    
63.             // Loop through the document collection
    
64.             for ( i = 0; i < dcount; i++ )
    
65.             {
    
66.                 // If it is not the active document -
    
67.                 OADoc = OAD.Item( i );
    
68.                 // NOTE - it doesn't hurt to sync the current window and it makes all
    
69.                 // windows have no blank bars on the right so they look the same
    
70.                 // [zq] I think it's reasonable for not syncing ActiveDocument.
    
71.                 // [zq] Something not belong to the ActiveDocument was shown when not syncing ActiveDocument with multi-threaded charts options disabled.
    
72.                 if ( OADoc != OAB.ActiveDocument )
    
73.                 {
    
74.                     // Get the document window and zoom to range
    
75.                     //_TRACE( " Zoom to range document - " + i + " , " + Curststr + " - " + Curendstr );
    
76.                     OADW = OADoc.Windows;
    
77.                     // Document window count assumed to be 1
    
78.                     OADocWin = OADW.Item( 0 );
    
79.                     OADocWin.ZoomToRange( FirstDateTimestr, LastDateTimestr ); // [zq] this function failed to update chart at the right most margin with empty LastDateTimestr. Just minor issue, don't care.
    
80.                 }
    
81.             }
    
82.             res = True;
    
83.         }
    
84.     }
    
85.     return res;
    
86. }
    
87. 
    
88. //  Call for synchronization
    
89. If (UseZoomer)
    
90.      ZqZoomSync( False ); // [zq] set True will enter infinite loop if we also update ActiveDocument

複製代碼

moneymaker

蠻實用的,謝謝分享

heavenweaver

謝謝分享

acerman

多謝大大的分享喔