奇狐社區論壇 - 請求協助盤整區間分隔

總頁數 (2): « 1 [2]
在這個頁面顯示本主題全部的 18 個文章

奇狐社區論壇 (http://www.chiefox.com.tw/bbs/index.php)
- 問題交流 (http://www.chiefox.com.tw/bbs/forumdisplay.php?forumid=28)
-- 請求協助盤整區間分隔 (http://www.chiefox.com.tw/bbs/showthread.php?threadid=17901)

由 cgjj 在 2013-08-06 11:58 發表:

引用:
最初由 Markchu7 發表
感謝總版主撥空解答!可能是因為貼圖設定長寬的關係以致貼圖文字不精確請版主以此圖為準

盤整成立以長短虛線表示
盤整突破以長虛線表示
8/1為例
1.第一個盤整區間畫虛線
盤整成立,則
a.盤整成立K棒向前推10個週期畫盤整H到盤整L價位的豎虛線
b.盤整成立K棒以盤整H&盤整L之價位各向左畫10個週期的橫虛線
c.盤整成立K棒向右到盤整突破K棒畫以盤整H&盤整L之價位的橫虛線(週期則依行情而不定)
d.盤整突破K棒向前推1個週期畫盤整H到盤整L價位的豎虛線
如貼圖中由P大所指導的編號1的虛線方框!

2.盤整突破則表示一個盤整區間完成,下一個盤整區間依同樣規則重新開始,如貼圖中2.3由手工繪製的實線方框!

3.盤整區間每天都重新計算不跨交易日.
感謝總版主協助!感恩!

按虛線方框2和3, 往前追的邏輯
虛線方框1 的起點應該再往前兩根, 而非原來的位置

處理範例如下:

原碼:


CK:=DATE<>REF(DATE,1) or barpos=1;

HH:=H; LL:=L;

UH:=HHV(H,10);

DL:=LLV(L,10);

ZB:=ALL(UH-DL<61,10);

XSP:=barslast(ZB=0)+10;

BoxR:=C*0; BoxL:=BoxR;

for i=1 to datacount do begin

  j:=i-1;

  if CK[i]=1 then begin

    LNo:=i;

  end else if i-LNo+1>10 and ZB[j]=1 then begin

    if HH[i]>UH[j] or LL[i]<DL[j] then begin

      XNo:=LNo;

      if j-LNo>XSP[j] then XNo:=j-XSP[j];

      BoxL[XNo]:=1;

      LNo:=i; BoxR[i-1]:=1;

    end;

  end;

end;

BoxLSP:=barslast(BoxL);

BoxU:=HHV(H,BoxLSP+1);

BoxD:=LLV(L,BoxLSP+1);

BoxU:=SETVAL(BoxR,BoxU,-BoxLSP,BoxU);

BoxD:=SETVAL(BoxR,BoxD,-BoxLSP,BoxD);

STICKLINE(BoxL,BoxU,BoxD,1,0) linedot coloryellow;

STICKLINE(BoxR,BoxU,BoxD,1,0) linedot coloryellow;

DRAWSL(BoxR,BoxU,0,-BoxLSP,1) linedot pxdn2 coloryellow;

DRAWSL(BoxR,BoxD,0,-BoxLSP,1) linedot pxdn2 coloryellow;

由 B.S. 在 2013-08-14 18:28 發表:

Markchu7 兄

請進> 技術分析 > 經驗交流 > 綠林大盜羅賓漢

由 Markchu7 在 2013-08-14 22:50 發表:

感恩!

全部時間均為台灣時間, 現在時間為21:51

總頁數 (2): « 1 [2]
在這個頁面顯示本主題全部的 18 個文章