奇狐社區論壇 - [求救]再問K棒序號

奇狐社區論壇 (http://www.chiefox.com.tw/bbs/index.php)
- 問題交流 (http://www.chiefox.com.tw/bbs/forumdisplay.php?forumid=28)
-- [求救]再問K棒序號 (http://www.chiefox.com.tw/bbs/showthread.php?threadid=1360)

由 am1200 在 2004-08-05 17:39 發表:

[求救]再問K棒序號

我要寫某一日到某一日總量，使用VBS時，要導入指定K棒序號，要怎樣寫呢？
如計算前60日到前20日總量。

由 king 在 2004-08-05 18:43 發表:

總量:SUM(IF(BACKSET(ISLASTBAR,60),V,0),0)-SUM(IF(BACKSET(ISLASTBAR,20),V,0),0);

由 am1200 在 2004-08-05 19:43 發表:

謝謝king的回復。
但是這不是我想要的，因為無法做個別加權運算。
所以，我還是得知道K棒序號如何導入VBS

由 king 在 2004-08-05 20:17 發表:

取得K線的序號
我是書僮

由南客在 2004-08-13 12:53 發表:

回覆: [求救]再問K棒序號

引用:
最初由 am1200 發表
我要寫某一日到某一日總量，使用VBS時，要導入指定K棒序號，要怎樣寫呢？
如計算前60日到前20日總量。

原碼:


fvs:=vol;

<%

vsum=ffl.vardata("fvs")

last=ubound(vsum) '&#25968;&#32452;的最大下&#26631;，&#23545;&#24212;最后一&#26465;K&#32447;

''''''&#25968;&#32452;的每一&#20010;元素，&#23545;&#24212;1&#26465;K&#32447;，第1&#20010;元素即vsum(0)&#23545;&#24212;第1&#26465;K&#32447;，

''''''最后一&#20010;元素即vsum(last)，&#23545;&#24212;最后1&#26465;K&#32447;

if last>59 then

  for i=last to 60 step -1

    temp=0

    for j=i-60 to i-20 

      temp=temp+vsum(j)

    next

    vsum(i)=temp

  next

end if

ffl.vardata("fvs")=vsum

ffl.varstartindex("fvs")=60

%>

fvs;

fvs1:ref(sum(vol,41),20);

fvs:=vol;
<%
vsum=ffl.vardata("fvs")
last=ubound(vsum) '数组的最大下标，对应最后一条K线
''''''数组的每一个元素，对应1条K线，第1个元素即vsum(0)对应第1条K线，
''''''最后一个元素即vsum(last)，对应最后1条K线
if last>59 then
for i=last to 60 step -1
temp=0
for j=i-60 to i-20
temp=temp+vsum(j)
next
vsum(i)=temp
next
end if
ffl.vardata("fvs")=vsum
ffl.varstartindex("fvs")=60
%>
fvs;
fvs1:ref(sum(vol,41),20);

由 steven 在 2004-08-13 23:52 發表:

請問如果要指定某日到某日的累積總成交量，要怎麼寫公式呢？例如 7/12 到8/5 的累積總成交量？麻煩大家費心了！謝謝

由 steven 在 2004-08-13 23:59 發表:

請問如果要指定某日到某日的累積總成交量，要怎麼寫公式呢？例如 7/12 到8/5 的累積總成交量？麻煩大家費心了！謝謝

全部時間均為台灣時間, 現在時間為08:12

在這個頁面顯示本主題全部的 7 個文章