给大家一个，定时定价平仓指令，并请大家提宝贵意见： [复制链接]

cfmx2007

初级大户

天蓬大元帅

Rank: 5 Rank: 5

精华: 0
UID: 1138
积分: 1217
帖子: 161
主题: 61
阅读权限: 60
注册时间: 2008-1-30
最后登录: 2009-10-5

电梯直达

1^#

发表于 2008-11-7 11:01:49 |只看该作者 |倒序浏览

Params
Numeric nTime1(0.1458000);
Numeric nTime2(0.1530000);
Numeric pnPrice1(1000000);
Numeric pnPrice2(0);
Vars
Numeric Con1(False);
Numeric Con2(False);
Begin
Con1=(Time>=nTime1 && Time<nTime2) && (Q_AskPrice>pnPrice1 || Q_AskPrice<pnPrice2);
Con1=(Time>=nTime1 && Time<nTime2) && (Q_BidPrice>pnPrice1 || Q_BidPrice<pnPrice2);
//如果持有多仓
If(A_BuyPosition>0)
{
If(Con1)
{
A_SendOrder(Enum_Sell,Enum_Exit,A_BuyPosition,Q_AskPrice);
}
}
//如果持有空仓
If(A_SellPosition>0)
{
If(Con2)
{
A_SendOrder(Enum_Buy,Enum_Exit,A_SellPosition,Q_BidPrice);
}
}
End

收藏1

交易开拓者QQ群：1群：38529330，2群：24771838，3群：39107556，4群：38478324。。。

使用道具举报

cfmx2007

初级大户

天蓬大元帅

Rank: 5 Rank: 5

精华: 0
UID: 1138
积分: 1217
帖子: 161
主题: 61
阅读权限: 60
注册时间: 2008-1-30
最后登录: 2009-10-5

2^#

发表于 2008-11-7 11:13:01 |只看该作者

再升级成带全局变量的：

Params
Numeric pnTime1(0.1458000);
Numeric pnTime2(0.1530000);
Numeric pnPrice1(1000000);
Numeric pnPrice2(0);
Numeric pnTimes(3);
Vars
Numeric Con1(False);
Numeric Con2(False);
Begin
Con1=(Time>=pnTime1 && Time<pnTime2) && (Q_AskPrice>pnPrice1 || Q_AskPrice<pnPrice2);
Con1=(Time>=pnTime1 && Time<pnTime2) && (Q_BidPrice>pnPrice1 || Q_BidPrice<pnPrice2);
//初始化全局变量
If(BarStatus==0)
{
SetGlobalVar(0,0);
SetGlobalVar(1,0);
}
//如果持有多仓
If(A_BuyPosition>0)
{
If(Con1)
{
If(GetGlobalVar(0)>pnTimes)
{
A_SendOrder(Enum_Sell,Enum_Exit,A_BuyPosition,Q_AskPrice);
SetGlobalVar(0,0);
}
SetGlobalVar(0,GetGlobalVar(0)+1);
}
}
//如果持有空仓
If(A_SellPosition>0)
{
If(Con2)
{
If(GetGlobalVar(1)>pnTimes)
{
A_SendOrder(Enum_Buy,Enum_Exit,A_SellPosition,Q_BidPrice);
SetGlobalVar(1,0);
}
SetGlobalVar(1,GetGlobalVar(1)+1);
}
}
End

交易开拓者QQ群：1群：38529330，2群：24771838，3群：39107556，4群：38478324。。。

使用道具举报

cfmx2007

初级大户

天蓬大元帅

Rank: 5 Rank: 5

精华: 0
UID: 1138
积分: 1217
帖子: 161
主题: 61
阅读权限: 60
注册时间: 2008-1-30
最后登录: 2009-10-5

3^#

发表于 2008-11-7 11:25:57 |只看该作者

最终版：
另外提个意见，写的指令多了，自己就忘记怎么用了，能否在模板中增加“说明”这样一个注释啊？

/*
说明：
当时间符合pnTime条件，即大于pnTime1小于pnTime2，价格符合nPrice条件，即价格大于pnPrice1小于pnPrice2时，执行平仓操作。
*/

Params
Numeric pnTime1(1458000);
Numeric pnTime2(1530000);
Numeric pnPrice1(1000000);
Numeric pnPrice2(0);
Numeric pnTimes(3);
Vars
Bool Con1(False);
Bool Con2(False);
Begin
Con1=(Time>=pnTime1/10000000 && Time<pnTime2/10000000) && (Q_AskPrice>pnPrice1 || Q_AskPrice<pnPrice2);
Con1=(Time>=pnTime1/10000000 && Time<pnTime2/10000000) && (Q_BidPrice>pnPrice1 || Q_BidPrice<pnPrice2);
//初始化全局变量
If(BarStatus==0)
{
SetGlobalVar(0,0);
SetGlobalVar(1,0);
}
//如果持有多仓
If(A_BuyPosition>0)
{
If(Con1)
{
If(GetGlobalVar(0)>pnTimes)
{
A_SendOrder(Enum_Sell,Enum_Exit,A_BuyPosition,Q_AskPrice);
SetGlobalVar(0,0);
}
SetGlobalVar(0,GetGlobalVar(0)+1);
}
}
//如果持有空仓
If(A_SellPosition>0)
{
If(Con2)
{
If(GetGlobalVar(1)>pnTimes)
{
A_SendOrder(Enum_Buy,Enum_Exit,A_SellPosition,Q_BidPrice);
SetGlobalVar(1,0);
}
SetGlobalVar(1,GetGlobalVar(1)+1);
}
}
End

[ 本帖最后由 cfmx2007 于 2008-11-7 11:27 编辑 ]

交易开拓者QQ群：1群：38529330，2群：24771838，3群：39107556，4群：38478324。。。

使用道具举报