Rss & SiteMap

金字塔客服中心 - 专业程序化交易软件提供商 http://www.weistock.com/bbs/

专业程序化软件提供商
共5 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:开平仓

1楼
黄金精算师 发表于:2016/1/25 20:36:39

版主帮我做一个后台的开平仓,没有做过后台的,这直接上实盘,帮我写细一点

账户:'1000';
套利品种1:'IF02';
套利品种2:'IF09';

限制一天最多只能开平仓一次,可先平后开//不能平今仓, 如今仓被平或程序不能执行开平处理,消息不停的输出:平仓异常!

 

//开仓处理程序

我手工在"买入 卖出"那里挂单买入IF09;

当程序检测到我的手工买入成交后,立即反方向出卖价-0.2挂单做空IF02;//如果IF09是买多,那程序自动做空IF02     意思就是以最快的速度卖入,买入(比市场标价再高或低一个波动点)

                                                //如果是IF09是做空,那IF02就做多

//平仓处理程序

我手工在"买入 卖出"那里挂单平掉IF09;

当程序检测到我的手工平仓成交后,立即反方向出卖价+0.2挂单平IF02;// 如果是平IF02那就快速平IF09,防止单腿

 

//程序以最快的速度扫描买入或卖出,软件按平常默认设置,开平仓全部由后台程序完成

 



 

 

2楼
黄金精算师 发表于:2016/1/26 11:10:03
是不是出金币就可以,那有能做的复一下多少金币
3楼
黄金精算师 发表于:2016/1/26 17:49:06

Sub ORDER_OrderStatusEx2(OrderID, Status, Filled, Remaining, Price, Code, Market, OrderType, Aspect, Kaiping, Account, AccountType)
' ORDER_OrderStatusEx2事件触发                   
'dim ordIDordID=Order.buy()这里的ordID就是返回的订单号
if Status="Tradeing" and filled>0 and Account="609476" then
'
if aspect=0 then
'
if kaiping=0 then order.Buy 1,filled,0,0,code,market,"609476",0
'
if kaiping>0 then order.sellshort 1,filled,0,0,code,market,"609476",0
'
end if
if aspect=1 then
'
if kaiping=0 then order.Buyshort 1,filled,0,0,code,market,"609476",0
'
if kaiping>0 then order.sell 1,filled,0,0,code,market,"609476",0
'
end if
end if
End Sub

 

 

‘不知道金币怎么折价,100块人民币有人帮修写好吗,到时可以充论坛的币也可直接转帐。

4楼
yukizzc 发表于:2016/1/27 13:41:36

3楼这个没问题啊,关键你看下帮助-vba编程信息,里面的内部对象-order

3楼这边的代码需要用的都是那个对象下的,例如buy函数里面各个参数意义,建议您先好好看下

5楼
王锋 发表于:2016/1/27 13:43:36

http://www.weistock.com/bbs/dispbbs.asp?boardid=16&Id=55127

请认真的看一遍里面的VBA的视频教程

共5 条记录, 每页显示 10 条, 页签: [1]


Powered By Dvbbs Version 8.3.0
Processed in 0.03125 s, 2 queries.