欢迎使用金字塔普通技术服务论坛，您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴，普通区问题处理速度慢，请耐心等待。谢谢您对我们的支持与理解。


金字塔客服中心 - 专业程序化交易软件提供商 → 金字塔软件 → 金字塔软件问题提交 → VBA中的指标函数marketdata.STKINDI

   

欢迎使用金字塔普通技术服务论坛，您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴，普通区问题处理速度慢，请耐心等待。谢谢您对我们的支持与理解。    

  共有4633人关注过本帖树形打印复制链接

主题：VBA中的指标函数marketdata.STKINDI
帅哥哟，离线，有人找我吗？
aris37
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：4 积分：0 威望：0 精华：0 注册：2016/6/20 11:27:47 		VBA中的指标函数marketdata.STKINDI  发帖心情 Post By：2016/6/20 11:31:32 [显示全部帖子]

多谢。是这样的，我打开金字塔后，保持连接状态，手动同步补充后，过了一两个小时又不同步了，想问一下，能不能在我打开金字塔以后，自动补充全历史数据，同时
接收实时行情？
 回到顶部
帅哥哟，离线，有人找我吗？
aris37
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：4 积分：0 威望：0 精华：0 注册：2016/6/20 11:27:47 		  发帖心情 Post By：2016/6/20 12:35:59 [显示全部帖子]

前提条件：
1. 金字塔已经启动，并连接上了期货行情服务器，并始终保持连接状态；

预期结果：
1. 所有的期货实时数据会推送过来，不用为每一个品种单独打开行情窗口数据才能推送过来；

问题现象：
1. 假如上次补充完数据，数据最新时间是到上午9点，然后关闭行情窗口；11点的时候，我再打开这个
    品种的行情窗口，它的行情最新数据是上次补充完的9点数据，而不是我预期的11点的最新数据
 回到顶部
帅哥哟，离线，有人找我吗？
aris37
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：4 积分：0 威望：0 精华：0 注册：2016/6/20 11:27:47 		VBA中的指标函数marketdata.STKINDI  发帖心情 Post By：2016/6/20 13:27:53 [显示全部帖子]

1. 在上面的例子中，VBA的值也是上午9点，而不是实时11点的数据，所有就导致我不能用VBA实时监控。

2. 要怎样把Formula放到计算器里面啊？ 现在我的做法是这样的，但是有问题：必须点开品种的行情窗口，实时数据才是正确的
    Sub APPLICATION_Timer(ID) 

              Set Formula1 = marketdata.STKINDI(Report1.Label,Report1.MarketName,"MACD(26,12,9)",0,4) 
              mDIFF2 = Formula1.GetBufData("DIFF", Formula1.DataSize-1)
              mDEA2 = Formula1.GetBufData("DEA", Formula1.DataSize-1)
              mDIFF3 = Formula1.GetBufData("DIFF", Formula1.DataSize-2)
              mDEA3 = Formula1.GetBufData("DEA", Formula1.DataSize-2)
              
              If (mDIFF3 < mDEA3) And (mDIFF2 >  mDEA2)  Then 
                 crossDic.add Report1.StockName & ","& Report1.Label, “金叉"
                 
              End If
              
              If (mDIFF3 > mDEA3) And (mDIFF2 < mDEA2)  Then
                 crossDic.add Report1.StockName & ","& Report1.Label, "死叉"
              End If
 
    End Sub
    
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版    Powered By weistock 2012
页面执行时间 00.05078 秒, 6 次数据查询