奇狐社區論壇 總頁數 (8): « 1 [2] 3 4 » ... 最末頁 »
在這個頁面顯示本主題全部的 112 個文章

奇狐社區論壇 (http://www.chiefox.com.tw/bbs/index.php)
- 問題交流 (http://www.chiefox.com.tw/bbs/forumdisplay.php?forumid=28)
-- SAR轉向問題 (http://www.chiefox.com.tw/bbs/showthread.php?threadid=21837)

由 cgjj 在 2019-04-24 23:44 發表:

引用:
最初由 a9681054 發表
版主你好，

上翻...首個yar,取4天前的最低點
下翻...首個yar,取4天前的最高點


規則還是不完善，且有可能會衝突!!!!!!

您說: 歷史K棒首個 yar值，就採上翻計算
又說: 上翻...首個yar,取4天前的最低點

3)上翻轉第1天…取1/8收盤價>當日yar那一天的最高點9611當初始區間極值(ep),

如此在首根，3) 的假設則有可能不會成立!
雖然首個yar是取4天前的最低點
但你怎知道首個yar這根，走勢一定是往上呢?
也可能是 收盤價<當日yar 呀!
這時 ep 要給多少? <== 衝突

請試著自己先驗算一遍
把歷史首個 yar值 與 ep 值算出來
連算二根以上無誤確定可行後
再寫出邏輯規則來

由 a9681054 在 2019-04-25 08:55 發表:

版主你好，
了解,我再想一下.....謝謝

__________________
chiu

由 cgjj 在 2019-04-25 09:59 發表:

引用:
最初由 a9681054 發表
版主你好，
了解,我再想一下.....謝謝


不客氣^^

由 a9681054 在 2019-04-25 18:30 發表:

版主你好,

針對版主所提問題，我驗算後重新擬規則如下，再麻煩確認是否可行?謝謝~

第2版….2019/4/25
//往上拋物線規則定義
1)以(歷史)前二根收盤價做比較,假如c>ref(c,1),則在第4根k棒開始起畫上翻yar.
2)(歷史)上翻轉第1天…取前三天最低點當初始的yar.
3)(歷史)上翻轉第1天…取前三天最高點當初始區間極值(ep),之後上漲後的ep為每日到昨天為止的上漲最高點.
4)(之後)上翻轉第1天…取前次往下翻轉的最低點當初始的yar.
5)(之後)上翻轉第1天…取收盤價>當日yar那一天的最高點當初始區間極值(ep),之後上漲後的ep為每日到昨天為止的上漲最高點.
6)上翻轉第1天…加速因子(af)值從0.02開始,第2天af取決於前二天高點做比較,假如昨高>前高,則af+0.02否則不變,唯其af最高累加上限值為0.2,當af值到0.2時,爾後即使股價再創新高,其af值還是以0.2代入計算.
7)上翻轉第1個yar計算…今yar=昨yar+af*(昨ep-昨yar)
8)上翻轉後直到當日收盤價<當日上翻轉的yar, 上翻才結束.


//往下拋物線規則定義
1)以(歷史)前二根收盤價做比較,假如c<ref(c,1),則在第4根k棒開始起畫下翻yar.
2) (歷史)下翻轉第1天…取前三天最高點當初始的yar.
3) (歷史)下翻轉第1天…取前三天最低點當初始區間極值(ep),之後下跌後的ep為每日到昨天為止的下跌最低點.
4)(之後)下翻轉第1天…取前次往上翻轉的最高點當初始的yar.
5)(之後)下翻轉第1天…取收盤價<當日yar那一天的最低點當初始區間極值(ep),之後下跌後的ep為每日到昨天為止的下跌最低點.
6)下翻轉第1天…加速因子(af)值從0.02開始,第2天af取決於前二天低點做比較,假如昨低<前低,則af+0.02否則不變,唯其af最高累加上限值為0.2,當af值到0.2時,爾後即使股價再創新低,其af值還是以0.2代入計算.
7)下翻轉第1個yar計算…今yar=昨yar+af*(昨ep-昨yar)
8)下翻轉後直到當日收盤價>當日下翻轉的yar, 下翻才結束.

