奇狐社區論壇 (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)

請求協助盤整區間分隔

CK:=DATE<>REF(DATE,1);
VERTLINE(CK),LINETHICK5;
盤整:ALL(HHV(H,10)-LLV(L,10)<61,10),LINETHICK;
盤整成立:盤整 AND REF(盤整,1)=0,LINETHICK;
盤整H:REF(HHV(H,10),BARSLAST(盤整成立)),LINETHICK;
盤整L:REF(LLV(L,10),BARSLAST(盤整成立)),LINETHICK;
過高:H>盤整H;
破低:L<盤整L;
突破:過高 OR 破低;
盤整突破:突破 AND SUM(突破,BARSLAST(盤整成立))=1;
KLINE(O,H,L,C,0);
DRAWICON(盤整成立,(H+L)/2,3);
DRAWICON(盤整突破,(H+L)/2,1);
DRAWICON(盤整,C,12),ALIGN5;
請求協助:
1.盤整突破後,下一個盤整成立之K棒數需重新計數.
2.如附圖中虛線方框畫線.
3.盤整區間不跨交易日.
感恩!

回覆: 請求協助盤整區間分隔

引用:

---

最初由 Markchu7 發表
CK:=DATE<>REF(DATE,1);
VERTLINE(CK),LINETHICK5;
盤整:ALL(HHV(H,10)-LLV(L,10)<61,10),LINETHICK;
盤整成立:盤整 AND REF(盤整,1)=0,LINETHICK;
盤整H:REF(HHV(H,10),BARSLAST(盤整成立)),LINETHICK;
盤整L:REF(LLV(L,10),BARSLAST(盤整成立)),LINETHICK;
過高:H>盤整H;
破低:L<盤整L;
突破:過高 OR 破低;
盤整突破:突破 AND SUM(突破,BARSLAST(盤整成立))=1;
KLINE(O,H,L,C,0);
DRAWICON(盤整成立,(H+L)/2,3);
DRAWICON(盤整突破,(H+L)/2,1);
DRAWICON(盤整,C,12),ALIGN5;
請求協助:
1.盤整突破後,下一個盤整成立之K棒數需重新計數.
2.如附圖中虛線方框畫線.
3.盤整區間不跨交易日.
感恩!

---

補充說明如附圖

看圖說故事
沒作細部比對
如有錯誤 再請板大協助吧

CK:=DATE<>REF(DATE,1);
VERTLINE(CK),LINETHICK5;
X01:=HHV(H,10);
X02:=LLV(L,10);
盤整:ALL(X01-X02<61,10),LINETHICK;
X03:=X01-X02<61;
盤整成立:盤整 AND REF(盤整,1)=0,LINETHICK;
X03:=X03 AND REF(X03,1)=0,LINETHICK;
XX:=BARSLAST(X03);
XY:=BARSLAST(盤整成立);
盤整H:REF(X01,XY),LINETHICK;
盤整L:REF(X02,XY),LINETHICK;
過高:H>盤整H;
破低:L<盤整L;
突破:過高 OR 破低;
盤整突破:突破 AND SUM(突破,XY)=1;
X04:=REFX(盤整突破,1);
X05:=BARSLAST(X04);
X06:=REF(XX,X05);
X07:=HHV(H,XX+1);
HH:=REF(X07,X05);
HH:=SETVAL(X04,HH,-X06,HH);
X08:=LLV(L,XX+1);
LL:=REF(X08,X05);
LL:=SETVAL(X04,LL,-X06,LL);
STICKLINE(X03,HH,LL,1,0),LINEDOT,COLORBLUE;
STICKLINE(X04,HH,LL,1,0),LINEDOT,COLORBLUE;
DRAWSL(X04,HH,0,X06,1),LINEDOT,COLORBLUE,PXDN2;
DRAWSL(X04,LL,0,X06,1),LINEDOT,COLORBLUE,PXDN2;
KLINE(O,H,L,C,0);
DRAWICON(盤整成立,(H+L)/2,3);
DRAWICON(盤整突破,(H+L)/2,1);
DRAWICON(盤整,C,12),ALIGN5;

__________________
至誠能勝天下至偽
至拙能勝天下至巧

感謝大哥!先消化一下有不懂之處再請版大解惑!感恩!

大哥指導的源碼畫當日盤整區間完全符合需求,感謝大哥協助!但是
1.連續盤整區間未處理,如附圖中編號2.3
2.跨交易日未處理,如下帖附圖
請總版主協助!感恩!

跨交易日未處理貼圖!

連續盤整區間

X10:=X02>REFX(L,1) AND X01-X02<61 AND X05-1>=10;//第一個連續盤整區間終點
DRAWICON(X10,H,10),PXUP15;//連續方框終點 比對用

只要有個 區間定位點 就可處理
再來第二個連續盤整區間(或第三個 若需要)也只要變更部分條件就可持續處理
您假日期間試著做做看

