奇狐社區論壇 - 請教如何加入這個買賣訊號的條件?

奇狐社區論壇 : Powered by vBulletin version 2.3.0

奇狐社區論壇 > 指標公式 > 問題交流 > 請教如何加入這個買賣訊號的條件?

總頁數 (3): « 1 2 [3]

上一主題下一主題

作者

主題

cgjj
總版主

註冊日期: Oct 2003
來　　自:
文章數量: 18236

目前所見的迴圈當中,只有看到 [進場次數設為1] 的處理
沒在迴圈當中看到於換日時[進場次數歸為0]的處理
這應該就是問題所在

向版主報告此篇 |

2011-02-14 12:29

yisong
資深會員

註冊日期: Jan 2010
來　　自:
文章數量: 137

引用:
最初由 cgjj 發表
目前所見的迴圈當中,只有看到 [進場次數設為1] 的處理
沒在迴圈當中看到於換日時[進場次數歸為0]的處理
這應該就是問題所在

請教一下，換日歸零是否定義為
if date<>ref(date,1) then 進場次數=0;

向版主報告此篇 |

2011-02-14 14:30

cgjj
總版主

註冊日期: Oct 2003
來　　自:
文章數量: 18236

引用:
最初由 yisong 發表
請教一下，換日歸零是否定義為
if date<>ref(date,1) then 進場次數=0;

進迴圈之前(迴圈外)放置
DECK:=date<>ref(date,1) or barpos=0;

迴圈內之頂端放置
if DECK[i] then 進場次數=0;

向版主報告此篇 |

2011-02-14 14:36

yisong
資深會員

註冊日期: Jan 2010
來　　自:
文章數量: 137

引用:
最初由 cgjj 發表
進迴圈之前(迴圈外)放置
DECK:=date<>ref(date,1) or barpos=0;

迴圈內之頂端放置
if DECK[i] then 進場次數=0;

改成下面的樣子，但還是沒反應，請教還有哪裡有問題呢?謝謝

A:=STKINDI('','指標1.比值',0,-1) LINETHICK0;
強出:=time>133000;
NowLS:=0; //1.多, -1.空, 0.無
DoLS:C*0; CC:=C; HH:=H; LL:=L;
損控:=30; 控盈基:=50; 控盈衰率:=33/100; 進場次數:=0;
DECK:=date<>ref(date,1) or barpos=0;
StNo:=lbound(指標A);
指標A_H:=指標A*0; 指標A_L:=指標A*0;
指標A_H[StNo]:=指標A[StNo]; 指標A_L[StNo]:=指標A[StNo];
for i=StNo+1 to datacount do begin
if DECK[i] then 進場次數=0;
指標A_H[i]:=指標A_H[i-1]; 指標A_L[i]:=指標A_L[i-1];
if 指標A[i]>指標A_H[i] then 指標A_H[i]:=指標A[i];
if 指標A[i]<指標A_L[i] then 指標A_L[i]:=指標A[i];
進L:=指標A[i]>指標A_L[i]+100 and Not(指標A[i-1]>指標A_L[i-1]+100) and 指標A_L[i]>0 and 強出[i]=0; //多進
進S:=指標A_H[i]-100>指標A[i] and Not(指標A_H[i-1]-100>指標A[i-1]) and 指標A_H[i]<0 and 強出[i]=0; //空進
出L:=進S; //多出
出S:=進L; //空出
Do進:=進L-進S; Do出:=出L-出S;
if NowLS=0 and 進場次數=0 then begin
NowLS:=Do進; DoLS[i]:=NowLS; Max盈:=0; 進場次數=1;
if NowLS<>0 then begin
進價:=CC[i]; 指標A_H[i]:=指標A[i]; 指標A_L[i]:=指標A[i];
end;
end else begin
if NowLS=-Do進 then begin
NowLS:=Do進; DoLS[i]:=NowLS*3; 進價:=CC[i]; Max盈:=0;//反手
指標A_H[i]:=指標A[i]; 指標A_L[i]:=指標A[i];
end else begin
if 強出[i] then begin
DoLS[i]:=NowLS*6; NowLS:=0; //強制出場
~~~~ 以下簡略~~~~

向版主報告此篇 |

2011-02-14 20:49

cgjj
總版主

註冊日期: Oct 2003
來　　自:
文章數量: 18236

if NowLS=0 and 進場次數=0 then begin
NowLS:=Do進; DoLS[i]:=NowLS; Max盈:=0; 進場次數=1;
if NowLS<>0 then begin
進價:=CC[i]; 指標A_H[i]:=指標A[i]; 指標A_L[i]:=指標A[i];
end;

改為

if NowLS=0 and 進場次數=0 then begin
NowLS:=Do進; DoLS[i]:=NowLS; Max盈:=0;
if NowLS<>0 then begin
進價:=CC[i]; 指標A_H[i]:=指標A[i]; 指標A_L[i]:=指標A[i];
進場次數=1;
end;

向版主報告此篇 |

2011-02-15 09:36

yisong
資深會員

註冊日期: Jan 2010
來　　自:
文章數量: 137