__________________
chiu

由 cgjj 在 2019-04-26 14:04 發表:

引用:
最初由 a9681054 發表
版主你好,

針對版主所提問題，我驗算後重新擬規則如下，再麻煩確認是否可行?謝謝~

第2版….2019/4/25
//往上拋物線規則定義
1)以(歷史)前二根收盤價做比較,假如c>ref(c,1),則在第4根k棒開始起畫上翻yar.
2)(歷史)上翻轉第1天…取前三天最低點當初始的yar.
3)(歷史)上翻轉第1天…取前三天最高點當初始區間極值(ep),之後上漲後的ep為每日到昨天為止的上漲最高點.
4)(之後)上翻轉第1天…取前次往下翻轉的最低點當初始的yar.
5)(之後)上翻轉第1天…取收盤價>當日yar那一天的最高點當初始區間極值(ep),之後上漲後的ep為每日到昨天為止的上漲最高點.
6)上翻轉第1天…加速因子(af)值從0.02開始,第2天af取決於前二天高點做比較,假如昨高>前高,則af+0.02否則不變,唯其af最高累加上限值為0.2,當af值到0.2時,爾後即使股價再創新高,其af值還是以0.2代入計算.
7)上翻轉第1個yar計算…今yar=昨yar+af*(昨ep-昨yar)
8)上翻轉後直到當日收盤價<當日上翻轉的yar, 上翻才結束.


//往下拋物線規則定義
1)以(歷史)前二根收盤價做比較,假如c<ref(c,1),則在第4根k棒開始起畫下翻yar.
2) (歷史)下翻轉第1天…取前三天最高點當初始的yar.
3) (歷史)下翻轉第1天…取前三天最低點當初始區間極值(ep),之後下跌後的ep為每日到昨天為止的下跌最低點.
4)(之後)下翻轉第1天…取前次往上翻轉的最高點當初始的yar.
5)(之後)下翻轉第1天…取收盤價<當日yar那一天的最低點當初始區間極值(ep),之後下跌後的ep為每日到昨天為止的下跌最低點.
6)下翻轉第1天…加速因子(af)值從0.02開始,第2天af取決於前二天低點做比較,假如昨低<前低,則af+0.02否則不變,唯其af最高累加上限值為0.2,當af值到0.2時,爾後即使股價再創新低,其af值還是以0.2代入計算.
7)下翻轉第1個yar計算…今yar=昨yar+af*(昨ep-昨yar)
8)下翻轉後直到當日收盤價>當日下翻轉的yar, 下翻才結束.


少考慮一種情況!
(歷史)前二根收盤價做比較，若 c=ref(c,1) 您要怎樣處理?

由 a9681054 在 2019-04-26 15:51 發表:

引用:
最初由 cgjj 發表
少考慮一種情況!
(歷史)前二根收盤價做比較，若 c=ref(c,1) 您要怎樣處理?


版主好,

我再想一下......謝謝~

__________________
chiu

由 a9681054 在 2019-04-29 09:55 發表:

版主你好,

yar規則重新整理如下,麻煩版主再幫忙確認是否可行?謝謝~

第3版….2019/4/28
//往上拋物線規則定義
1)以(歷史)前三根收盤價做比較,假如c>=ref(c,2),則在第4根k棒開始起畫上翻yar.
2)(歷史)上翻轉第1天…取前三天最低點當初始的yar.
3)(歷史)上翻轉第1天…取前三天最高點當初始區間極值(ep),之後上漲後的ep為每日到昨天為止的上漲最高點.
4)(之後)上翻轉第1天…取從前次收盤價<當日yar那一天開始到往下翻轉的區間最低點當初始的yar.
5)(之後)上翻轉第1天…取收盤價>當日yar那一天的最高點當初始區間極值(ep),之後上漲後的ep為每日到昨天為止的上漲最高點.
6)上翻轉第1天…加速因子(af)值從0.02開始,第2天af取決於前二天高點做比較,假如昨高>前高,則af+0.02否則不變,唯其af最高累加上限值為0.2,當af值到0.2時,爾後即使股價再創新高,其af值還是以0.2代入計算.
7)上翻轉第1個yar計算…今yar=昨yar+af*(昨ep-昨yar)
8)上翻轉後直到當日收盤價<當日yar, 上翻才結束,並由隔天開始往下翻轉.