__________________
至誠能勝天下至偽
至拙能勝天下至巧

引用:

---

最初由 Markchu7 發表
跨交易日未處理貼圖!

---

__________________
至誠能勝天下至偽
至拙能勝天下至巧

感謝大哥!我再研究研究!

搞了二天,還是搞不定,能否請總版主出手協助助?感恩!

引用:

---

最初由 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.盤整區間每天都重新計算不跨交易日.
感謝總版主協助!感恩!

//框子畫出來了 但也有些不該出現的需要除錯的 還請板大協助(目前我想不出解決方案)

CK:=DATE<>REF(DATE,1);
VERTLINE(CK),LINETHICK5;
X01:=HHV(H,10);
X02:=LLV(L,10);
//ZF:X01-X02,LINETHICK0;
盤整:ALL(X01-X02<61,10),LINETHICK;
X03:=X01-X02<61;
盤整成立:盤整 AND REF(盤整,1)=0,LINETHICK;

X03B:=X03 AND REF(X03,1)=0,LINETHICK;
XX:=BARSLAST(X03B);
XY:=BARSLAST(盤整成立);
盤整H:REF(X01,XY),LINETHICK;
盤整L:REF(X02,XY),LINETHICK;
過高:H>盤整H;
破低:L<盤整L;
突破:過高 OR 破低;
盤整突破:突破 AND SUM(突破,XY)=1;
X04:=REFX(盤整突破,1);
X05:=BARSLAST(X04);
X06:=REF(XX,X05);
X07:=HHV(H,XX+1);
HH:=REF(X07,X05);
H1:=SETVAL(X04,HH,-X06,HH);
X08:=LLV(L,XX+1);
LL:=REF(X08,X05);
L1:=SETVAL(X04,LL,-X06,LL);
X09:=REF(DATE,XX);
X09:=DATE=X09;
STICKLINE(X03B,H1,L1,1,0),LINEDOT,COLORBLUE;//#1
STICKLINE(X04,H1,L1,1,0),LINEDOT,COLORBLUE;
DRAWSL(X04,H1,0,X06,1),LINEDOT,COLORBLUE,PXDN2;
DRAWSL(X04,L1,0,X06,1),LINEDOT,COLORBLUE,PXDN2;
X10:=X02>REFX(L,1) AND X03 AND X05-1>=10 AND DATE=REFX(DATE,1) AND DATE=REF(DATE,X05);//第一個連續終點
X11:=X10 AND REF(X10,1)=0;
X12:=BARSLAST(X11);
X13:=HHV(IF(X11,0,H),X05);//X04
X14:=REF(X13,X12);//HH2
X15:=LLV(IF(X11,99999,L),X05);//X04
X16:=REF(X15,X12),LINETHICK2;//LL2
X17:=SUM(X11,X05+1);
X18:=X11 AND X17=1 AND REF(X17,1)=0;
H2:=SETVAL(X18,X14,-X05,X14);
L2:=SETVAL(X18,X16,-X05,X16),COLORRED;
STICKLINE(X05=1,H2,L2,1,0),LINEDOT,COLORMAGENTA;
STICKLINE(X11,H2,L2,1,0),LINEDOT,COLORMAGENTA;//#2
DRAWSL(X18,H2,0,X05-1,1),LINEDOT,COLORMAGENTA,PXDN2;
DRAWSL(X18,L2,0,X05-1,1),LINEDOT,COLORMAGENTA,PXDN2;
X27:=BARSLAST(X11 AND X17=1);
X20:=X17>1 AND X11 AND REF(X12,1)>=9;
X21:=BARSLAST(X20);
X22:=HHV(IF(X11,0,H),X12);
X23:=MAX(H,REF(X22,1))*X20;
X24:=LLV(IF(X11,99999,L),X27);
X25:=REF(X23,X21);//HH3
X26:=REF(X24,X21);//LL3
H3:=SETVAL(X20,X25,-X27,X25);
L3:=SETVAL(X20,X26,-X27,X26);
STICKLINE(X20,H3,L3,1,0),LINEDOT,COLORGRAY;//#3
STICKLINE(REF(X11,1) AND X17=1,H3,L3,1,0),LINEDOT,COLORGRAY;
DRAWSL(X20,H3,0,X27-1,1),LINEDOT,COLORGRAY,PXDN2;
DRAWSL(X20,L3,0,X27-1,1),LINEDOT,COLORGRAY,PXDN2;

DRAWICON(X11,H,10),PXUP15;//連續方框終點 比對用
KLINE(O,H,L,C,0);
DRAWICON(盤整成立,(H+L)/2,3);
DRAWICON(盤整突破,(H+L)/2,1);
DRAWICON(盤整,C,12),ALIGN5;

__________________
至誠能勝天下至偽
至拙能勝天下至巧

謝謝大哥的協助指導!感恩!
除錯的部分有勞總版主了!謝謝!