 |
a666666
中級會員
註冊日期: Nov 2007
來 自:
文章數量: 53 |
求肋
yy:=if(DATATYPE=6,weekday,if(DATATYPE=7,DAY,MONTH));
tj:=(yy-ref(yy,1)<>datediff(ref(date,1),date)) or barpos=1;;
if datacount>1 then for i=1 to datacount-1 do tj1[i]:=tj[i+1];
tj1[datacount]:=1;
老师:
请求帮肋用以上方法写出最高价,收盘价,最低价,开盘价,
|
|
向版主報告此篇 |  |
|
2011-08-31 12:23 |
|
|
|  |
 |
cgjj
總版主

註冊日期: Oct 2003
來 自:
文章數量: 18094 |
回覆: 求肋
引用: 最初由 a666666 發表
yy:=if(DATATYPE=6,weekday,if(DATATYPE=7,DAY,MONTH));
tj:=(yy-ref(yy,1)<>datediff(ref(date,1),date)) or barpos=1;;
if datacount>1 then for i=1 to datacount-1 do tj1[i]:=tj[i+1];
tj1[datacount]:=1;
老师:
请求帮肋用以上方法写出最高价,收盘价,最低价,开盘价,
該段程式是錯誤的, 是無法求出正確結果的
看不出其計算方法與求那四價有那些關連
亂拼湊程式, 會讓你錯的渾然不知
|
|
向版主報告此篇 |  |
|
2011-08-31 13:27 |
|
|
|  |
 |
a666666
中級會員
註冊日期: Nov 2007
來 自:
文章數量: 53 |
yy:=if(DATATYPE=6,weekday,if(DATATYPE=7,DAY,MONTH));
tj:=(yy-ref(yy,1)<>datediff(ref(date,1),date)) or barpos=1;;
if datacount>1 then for i=1 to datacount-1 do tj1[i]:=tj[i+1];
tj1[datacount]:=1;
fc:=c;fh:=h;fl:=l;fo:=o;pos:=0*close;
for i=1 to datacount do begin
if tj[i] then begin
hh:=fh[i]; ll:=fl[i]; oo:=fo[i]; p:=i;
end
else begin
fo[i]:=oo;
hh:=max(hh,fh[i]);
ll:=min(ll,fl[i]);
end;
if tj1[i] then begin
pos[(i+p)/2]:=1;
if i>1 then begin
for j=i downto 1 do begin
fc[j]:=fc[i]; fh[j]:=hh; fl[j]:=ll;
if tj[j] then break;
end;
end;
end;
end;
就是这公式
|
|
向版主報告此篇 |  |
|
2011-08-31 16:47 |
|
|
|  |
 |
cgjj
總版主

註冊日期: Oct 2003
來 自:
文章數量: 18094 |
引用: 最初由 a666666 發表
yy:=if(DATATYPE=6,weekday,if(DATATYPE=7,DAY,MONTH));
tj:=(yy-ref(yy,1)<>datediff(ref(date,1),date)) or barpos=1;;
if datacount>1 then for i=1 to datacount-1 do tj1[i]:=tj[i+1];
tj1[datacount]:=1;
fc:=c;fh:=h;fl:=l;fo:=o;pos:=0*close;
for i=1 to datacount do begin
if tj[i] then begin
hh:=fh[i]; ll:=fl[i]; oo:=fo[i]; p:=i;
end
else begin
fo[i]:=oo;
hh:=max(hh,fh[i]);
ll:=min(ll,fl[i]);
end;
if tj1[i] then begin
pos[(i+p)/2]:=1;
if i>1 then begin
for j=i downto 1 do begin
fc[j]:=fc[i]; fh[j]:=hh; fl[j]:=ll;
if tj[j] then break;
end;
end;
end;
end;
就是这公式
會說 "該段程式是錯誤的"
是其應用在分線, 結果會是錯的 ( 您輸出 tj 值去比對看就知道問題了 )
另外
這公式不是已經有自己另定義的開高低收了嗎? (fo,fc,fh,fl)
那您還要算什麼 "最高价,收盘价,最低价,开盘价" ??
建議您去問此公式的原創者比較洽當
|
|
向版主報告此篇 |  |
|
2011-08-31 18:14 |
|
|
|  |
本站所有內容未經作者授權禁止轉貼節錄, 發表言論僅供參考勿作為投資決策依據。瀏覽本站請使用 IE 5.5 以上版本, 最佳瀏覽解析度 1024 x 768 全彩。
|
Powered by: vBulletin Version 2.3.0 - Copyright©2000-, Jelsoft Enterprises Limited.
簡愛洋行 製作 Copyright 2003-. All Rights Reserved. 聯絡我們
|