//往下拋物線規則定義
1)以(歷史)前三根收盤價做比較,假如c<ref(c,2),則在第4根k棒開始起畫下翻yar.
2) (歷史)下翻轉第1天…取前三天最高點當初始的yar.
3) (歷史)下翻轉第1天…取前三天最低點當初始區間極值(ep),之後下跌後的ep為每日到昨天為止的下跌最低點.
4)(之後)下翻轉第1天…取從前次收盤價>當日yar那一天開始到往上翻轉的區間最高點當初始的yar.
5)(之後)下翻轉第1天…取收盤價<當日yar那一天的最低點當初始區間極值(ep),之後下跌後的ep為每日到昨天為止的下跌最低點.
6)下翻轉第1天…加速因子(af)值從0.02開始,第2天af取決於前二天低點做比較,假如昨低<前低,則af+0.02否則不變,唯其af最高累加上限值為0.2,當af值到0.2時,爾後即使股價再創新低,其af值還是以0.2代入計算.
7)下翻轉第1個yar計算…今yar=昨yar+af*(昨ep-昨yar)
8)下翻轉後直到當日收盤價>當日yar, 下翻才結束, 並由隔天開始往上翻轉.

__________________
chiu

由 cgjj 在 2019-04-29 21:55 發表:

引用:
最初由 a9681054 發表
版主你好,

yar規則重新整理如下,麻煩版主再幫忙確認是否可行?謝謝~

第3版….2019/4/28
//往上拋物線規則定義
1)以(歷史)前三根收盤價做比較,假如c>=ref(c,2),則在第4根k棒開始起畫上翻yar.
2)(歷史)上翻轉第1天…取前三天最低點當初始的yar.
3)(歷史)上翻轉第1天…取前三天最高點當初始區間極值(ep),之後上漲後的ep為每日到昨天為止的上漲最高點.
4)(之後)上翻轉第1天…取從前次收盤價<當日yar那一天開始到往下翻轉的區間最低點當初始的yar.
5)(之後)上翻轉第1天…取收盤價>當日yar那一天的最高點當初始區間極值(ep),之後上漲後的ep為每日到昨天為止的上漲最高點.
6)上翻轉第1天…加速因子(af)值從0.02開始,第2天af取決於前二天高點做比較,假如昨高>前高,則af+0.02否則不變,唯其af最高累加上限值為0.2,當af值到0.2時,爾後即使股價再創新高,其af值還是以0.2代入計算.
7)上翻轉第1個yar計算…今yar=昨yar+af*(昨ep-昨yar)
8)上翻轉後直到當日收盤價<當日yar, 上翻才結束,並由隔天開始往下翻轉.


