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


金字塔客服中心 - 专业程序化交易软件提供商 → 金字塔软件 → 公式模型编写问题提交 → [原创]请教限制盘前平仓的时间代码

   

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

  共有3874人关注过本帖平板打印复制链接

主题：[原创]请教限制盘前平仓的时间代码
帅哥哟，离线，有人找我吗？
qwer123
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小飞侠 帖子：1966 积分：0 威望：0 精华：1 注册：2013/6/15 21:56:35 		  发帖心情 Post By：2013/8/26 15:43:16    Post IP：27.227.249.41[只看该作者]

你用这个模板：提前下单，什么时候收盘全有。

//股指期货自动交易程序(1分钟日内交易系统)
//编制:
//日期：2012年12月8日 定稿
{
//加密及期限
drawtextex(1,1,200,800,engincode());
rzb:=strcmp(engincode(),'aaaaaaaaaa');
if rzb<>0 then 
begin
drawtextex(1,1,500,500,'程序不能在此计算机上运行');
exit;
end

有效期:1121230,linethick0;
账号:11111,linethick0;
zhh:=strtonum(taccount(1));

if zhh<>账号 then 
begin
drawtextex(1,1,500,500,'授权账号不正确，程序无法使用');
exit;
end
if date>有效期 then
begin
drawtextex(1,1,500,500,'已过授权时间，程序无法使用');
exit;
end
if datatype<>1 then 
begin
drawtextex(1,1,50,950,'本程序使用1分钟周期，请切换到1分钟周期');
exit;
end
}
//========================================================
//交易控制变量
variable:a1=1;

//**********************************
//交易手数：
tn:=1;

//最大持仓量
cx:=1;

//提前下单量（秒）
xd:=3;

//交易时间区间
p1:=time>091500 and time<150000;
p2:=if(islastbar,dynainfo(207),time);
p3:=time0-timetot0(p2),linethick0;

//*******************************
r1:=barslast(date<>ref(date,1));
r2:=ref(o,r1);

//partline(r1>0,r2);

//*******************************
hd:=if(islastbar,8,2.0);
hd1:=if(islastbar,3,0.2);

//********************************
MA1:MA(CLOSE,5);
MA2:MA(CLOSE,25);

//*******************************
r10:=ref(asset,r1+1);
if r10-asset>3000 then a1:=-1;
if asset-r10>2000 then a1:=-1;

if a1<0 and p3<=xd then
begin
sell(1,tn,limitr,c-hd1);
sellshort(1,tn,limitr,c+hd1);
end

//*******************************
if cross(ma1,ma2) and a1>0 and p1 and p3<=xd then
begin
sellshort(holding<0,tn,limitr,c+hd1);
buy(holding=0,tn,limitr,c+hd1);
end

if cross(ma2,ma1) and a1>0 and p1 and p3<=xd then
begin
sell(holding>0,tn,limitr,c-hd1);
buyshort(holding=0,tn,limitr,c-hd1);
end
//**********收盘前清仓***********
if p2>=151000 then
begin
sellshort(holding<0,abs(holding),limitr,c+hd1);
sell(holding>0,holding,limitr,c-hd1);
a1:=1;
end
//*************************************
交易总数:totaltrade,colorwhite,linethick0;
盈亏:asset-1000000,colorred,linethick1,noaxis;
日盈亏:asset-ref(asset,r1+1),noaxis,colorred,linethick0;
持仓:holding,colorwhite,linethick0;

rr1:=barslast(month<>ref(month,1));
月盈利:asset-ref(asset,rr1+1),linethick0;
 回到顶部
总数 18 1 2 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版    Powered By weistock 2012
页面执行时间 0.10938 秒, 6 次数据查询