奇狐社區論壇 - [求救]請問陣列的問題

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

奇狐社區論壇 > 指標公式 > 問題交流 > [求救]請問陣列的問題

上一主題下一主題

作者

主題

Gary_007
初級會員

註冊日期: May 2007
來　　自: 台北
文章數量: 3

[求救]請問陣列的問題

我想計算外資成本
構想如下:
第1日金額:=第1日外資持股*第1日DC;
第1日成本:=第1日金額 / 第1日外資持股;

第2日金額:=第2日G1*第2日DC + 第1日成本*(第1日外資持股-第2日G2);
第2日成本:=第2日金額 / (第1日外資持股+G3);

第3日金額:=第3日G1*第3日DC + 第2日成本*(第2日外資持股-第3日G2);
第3日成本:=第3日金額 / (第2日外資持股+G3);

//==========================================
程式如下:
DC:=(H+L+O+2*C)/5;
G1:galdata(1),Colorwhite,Linethick0; CTG2:=DC*G1; //外資買進量
G2:galdata(2),Colorwhite,Linethick0; //外資賣出量
G3:galdata(3),Colorwhite,Linethick0; //外資買賣超

G1:=if((G1=0) and (G2=0) and G3 >0,G3,G1);
G2:=if((G1=0) and (G2=0) and G3 <0,-G3,G2);

外股:FGNDATA(4)/1000,Colorwhite,Linethick0;
外股1:sum(G1-G2,0),Colorwhite,Linethick0;
ck1:barslast(外股 = 外股1),Colorwhite,Linethick0;
ck2:barslast(外股 <> 外股1),Colorwhite,Linethick0;

G1:=if(ck1 =1 and 外股 > 外股1, 外股,G1);
外股1:=sum(G1-G2,0),Colorwhite,Linethick0;
G2:=if(ck2 =1 and 外股 < 外股1, ref(外股,1),G2);
外股1:=sum(G1-G2,0),Colorwhite,Linethick0;
G3:=G1-G2;

金額:DC*0,Colorwhite,Linethick0;
成本:金額/外股,Colorwhite,Linethick0;

for i = lbound(G1) to datacount do begin
金額[i]:=G1[i]*DC[i]+成本[i-1]*(外股[i-1]-G2[i]);
成本[i]:=金額[i]/(外股[i-1]+G3[i]);
end;

可是一直出現如下訊息:
外資10指標數組下標越界或超出有效數據區間

在此求助版主大人, 感恩

__________________
Gary

向版主報告此篇 |

2009-11-30 15:01

cgjj
總版主

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

回覆: [求救]請問陣列的問題

引用:
最初由 Gary_007 發表
我想計算外資成本
構想如下:
第1日金額:=第1日外資持股*第1日DC;
第1日成本:=第1日金額 / 第1日外資持股;

第2日金額:=第2日G1*第2日DC + 第1日成本*(第1日外資持股-第2日G2);
第2日成本:=第2日金額 / (第1日外資持股+G3);

第3日金額:=第3日G1*第3日DC + 第2日成本*(第2日外資持股-第3日G2);
第3日成本:=第3日金額 / (第2日外資持股+G3);

//==========================================
程式如下:
DC:=(H+L+O+2*C)/5;
G1:galdata(1),Colorwhite,Linethick0; CTG2:=DC*G1; //外資買進量
G2:galdata(2),Colorwhite,Linethick0; //外資賣出量
G3:galdata(3),Colorwhite,Linethick0; //外資買賣超

G1:=if((G1=0) and (G2=0) and G3 >0,G3,G1);
G2:=if((G1=0) and (G2=0) and G3 <0,-G3,G2);

外股:FGNDATA(4)/1000,Colorwhite,Linethick0;
外股1:sum(G1-G2,0),Colorwhite,Linethick0;
ck1:barslast(外股 = 外股1),Colorwhite,Linethick0;
ck2:barslast(外股 <> 外股1),Colorwhite,Linethick0;

G1:=if(ck1 =1 and 外股 > 外股1, 外股,G1);
外股1:=sum(G1-G2,0),Colorwhite,Linethick0;
G2:=if(ck2 =1 and 外股 < 外股1, ref(外股,1),G2);
外股1:=sum(G1-G2,0),Colorwhite,Linethick0;
G3:=G1-G2;

金額:DC*0,Colorwhite,Linethick0;
成本:金額/外股,Colorwhite,Linethick0;

for i = lbound(G1) to datacount do begin
金額[i]:=G1[i]*DC[i]+成本[i-1]*(外股[i-1]-G2[i]);
成本[i]:=金額[i]/(外股[i-1]+G3[i]);
end;

可是一直出現如下訊息:
外資10指標數組下標越界或超出有效數據區間

在此求助版主大人, 感恩