//往下拋物線規則定義
1)以(歷史)前三根收盤價做比較,假如c<ref(c,2),則在第4根k棒開始起畫下翻yar.
2) (歷史)下翻轉第1天…取前三天最高點當初始的yar.
3) (歷史)下翻轉第1天…取前三天最低點當初始區間極值(ep),之後下跌後的ep為每日到昨天為止的下跌最低點.
4)(之後)下翻轉第1天…取從前次收盤價>當日yar那一天開始到往上翻轉的區間最高點當初始的yar.
5)(之後)下翻轉第1天…取收盤價<當日yar那一天的最低點當初始區間極值(ep),之後下跌後的ep為每日到昨天為止的下跌最低點.
6)下翻轉第1天…加速因子(af)值從0.02開始,第2天af取決於前二天低點做比較,假如昨低<前低,則af+0.02否則不變,唯其af最高累加上限值為0.2,當af值到0.2時,爾後即使股價再創新低,其af值還是以0.2代入計算.
7)下翻轉第1個yar計算…今yar=昨yar+af*(昨ep-昨yar)
8)下翻轉後直到當日收盤價>當日yar, 下翻才結束, 並由隔天開始往上翻轉. 
原碼:
if datacount<3 then exit; //K棒不足
CC:=C; HH:=H; LL:=L;
HH3:=HHV(H,3); LL3:=LLV(L,3);
RHCK:=ref(H>ref(H,1),1);
RLCK:=ref(L<ref(L,1),1);
DIR:=CC[3]>=CC[1]; DIR:=1-(DIR=0)*2;
YAR:CC*0 CIRCLEDOT; x:=setlbound(YAR,3);
if DIR=1 then begin
  yar[3]:=LL3[3]; ep:=HH3[3];
end else begin
  yar[3]:=HH3[3]; ep:=LL3[3];
end;
af:=0.02; NowDir:=DIR; SwapF:=0; NewYar:=0;
for i=3+1 to datacount do begin
  if SwapF=1 then begin
    yar[i]:=NewYar; SwapF:=0;
  end else begin
    yar[i]:=yar[i-1]+af*(ep-yar[i-1]); 
  end;
  if NowDir=1 then begin
    if RHCK[i] then af:=af+0.02;
    if CC[i]<yar[i] then begin
      SwapF:=1; NewYar:=ep; ep:=LL[i];
    end else begin
      if HH[i]>ep then ep:=HH[i];
    end; 
  end else begin
    if RLCK[i] then af:=af+0.02;
    if CC[i]>yar[i] then begin
       SwapF:=1; NewYar:=ep; ep:=HH[i];
    end else begin
      if LL[i]<ep then ep:=LL[i];
    end;
  end;
  if af>0.2 then af:=0.2;
  if SwapF=1 then begin
    af:=0.02; NowDir:=-NowDir;
  end;
end;

由 a9681054 在 2019-04-29 22:22 發表:

版主你好,

謝謝，辛苦了!
大致符合想法，但還有點小差異，我再確認一下問題，之後再向版主提出.....

__________________
chiu

由 a9681054 在 2019-04-30 09:41 發表:

版主好,

目前有發現不管是往上或往下翻轉,yar都是從第3根k棒起畫, 原規則定義是希望從第4根起畫,麻煩版主再幫忙看一下.......謝謝~

__________________
chiu

由 cgjj 在 2019-04-30 14:07 發表:

引用:
最初由 a9681054 發表
版主好,

目前有發現不管是往上或往下翻轉,yar都是從第3根k棒起畫, 原規則定義是希望從第4根起畫,麻煩版主再幫忙看一下.......謝謝~


修正並再精簡了一下!
原碼:
if datacount<4 then exit; //K棒不足
CC:=C; HH:=H; LL:=L;
HH3:=HHV(H,3); LL3:=LLV(L,3);
RHCK:=ref(H>ref(H,1),1);
RLCK:=ref(L<ref(L,1),1);
DIR:=CC[3]>=CC[1]; DIR:=1-(DIR=0)*2;
YAR:CC*0 CIRCLEDOT; x:=setlbound(YAR,4);
if DIR=1 then begin
  yar[4]:=LL3[3]; ep:=HH3[3];
end else begin
  yar[4]:=HH3[3]; ep:=LL3[3];
end;
af:=0.02; NowDir:=DIR; SwapF:=0; NewYar:=0;
for i=4+1 to datacount do begin
  if SwapF=1 then begin
    yar[i]:=NewYar; SwapF:=0; af:=0.02; NowDir:=-NowDir;
  end else begin
    yar[i]:=yar[i-1]+af*(ep-yar[i-1]); 
  end;
  if NowDir=1 then begin
    if RHCK[i] then af:=af+0.02;
    if CC[i]<yar[i] then begin
      SwapF:=1; NewYar:=ep; ep:=LL[i];
    end else begin
      if HH[i]>ep then ep:=HH[i];
    end; 
  end else begin
    if RLCK[i] then af:=af+0.02;
    if CC[i]>yar[i] then begin
       SwapF:=1; NewYar:=ep; ep:=HH[i];
    end else begin
      if LL[i]<ep then ep:=LL[i];
    end;
  end;
  if af>0.2 then af:=0.2;
