cgjj
總版主
註冊日期: Oct 2003
來 自:
文章數量: 18095 |
|
回覆: 回覆: 回覆: 指標公式撰寫
引用:
最初由 PZ0532 發表
如下圖說明
警告: 本公式計算量很重, 請謹慎設定計算K棒數
原碼:
KN:=500; //設定只算近期 500 根
VV:=V;
SP:C*0-1; //SP值為距離(-1,代表無符合)
StNo:=datacount-KN+1;
if StNo<1 then StNo:=1;
for i=datacount downto StNo do begin
for j=i-1 downto 1 do begin
if VV[j]>VV[i]*3 then begin
SP[i]:=i-j; break;
end;
end;
end;
x:=SETLBOUND(SP,StNo);
|
|
向版主報告此篇 |  |
|
2011-09-11 17:28