引用:
最初由 cgjj 發表
if NowLS=0 and 進場次數=0 then begin
NowLS:=Do進; DoLS[i]:=NowLS; Max盈:=0; 進場次數=1;
if NowLS<>0 then begin
進價:=CC[i]; 指標A_H[i]:=指標A[i]; 指標A_L[i]:=指標A[i];
end;

改為

if NowLS=0 and 進場次數=0 then begin
NowLS:=Do進; DoLS[i]:=NowLS; Max盈:=0;
if NowLS<>0 then begin
進價:=CC[i]; 指標A_H[i]:=指標A[i]; 指標A_L[i]:=指標A[i];
進場次數=1;
end;

版主您好，謝謝您的回覆，在修改完成為您說的方式後，這個進場次數還是一樣一直都是維持等於0，請幫忙看一下是甚麼情形呢?

向版主報告此篇 |

2011-02-15 10:17

cgjj
總版主

註冊日期: Oct 2003
來　　自:
文章數量: 18236

引用:
最初由 yisong 發表
版主您好，謝謝您的回覆，在修改完成為您說的方式後，這個進場次數還是一樣一直都是維持等於0，請幫忙看一下是甚麼情形呢?

問題應該在於您這邊的處理, 少衡量一個狀況

原先結構是
if NowLS=0 then begin
.....................
end else begin
..................... //此區當 NowLS<>0 才會被跑到
end;

變更後的結構是
if NowLS=0 and 進場次數=0 then begin
.....................
end else begin
..................... //此區除了 NowLS<>0 , 當 NowLS=0 且進場次數>0 時也會跑到
end;

加了 and 進場次數=0 破壞了原有架構了
應該採內縮一層的方式處理, 而非用 and 在同層次處理
寫程式碰到像這樣的部份處理要特別小心....

向版主報告此篇 |

2011-02-15 10:28

yisong
資深會員

註冊日期: Jan 2010
來　　自:
文章數量: 137

引用:
最初由 cgjj 發表
問題應該在於您這邊的處理, 少衡量一個狀況

原先結構是
if NowLS=0 then begin
.....................
end else begin
..................... //此區當 NowLS<>0 才會被跑到
end;

變更後的結構是
if NowLS=0 and 進場次數=0 then begin
.....................
end else begin
..................... //此區除了 NowLS<>0 , 當 NowLS=0 且進場次數>0 時也會跑到
end;

加了 and 進場次數=0 破壞了原有架構了
應該採內縮一層的方式處理, 而非用 and 在同層次處理
寫程式碰到像這樣的部份處理要特別小心....

還是不行，看來只好放棄這樣的寫法了，版主有其他建議的方式嗎?

向版主報告此篇 |

2011-02-15 15:38

cgjj
總版主

註冊日期: Oct 2003
來　　自:
文章數量: 18236

引用:
最初由 yisong 發表
還是不行，看來只好放棄這樣的寫法了，版主有其他建議的方式嗎?

只有片段較難協助您, 改這樣看看

for i=StNo+1 to datacount do begin
if DECK[i] then 進場次數=0;
指標A_H[i]:=指標A_H[i-1]; 指標A_L[i]:=指標A_L[i-1];
if 指標A[i]>指標A_H[i] then 指標A_H[i]:=指標A[i];
if 指標A[i]<指標A_L[i] then 指標A_L[i]:=指標A[i];
進L:=指標A[i]>指標A_L[i]+100 and Not(指標A[i-1]>指標A_L[i-1]+100) and 指標A_L[i]>0 and 強出[i]=0; //多進
進S:=指標A_H[i]-100>指標A[i] and Not(指標A_H[i-1]-100>指標A[i-1]) and 指標A_H[i]<0 and 強出[i]=0; //空進
出L:=進S; //多出
出S:=進L; //空出
Do進:=進L-進S; Do出:=出L-出S;
if NowLS=0 then begin
NowLS:=Do進*(進場次數=0); DoLS[i]:=NowLS; Max盈:=0
if NowLS<>0 then begin
進價:=CC[i]; 指標A_H[i]:=指標A[i]; 指標A_L[i]:=指標A[i]; 進場次數=1;
end;
end else begin
if NowLS=-Do進*(進場次數=0) then begin
NowLS:=Do進; DoLS[i]:=NowLS*3; 進價:=CC[i]; Max盈:=0;//反手
指標A_H[i]:=指標A[i]; 指標A_L[i]:=指標A[i]; 進場次數=1;
end else begin
if 強出[i] then begin
DoLS[i]:=NowLS*6; NowLS:=0; //強制出場
~~~~ 以下簡略~~~~

向版主報告此篇 |

2011-02-15 15:55

全部時間均為台灣時間, 現在時間為10:07

總頁數 (3): « 1 2 [3]

上一主題下一主題

顯示可列印版本 |

訂閱此主題

論壇跳轉:

主題評分:

論壇規定:

你不可以發表新主題
你不可以回覆文章
你不可以上傳附件
你不可以編輯自己的文章

HTML語法禁止
vB 語法核准
表情符號核准
貼圖語法[IMG]核准

本站所有內容未經作者授權禁止轉貼節錄, 發表言論僅供參考勿作為投資決策依據。瀏覽本站請使用 IE 5.5 以上版本, 最佳瀏覽解析度 1024 x 768 全彩。