end;

由 a9681054 在 2019-04-30 19:03 發表:

引用:
最初由 a9681054 發表
版主好,

目前有發現不管是往上或往下翻轉,yar都是從第3根k棒起畫, 原規則定義是希望從第4根起畫,麻煩版主再幫忙看一下.......謝謝~



版主好,

第4根起畫問題已解決，非常感謝您~
我再確認每日yar的計算是否正確?如還有問題再跟版主反應.....

__________________
chiu

由 a9681054 在 2019-04-30 19:55 發表:

版主你好,

剛驗算之後每日yar計算,發現我原定義的ep取法有誤.
往上轉ep....是取到"前日"為止的上漲最高點(不是昨日).

往下轉ep....是取到"前日"為止的下跌最低點(不是昨日).

以上，再次麻煩版主幫忙修正，謝謝~

__________________
chiu

由 cgjj 在 2019-05-02 09:01 發表:

引用:
最初由 a9681054 發表
版主你好,

剛驗算之後每日yar計算,發現我原定義的ep取法有誤.
往上轉ep....是取到"前日"為止的上漲最高點(不是昨日).

往下轉ep....是取到"前日"為止的下跌最低點(不是昨日).

以上，再次麻煩版主幫忙修正，謝謝~


重新答覆，應該是把
if HH[i]>ep then ep:=HH[i];
if LL[i]<ep then ep:=LL[i];
改為
if HH[i-1]>ep then ep:=HH[i-1];
if LL[i-1]<ep then ep:=LL[i-1];

完整的新程式碼，如下：
原碼:
if datacount<4 then exit; //K棒不足
CC:=C; HH:=H; LL:=L;
HH3:=HHV(H,3); LL3:=LLV(L,3);
RHCK:=ref(H>ref(H,1),1);
RLCK:=ref(L<ref(L,1),1);
DIR:=CC[3]>=CC[1]; DIR:=1-(DIR=0)*2;
YAR:CC*0 CIRCLEDOT; x:=setlbound(YAR,4);
if DIR=1 then begin
  yar[4]:=LL3[3]; ep:=HH3[3];
end else begin
  yar[4]:=HH3[3]; ep:=LL3[3];
end;
af:=0.02; NowDir:=DIR; SwapF:=0; NewYar:=0;
for i=4+1 to datacount do begin
  if SwapF=1 then begin
    yar[i]:=NewYar; SwapF:=0; af:=0.02; NowDir:=-NowDir;
  end else begin
    yar[i]:=yar[i-1]+af*(ep-yar[i-1]); 
  end;
  if NowDir=1 then begin
    if RHCK[i] then af:=af+0.02;
    if CC[i]<yar[i] then begin
      SwapF:=1; NewYar:=ep; ep:=LL[i];
    end else begin
      if HH[i-1]>ep then ep:=HH[i-1];
    end; 
  end else begin
    if RLCK[i] then af:=af+0.02;
    if CC[i]>yar[i] then begin
       SwapF:=1; NewYar:=ep; ep:=HH[i];
    end else begin
      if LL[i-1]<ep then ep:=LL[i-1];
    end;
  end;
  if af>0.2 then af:=0.2;
end;

由 a9681054 在 2019-05-02 09:22 發表:

版主好,

yar還有一些其它發現到的問題，我重新統一整理如下，麻煩版主再幫我看一下......謝謝~

