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


金字塔客服中心 - 专业程序化交易软件提供商 → 金字塔软件 → 公式模型编写问题提交 → 添加缺失的代码

   

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

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

主题：添加缺失的代码
帅哥哟，离线，有人找我吗？
苦麻菜真好吃
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：论坛游民 帖子：189 积分：0 威望：0 精华：0 注册：2015/9/22 23:26:53 		添加缺失的代码  发帖心情 Post By：2016/8/29 10:58:59    Post IP：180.169.30.6[显示全部帖子]

麻烦老师帮我写下代码、用后台的写


ZH:='';
PZ1:='PP09';
PZ2:='PP01';
globalvariable:Y=0;
KK1:C1>C2;
KK2:C1<C2;

tt:TIME>131500 AND TIME<185500;

//盈利计算（对于这个模型监控品种的盈利计算）
 盈利>500;

//盈利平仓

IF 盈利>500 THEN  BEGIN
pz1平仓反手；
pz平仓反手；
end

//按条件开仓
IF KK1 AND tt  and  没有持仓  then  begin 
多PZ1;
空pz2；
end

IF KK2 AND tt  and  没有持仓  then  begin 
多PZ2;
空pz1；
end
 回到顶部
帅哥哟，离线，有人找我吗？
苦麻菜真好吃
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：论坛游民 帖子：189 积分：0 威望：0 精华：0 注册：2015/9/22 23:26:53 		  发帖心情 Post By：2016/8/29 13:58:31    Post IP：113.12.134.245[显示全部帖子]

tt:TIME>130500 AND TIME<185500;
//盈利平仓
YLPC:taccount(4)>=1000;

if YLPC THEN BEGIN
tbuy(1,10,lmt,dynainfo2(7,pz1),0,'',pz1);
tsell(1,10,lmt,dynainfo2(7,pz1),0,'',pz1);
tbuyshort(1,10,lmt,dynainfo2(7,pz1),0,'',pz1);
tsellshort(1,10,lmt,dynainfo2(7,pz1),0,'',pz1);


tbuy(1,14,lmt,dynainfo2(7,pz2),0,'',pz2);
tsell(1,14,lmt,dynainfo2(7,pz2),0,'',pz2);
tbuyshort(1,14,lmt,dynainfo2(7,pz2),0,'',pz2);
tsellshort(1,14,lmt,dynainfo2(7,pz2),0,'',pz2);
END

IF KK1 AND tt then begin
tbuy(tbuyholdingex('',pz1,0)=0,10,lmt,dynainfo2(7,pz1),0,'',pz1);
tsell(1,10,lmt,dynainfo2(7,pz1),0,'',pz1);
tbuyshort(tsellholdingex('',pz2,0)=0,10,lmt,dynainfo2(7,pz2),0,'',pz2);
tsellshort(1,10,lmt,dynainfo2(7,pz2),0,'',pz2);
end

IF KK2 AND tt then begin 
tbuy(tbuyholdingex('',pz2,0)=0,10,lmt,dynainfo2(7,pz2),0,'',pz2);
tsell(1,10,lmt,dynainfo2(7,pz2),0,'',pz2);
tbuyshort(tsellholdingex('',pz1,0)=0,10,lmt,dynainfo2(7,pz1),0,'',pz1);
tsellshort(1,10,lmt,dynainfo2(7,pz1),0,'',pz1);
end

这样写对吗？
 回到顶部
帅哥哟，离线，有人找我吗？
苦麻菜真好吃
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：论坛游民 帖子：189 积分：0 威望：0 精华：0 注册：2015/9/22 23:26:53 		  发帖心情 Post By：2016/8/29 14:07:51    Post IP：113.12.134.245[显示全部帖子]

我的想法是、满足条件K1，品种1开多、品种2开空
                满足条件K2，品种1开空、品种2开多        
              
       当盈利>500时，平仓并且反手、



