奇狐社區論壇 - [問題]定位點

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

由 Markchu7 在 2014-10-03 21:20 發表:

[問題]定位點

IF DATATYPE<6 THEN CK:=DATE<>REF(DATE,1);
SP:=BARSLAST(CK)+1;
PW:BuyShares-SellShares,LINETHICK;
請協助==
1.定位點的寫法!
SP=1是第一個定位點!
強:=CROSS(PW,LLV(PW,BARSLAST(定位點)+1)+1000);
弱:=CROSS(HHV(PW,BARSLAST(定位點)+1)-1000,PW);
(第二定位點要用到第一定位點,第三定位點要用到第二定位點,....,是否需用迴圈?這個不會!)
2.一強一弱彼此穿插!
(第二定位點強弱均有可能!之後強要接弱,弱要接強,這個也不會!)
3.多空變數!SP=1到第一次強或弱成立之間距離取為0,強成立後取為1,弱成立後取為-1!
4.強成立畫垂直紅實線,弱成立畫垂直藍虛線!
請指導!謝謝!

由 cgjj 在 2014-10-05 14:55 發表:

回覆: [問題]定位點

引用:
最初由 Markchu7 發表
IF DATATYPE<6 THEN CK:=DATE<>REF(DATE,1);
SP:=BARSLAST(CK)+1;
PW:BuyShares-SellShares,LINETHICK;
請協助==
1.定位點的寫法!
SP=1是第一個定位點!
強:=CROSS(PW,LLV(PW,BARSLAST(定位點)+1)+1000);
弱:=CROSS(HHV(PW,BARSLAST(定位點)+1)-1000,PW);
(第二定位點要用到第一定位點,第三定位點要用到第二定位點,....,是否需用迴圈?這個不會!)
2.一強一弱彼此穿插!
(第二定位點強弱均有可能!之後強要接弱,弱要接強,這個也不會!)
3.多空變數!SP=1到第一次強或弱成立之間距離取為0,強成立後取為1,弱成立後取為-1!
4.強成立畫垂直紅實線,弱成立畫垂直藍虛線!
請指導!謝謝!

前面說明未敘述第二定位點如何計算? (包含後續的)

由 Markchu7 在 2014-10-05 23:16 發表:

強或弱成立點就是第二定位點!
若第二定位點是強成立,則第三定位點就是弱,如此一強一弱彼此相間穿插成立!
請指導!感恩!

由 cgjj 在 2014-10-06 08:24 發表:

引用:
最初由 Markchu7 發表
強或弱成立點就是第二定位點!
若第二定位點是強成立,則第三定位點就是弱,如此一強一弱彼此相間穿插成立!
請指導!感恩!

看這兩式子
強:=CROSS(PW,LLV(PW,BARSLAST(定位點)+1)+1000);
弱:=CROSS(HHV(PW,BARSLAST(定位點)+1)-1000,PW);

有無可能強弱兩者同時成立?
因為其中有+1000 和-1000 的關係

由 Markchu7 在 2014-10-06 09:26 發表:

不會!因為他們是收盤才確認(就像C),不像H and L有一根K棒同時成立的問題!

由 cgjj 在 2014-10-06 12:22 發表:

引用:
最初由 Markchu7 發表
不會!因為他們是收盤才確認(就像C),不像H and L有一根K棒同時成立的問題!

原碼:CK:=DATE<>REF(DATE,1);
PW:BuyShares-SellShares;
KK:=barssince(CK and barpos>lbound(PW) and lbound(PW)>0);
ST:=lbound(KK);
if ST=0 then exit;
強弱:=KK*0; MH:=強弱; ML:=強弱;
for i=ST to datacount do begin
  if CK[i] then begin
    MH[i]:=PW[i]; ML[i]:=PW[i]; UUDD:=0; 強弱[i]:=0;
  end else begin
    MH[i]:=MH[i-1]; ML[i]:=ML[i-1]; 強弱[i]:=強弱[i-1];
    if PW[i]>MH[i] then MH[i]:=PW[i];
    if PW[i]<ML[i] then ML[i]:=PW[i];
    if PW[i]>ML[i]+1000 and PW[i-1]<ML[i-1]+1000 then begin
       if UUDD=-1 then 強弱[i]:=1;
       UUDD:=1;
    end else if PW[i]<MH[i]-1000 and PW[i-1]>MH[i-1]-1000 then begin
       if UUDD=1 then 強弱[i]:=-1;
       UUDD:=-1;
    end;
    if 強弱[i]<>強弱[i-1] then begin
       MH[i]:=PW[i]; ML[i]:=PW[i];
    end;
  end;
end;
VERTLINE(強弱=1 and ref(強弱,1)<>1) colorred linedot;
VERTLINE(強弱=-1 and ref(強弱,1)<>-1) colorgreen linedot;

由 Markchu7 在 2014-10-06 13:22 發表:

謝謝!

全部時間均為台灣時間, 現在時間為06:48

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