第3版….2019/4/28
//往上拋物線規則定義
1)以(歷史)前三根收盤價做比較,假如c>=ref(c,2),則在第4根k棒開始起畫上翻yar.
說明:ok
2)(歷史)上翻轉第1天…取前三天最低點當初始的yar.
說明:ok
3)(歷史)上翻轉第1天…取前三天最高點當初始區間極值(ep),之後上漲後的ep為每日到昨天為止的上漲最高點.
說明:規則定義有誤……2019/5/2版主已幫忙修正
4)(之後)上翻轉第1天…取從前次收盤價<當日yar那一天開始到往下翻轉的區間最低點當初始的yar.
說明:ok
5)(之後)上翻轉第1天…取收盤價>當日yar那一天的最高點當初始區間極值(ep),之後上漲後的ep為每日到昨天為止的上漲最高點.
說明1:上翻初始ep程式取到上翻第1天的最高點…需求為收盤價>當日yar那一天的最高點
說明2: 之後上漲後的ep規則定義有誤……2019/5/2版主已幫忙修正.
6)上翻轉第1天…加速因子(af)值從0.02開始,第2天af取決於前二天高點做比較,假如昨高>前高,則af+0.02否則不變,唯其af最高累加上限值為0.2,當af值到0.2時,爾後即使股價再創新高,其af值還是以0.2代入計算.
說明1:上翻開始前1天收盤價>yar,當日af一律給0,即af=0
說明2:第1天…af固定給0.02,即af=0.02
說明3:第2天…af取決於前二天高點做比較,假如昨高>前高,則af+0.02否則不變…需求更正為第2天af取決於”今天與昨天”高點做比較,假如”今高>昨高”,則af+0.02否則不變
7)上翻轉第1個yar計算…今yar=昨yar+af*(昨ep-昨yar)
說明:ok
8)上翻轉後直到當日收盤價<當日yar, 上翻才結束,並由隔天開始往下翻轉.
說明:ok


//往下拋物線規則定義
1)以(歷史)前三根收盤價做比較,假如c<ref(c,2),則在第4根k棒開始起畫下翻yar.
說明:ok
2) (歷史)下翻轉第1天…取前三天最高點當初始的yar.
說明:ok
3) (歷史)下翻轉第1天…取前三天最低點當初始區間極值(ep),之後下跌後的ep為每日到昨天為止的下跌最低點.
說明:規則定義有誤……2019/5/2版主已幫忙修正
4)(之後)下翻轉第1天…取從前次收盤價>當日yar那一天開始到往上翻轉的區間最高點當初始的yar.
說明:ok
5)(之後)下翻轉第1天…取收盤價<當日yar那一天的最低點當初始區間極值(ep),之後下跌後的ep為每日到昨天為止的下跌最低點.
說明1:下翻初始ep程式取到下翻第1天的最低點…需求為收盤價<當日yar那一天的最低點
說明2: 之後下跌後的ep規則定義有誤……2019/5/2版主已幫忙修正
6)下翻轉第1天…加速因子(af)值從0.02開始,第2天af取決於前二天低點做比較,假如昨低<前低,則af+0.02否則不變,唯其af最高累加上限值為0.2,當af值到0.2時,爾後即使股價再創新低,其af值還是以0.2代入計算.
說明1:下翻開始前1天收盤價<yar,當日af一律給0,即af=0
說明2:第1天…af固定給0.02,即af=0.02
說明3:第2天…af取決於前二天低點做比較,假如昨低<前低,則af+0.02否則不變…需求更正為第2天af取決於”今天與昨天”低點做比較,假如”今低<昨低”,則af+0.02否則不變
7)下翻轉第1個yar計算…今yar=昨yar+af*(昨ep-昨yar)
說明:ok
8)下翻轉後直到當日收盤價>當日yar, 下翻才結束, 並由隔天開始往上翻轉.
說明:ok

__________________
chiu
全部時間均為台灣時間, 現在時間為20:19 總頁數 (8): « 1 [2] 3 4 » ... 最末頁 »
在這個頁面顯示本主題全部的 112 個文章


Powered by: vBulletin Version 2.3.0 - Copyright©2000-, Jelsoft Enterprises Limited.
簡愛洋行 製作 Copyright 2003-. All Rights Reserved.