在日内用条件K1、K2条件开仓一次，之后反手也只能开一次仓、若收盘前盈利>0那么清仓、若收盘前盈利<0,那么继续持仓
 回到顶部
帅哥哟，离线，有人找我吗？
苦麻菜真好吃
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：论坛游民 帖子：189 积分：0 威望：0 精华：0 注册：2015/9/22 23:26:53 		  发帖心情 Post By：2016/8/29 14:54:52    Post IP：113.12.134.245[显示全部帖子]

为啥不能执行平仓反手呢？

图片点击可在新窗口打开查看此主题相关图片如下：cb3tom%d_{byh`an5n4qim.png
图片点击可在新窗口打开查看



YLPC:topenprofit>=500;
if YLPC and  tbuyholdingex('',pz1,0)>0  and tsellholdingex('','pz2',0)>0 THEN BEGIN
tsell(1,10,lmt,dynainfo2(7,pz1),0,'',pz1);
tsellshort(1,10,lmt,dynainfo2(7,pz2),0,'',pz2);
tbuy(1,10,lmt,dynainfo2(7,pz2),0,'',pz2);
tbuyshort(1,10,lmt,dynainfo2(7,pz1),0,'',pz1);
end

if YLPC and  tbuyholdingex('',pz2,0)>0  and tsellholdingex('','pz1',0)>0 THEN BEGIN
tsell(1,10,lmt,dynainfo2(7,pz2),0,'',pz2);
tsellshort(1,10,lmt,dynainfo2(7,pz1),0,'',pz1);
tbuy(1,10,lmt,dynainfo2(7,pz1),0,'',pz1);
tbuyshort(1,10,lmt,dynainfo2(7,pz2),0,'',pz2);
end
 回到顶部
帅哥哟，离线，有人找我吗？
苦麻菜真好吃
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：论坛游民 帖子：189 积分：0 威望：0 精华：0 注册：2015/9/22 23:26:53 		  发帖心情 Post By：2016/8/30 9:33:53    Post IP：113.12.134.245[显示全部帖子]

这两个函数、都试过了、都不行、怎么回事呢？
图片点击可在新窗口打开查看此主题相关图片如下：6cr5134ke5`x4xnna}y96.png
图片点击可在新窗口打开查看
YLPC:=taccount(4)>=500;
//YLPC:topenprofit>=500;




if YLPC and  tbuyholdingex('',pz1,0)>0  and tsellholdingex('','pz2',0)>0 THEN BEGIN
tsell(1,10,lmt,dynainfo2(7,pz1),0,'',pz1);
tsellshort(1,10,lmt,dynainfo2(7,pz2),0,'',pz2);
tbuy(1,10,lmt,dynainfo2(7,pz2),0,'',pz2);
tbuyshort(1,10,lmt,dynainfo2(7,pz1),0,'',pz1);
end

if YLPC and  tbuyholdingex('',pz2,0)>0  and tsellholdingex('','pz1',0)>0 THEN BEGIN
tsell(1,10,lmt,dynainfo2(7,pz2),0,'',pz2);
tsellshort(1,10,lmt,dynainfo2(7,pz1),0,'',pz1);
tbuy(1,10,lmt,dynainfo2(7,pz1),0,'',pz1);
tbuyshort(1,10,lmt,dynainfo2(7,pz2),0,'',pz2);
end

IF KK1 AND tt then begin
tbuy(tbuyholdingex('',pz1,0)=0,10,lmt,dynainfo2(7,pz1),0,'',pz1);
tbuyshort(tsellholdingex('',pz2,0)=0,10,lmt,dynainfo2(7,pz2),0,'',pz2);
end

IF KK2 AND tt then begin 
tbuy(tbuyholdingex('',pz2,0)=0,10,lmt,dynainfo2(7,pz2),0,'',pz2);
tbuyshort(tsellholdingex('',pz1,0)=0,10,lmt,dynainfo2(7,pz1),0,'',pz1);
end
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版    Powered By weistock 2012
页面执行时间 00.03906 秒, 7 次数据查询