以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://222.73.7.161/bbs/index.asp)
--  高级功能研发区  (http://222.73.7.161/bbs/list.asp?boardid=5)
----  array / minuteData 的问题，  (http://222.73.7.161/bbs/dispbbs.asp?boardid=5&id=2224)
--  作者：martingale
--  发布时间：2010/7/23 10:47:08
--  array / minuteData 的问题，
function simpletest( )

    dim d
    dim i
    dim x
    dim period
    period = 30
    set MinuteData = marketdata.GetMinuteData( "ZN10", "SQ" )
    Set d = CreateObject("Stock.Array")
   
    if MinuteData.count > period then
        for i =0 to period -1 step 1
            x = minutedata.newprice(i)
            d.addback( x )
        next
    end if
    
    simpletest= d.forcast
    
    msgbox simpletest

end function

我的问题是为什么d.forcast不随着时间的变化而变化哪？
--  作者：martingale
--  发布时间：2010/7/23 11:26:54
--  
 或者是这么问
GetMinuteData得到的是什么顺序的数据哪？有没有什么办法能把它们列表列出来或者什么debug 的办法能放个break point 什么的。
--  作者：wattwei
--  发布时间：2010/7/23 14:21:05
--  
 可以写到个文件里看啊。
--  作者：admin
--  发布时间：2010/7/23 22:05:01
--  

for i =0 to period -1 step 1
            x = minutedata.newprice(i)
            d.addback( x )
        next

因为你的period参数每次都是一个固定的值，你每次都是计算的1－30周期之间的数据，难道还会出现每次计算都不一样的情况？
--  作者：martingale
--  发布时间：2010/7/24 6:20:48
--  
 我试着
for i = MinuteData.count -1 to MinuteData.count - period step -1
结果也是一直不变的。
--  作者：admin
--  发布时间：2010/7/24 7:50:40
--  
不知道你是如何测试他不变的，marketdata.GetMinuteData获取的只是静态变量，你需要当有行情刷新时，重新调用marketdata.GetMinuteData方法，这样我们就得到了一个随行情变化的对象
--  作者：admin
--  发布时间：2010/7/24 9:21:24
--  

目前的版本，可能再反复处理数据时有些BUG，我们将会在下个升级版修正问题。
--  作者：martingale
--  发布时间：2010/7/26 9:25:25
--  
以下是引用wattwei在2010-7-23 14:21:05的发言：
 可以写到个文件里看啊。
请问如何写到文件？
谢谢
--  作者：wattwei
--  发布时间：2010/7/26 9:31:49
--  
给个模板
 
    logSpec="D:\\Weisoft Stock\\cal.log"
    Set fso=createobject("Scripting.FileSystemObject")
    Set logFile=fso.OpenTextFile(logSpec,8,1)
   

    logFile.Write()
    logFile.WriteLine()


    logFile.close()