奇狐社區論壇 - 版主你好

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

由 ivancclai 在 2020-04-11 06:30 發表:

版主你好

有件事情求救你 - 謝謝

畫線變形母子線
基本定義是 k -2 高低點當基礎 , K 及 k-1 的開收都在 k-2 高低點間 . 成立後K-2 的高低點畫平行線延伸至K 的位置

再延伸是若K位置之後的k棒開收還是在此區間內,線就繼續畫, 直到k棒高逼點出此範圍結束

我會做基本型母子不會做延伸時, 及變形母子, 所以求救. 請給範例, 謝謝

基本母子型態
insideJ:=L>ref(L,1) and H<ref(H,1);
drawline(refx(insideJ,1)=1,H,refx(insideJ,1)=0,ref(H,barslast(insideJ+1)+1),0) colorwhite;
drawline(refx(insideJ,1)=1,L,refx(insideJ,1)=0,ref(L,barslast(insideJ+1)+1),0) colorwhite;

由 cgjj 在 2020-04-13 10:26 發表:

回覆: 版主你好

引用:
最初由 ivancclai 發表
有件事情求救你 - 謝謝

畫線變形母子線
基本定義是 k -2 高低點當基礎 , K 及 k-1 的開收都在 k-2 高低點間 . 成立後K-2 的高低點畫平行線延伸至K 的位置

再延伸是若K位置之後的k棒開收還是在此區間內,線就繼續畫, 直到k棒高逼點出此範圍結束

我會做基本型母子不會做延伸時, 及變形母子, 所以求救. 請給範例, 謝謝

基本母子型態
insideJ:=L>ref(L,1) and H<ref(H,1);
drawline(refx(insideJ,1)=1,H,refx(insideJ,1)=0,ref(H,barslast(insideJ+1)+1),0) colorwhite;
drawline(refx(insideJ,1)=1,L,refx(insideJ,1)=0,ref(L,barslast(insideJ+1)+1),0) colorwhite;

OCH:=max(o,c); UH:=HHV(OCH,2);
OCL:=min(o,c); UL:=LLV(OCL,2);
CK:=H>refx(UH,2) and L<refx(UL,2);
CKSP:=barslast(CK);
CKH:=ref(H,CKSP); CKL:=ref(L,CKSP);
PARTLINE(OCH<=CKH and cksp>0,CKH) linedot;
PARTLINE(OCL>=CKL and cksp>0,CKL) linedot;

由 ivancclai 在 2020-04-14 03:07 發表:

cgjj 版主你好

我試過, 有一個問題我不會修正,當此變形母子成立時, 三根K棒之後只要有一根K棒離開此範圍時, 此變形母子就結束了. 但是下段程式只要後面K棒又回到此區間他就繼續畫線, 要如何去掉後面這一段, 我不知道如何修改. 要麻煩你幫我修正謝謝

//=============== 變形母子 =========================================

OCH:=max(o,c); UH:=HHV(OCH,2);
OCL:=min(o,c); UL:=LLV(OCL,2);
CK:=H>refx(UH,2) and L<refx(UL,2);
CKSP:=barslast(CK);
CKH:=ref(H,CKSP); CKL:=ref(L,CKSP);

PARTLINE(OCL>=CKL AND OCH<=CKH and cksp>0,CKH) linedot COLOR00FFFF;
PARTLINE(OCL>=CKL and OCH<=CKH AND cksp>0,CKL) linedot COLOR00FFFF;

//PARTLINE(OCH<=CKH and cksp>0,CKH) linedot;
//PARTLINE(OCL>=CKL and cksp>0,CKL) linedot;

//===================================================================

由 cgjj 在 2020-04-14 08:53 發表:

引用:
最初由 ivancclai 發表
cgjj 版主你好

我試過, 有一個問題我不會修正,當此變形母子成立時, 三根K棒之後只要有一根K棒離開此範圍時, 此變形母子就結束了. 但是下段程式只要後面K棒又回到此區間他就繼續畫線, 要如何去掉後面這一段, 我不知道如何修改. 要麻煩你幫我修正謝謝
............略

OCH:=max(o,c); UH:=HHV(OCH,2);
OCL:=min(o,c); UL:=LLV(OCL,2);
CK:=H>refx(UH,2) and L<refx(UL,2);
CKSP:=barslast(CK);
CKH:=ref(H,CKSP); CKL:=ref(L,CKSP);
DWCK:=OCH<=CKH and OCL>=CKL and cksp>0;
PARTLINE(DWCK,CKH) linedot;
PARTLINE(DWCK,CKL) linedot;

由 ivancclai 在 2020-04-14 10:22 發表:

cgjj 兄,

謝謝你, 修正成功, 可以使用感恩

由 ivancclai 在 2020-04-15 21:51 發表:

版主 cgjj兄,

這兩天仔細檢查此變形母子線還是有些與想法不可, 是否可以請cgjj兄幫我再看看如何修改

由 ivancclai 在 2020-04-15 21:58 發表:

貼圖

由 cgjj 在 2020-04-16 09:25 發表:

引用:
最初由 ivancclai 發表
貼圖

原碼:OCH:=max(o,c); UH:=HHV(OCH,2);
OCL:=min(o,c); UL:=LLV(OCL,2);
CK:=H>refx(UH,2) and L<refx(UL,2);
DW:=C*0; HH:=H; LL:=L;
for i=lbound(CK) to datacount do begin
  if CK[i]=1 then begin
    for j=i+1 to datacount do begin
      if OCH[j]>HH[i] or OCL[j]<LL[i] then break;
    end;
    DW[i]:=j-i;
  end;
end;
DRAWSL(DW>0,H,0,DW,0) linedot pxdn2;
DRAWSL(DW>0,L,0,DW,0) linedot pxdn2;

由 ivancclai 在 2020-04-16 09:32 發表:

謝謝版主, cgjj兄, 測試正常了, 謝謝

由 cgjj 在 2020-04-16 11:10 發表:

引用:
最初由 ivancclai 發表
謝謝版主, cgjj兄, 測試正常了, 謝謝

不客氣^^

全部時間均為台灣時間, 現在時間為02:00

在這個頁面顯示本主題全部的 10 個文章