奇狐社區論壇 - [求救]運算邏輯問題。

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

奇狐社區論壇 > 指標公式 > 問題交流 > [求救]運算邏輯問題。

上一主題下一主題

作者

主題

winston_hsieh
初級會員

註冊日期: Aug 2012
來　　自:
文章數量: 17

[求救]運算邏輯問題。

各位前輩大家好：

1、請教，在迴圈由1到100，執行A=A+2，奇狐程式如何寫。
2:下列程式執行會出現指標數組下標越界或超出有效數據區間。^^?。請賜教，謝謝！

Price:=(High+Low)/2;
InPhase:=C*0;
Phase:=C*0;
AbsInPhase:=C*0;
Quadrature:=C*0;
DC:=datacount;
FOR i=1 to datacount do begin
LKB:=datacount-i;
if i >5 then begin
iValue1:=Price-ref(Price,6);
iValue2:=ref(iValue1,3);
iValue3:=0.75*(iValue1-ref(iValue1,6))+0.25*(ref(iValue1,2)-ref(iValue1,4));
IP33:=0.33*iValue2;
InPhase:=IP33;
IP67:=0.67*ref(InPhase,1);
InPhase:=IP33+IP67;
Qd2:=0.2*iValue3;
Quadrature:=Qd2;
Qd8:=0.67*ref(Quadrature,1);
Quadrature:=Qd2+Qd8;

AbsInPhase:=ABS(InPhase +ref(InPhase,1));

ABI:=AbsInPhase[0];

if ABI>0 then begin
A:5;
end;

end;
end;

向版主報告此篇 |

2013-10-11 10:10

cgjj
總版主

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

回覆: [求救]運算邏輯問題。

引用:
最初由 winston_hsieh 發表
各位前輩大家好：

1、請教，在迴圈由1到100，執行A=A+2，奇狐程式如何寫。
2:下列程式執行會出現指標數組下標越界或超出有效數據區間。^^?。請賜教，謝謝！

Price:=(High+Low)/2;
InPhase:=C*0;
Phase:=C*0;
AbsInPhase:=C*0;
Quadrature:=C*0;
DC:=datacount;
FOR i=1 to datacount do begin
LKB:=datacount-i;
if i >5 then begin
iValue1:=Price-ref(Price,6);
iValue2:=ref(iValue1,3);
iValue3:=0.75*(iValue1-ref(iValue1,6))+0.25*(ref(iValue1,2)-ref(iValue1,4));
IP33:=0.33*iValue2;
InPhase:=IP33;
IP67:=0.67*ref(InPhase,1);
InPhase:=IP33+IP67;
Qd2:=0.2*iValue3;
Quadrature:=Qd2;
Qd8:=0.67*ref(Quadrature,1);
Quadrature:=Qd2+Qd8;

AbsInPhase:=ABS(InPhase +ref(InPhase,1));

ABI:=AbsInPhase[0];

if ABI>0 then begin
A:5;
end;

end;
end;

Re1:
您所問的 A=A+2, A是數列嗎(陣列)? 還是單一數值?

Re2:
奇狐本身的數列並無第零個元素, 在奇狐當中它是自壹數起
故不會有 AbsInPhase[0] 這個元素
這段程式若是網路找來的, 它可能並非是奇狐所用的公式
(可能是其它與奇狐語法相似的軟體)

向版主報告此篇 |

2013-10-11 11:14

winston_hsieh
初級會員

註冊日期: Aug 2012
來　　自:
文章數量: 17

回覆: 回覆: [求救]運算邏輯問題。

引用:
最初由 cgjj 發表
Re1:
您所問的 A=A+2, A是數列嗎(陣列)? 還是單一數值?

Re2:
奇狐本身的數列並無第零個元素, 在奇狐當中它是自壹數起
故不會有 AbsInPhase[0] 這個元素
這段程式若是網路找來的, 它可能並非是奇狐所用的公式
(可能是其它與奇狐語法相似的軟體)

一、抱歉，對奇狐語法陣列或單一數值的辨別方式不是很清楚，若A為陣列或單一數值的寫法各為何^^"?。

二、是TS程式想轉奇狐，誠如總版主之前所說，各軟體有不同語法及執行方式。痛苦呀！>"<努力嘗試體會奇狐運作方式中。
若改為ABI:=AbsInPhase[i];執行還是會出現指標數組下標越界或超出有效數據區間。
若我需求只要AbsInPhase>0就進入判斷式那該如何寫！^^"謝謝！

向版主報告此篇 |

2013-10-11 15:56

cgjj
總版主

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

回覆: 回覆: 回覆: [求救]運算邏輯問題。

引用:
最初由 winston_hsieh 發表
一、抱歉，對奇狐語法陣列或單一數值的辨別方式不是很清楚，若A為陣列或單一數值的寫法各為何^^"?。

與K棒相關之數, 通常都是數列
例如 H 這個價, 有100根K棒, 最多即可能會有100個價在其中

//a非數列, 計算完僅有一個數
a:0;
for i=1 to 100 do begin
a:=a+2;
end;

//a為數列, 計算完頭100根K棒有數值, 其餘為零
a:C*0; //建立一個與K棒等長的零值數列
for i=2 to 100 do begin
a[i]:=a[i-1]+2;
end;

向版主報告此篇 |

2013-10-11 16:09

cgjj
總版主

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

回覆: 回覆: 回覆: [求救]運算邏輯問題。

引用:
最初由 winston_hsieh 發表

二、是TS程式想轉奇狐，誠如總版主之前所說，各軟體有不同語法及執行方式。痛苦呀！>"<努力嘗試體會奇狐運作方式中。
若改為ABI:=AbsInPhase[i];執行還是會出現指標數組下標越界或超出有效數據區間。
若我需求只要AbsInPhase>0就進入判斷式那該如何寫！^^"謝謝！

不建議用程式碼去轉換(架構不同, 特性不同)
請給計算原理規則, 這樣比較容易協助您唷

向版主報告此篇 |

2013-10-11 16:11