[求助]帮我看下这段代码有什么毛病... - 高级功能研发区 - 金字塔客服中心 - 专业程序化交易软件提供商

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

金字塔客服中心 - 专业程序化交易软件提供商 → 金字塔软件 → 高级功能研发区 → [求助]帮我看下这段代码有什么毛病...

共有4524人关注过本帖树形打印复制链接主题：[求助]帮我看下这段代码有什么毛病...

bbking

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：小飞侠帖子：1609 积分：4924 威望：0 精华：0 注册：2010/10/28 14:02:46

[求助]帮我看下这段代码有什么毛病... 发帖心情

Post By：2012/9/3 13:12:58 [只看该作者]

Sub ORDER_OrderStatusEx2(OrderID, Status, Filled, Remaining, Price, Code, Market, OrderType, Aspect, Kaiping, Account, AccountType)

dim acfl1
acfl1="800007"'跟踪帐户
if Status="Tradeing" and filled>0 and Account=acfl1 and code="if09" then

if aspect=0 then

call Document.SetExtData("ACFL1_thold_if",document.GetExtData("ACFL1_thold_if")+filled)
end if

if aspect=1 then

call Document.SetExtData("ACFL1_thold_if",document.GetExtData("ACFL1_thold_if")-filled)
end if

end if

End Sub

=====================

买入N手外生全局变量就加上N手

卖出N手外生全局变量就减去N手~

但是无论我怎么操作那个ACFL1_thold_if还是等于0...

[此贴子已经被作者于2012-9-3 13:21:17编辑过]