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

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

奇狐社區論壇 > 指標公式 > 問題交流 > [求救]再問K棒序號

上一主題下一主題

作者

主題

am1200
資深會員

註冊日期: Jan 2004
來　　自:
文章數量: 107

[求救]再問K棒序號

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

向版主報告此篇 |

2004-08-05 17:39

king
版主

註冊日期: Jan 2004
來　　自:
文章數量: 2783

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

向版主報告此篇 |

2004-08-05 18:43

am1200
資深會員

註冊日期: Jan 2004
來　　自:
文章數量: 107

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

向版主報告此篇 |

2004-08-05 19:43

king
版主

註冊日期: Jan 2004
來　　自:
文章數量: 2783

取得K線的序號
我是書僮

向版主報告此篇 |

2004-08-05 20:17

南客
初級會員

註冊日期: Aug 2004
來　　自:
文章數量: 6

回覆: [求救]再問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);

向版主報告此篇 |

2004-08-13 12:53