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


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

   

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

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

主题：添加缺失的代码
帅哥哟，离线，有人找我吗？
苦麻菜真好吃
 小大  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
 回到顶部
帅哥哟，离线，有人找我吗？
jinzhe
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：罗宾汉 帖子：46311 积分：50819 威望：0 精华：2 注册：2011/3/23 8:50:25 		  发帖心情 Post By：2016/8/29 11:11:40    Post IP：180.169.30.6[只看该作者]

有两个地方我写一下，用户照着写剩下的地方
1.
 盈利:=topenprofit;

 

2.

然后品种1开平仓

tbuy(1,1,lmt,dynainf2(7,pz1),0,'',pz1);

tsell(1,1,lmt,dynainf2(7,pz1),0,'',pz1);

tbuyshort(1,1,lmt,dynainf2(7,pz1),0,'',pz1);

tsellshort(1,1,lmt,dynainf2(7,pz1),0,'',pz1);

 

pz1改成pz2就是pz2的开平仓

 

 

 

 

加入持仓判断：

 

tbuy(tbuyholdingex('',pz1,0)=0,1,lmt,dynainf2(7,pz1),0,'',pz1);

tsell(1,1,lmt,dynainf2(7,pz1),0,'',pz1);

tbuyshort(tsellholdingex('',pz2,0)=0,1,lmt,dynainf2(7,pz1),0,'',pz1);

tsellshort(1,1,lmt,dynainf2(7,pz1),0,'',pz1);

同样是只要把pz1改成pz2就是pz2的开平仓里面加上持仓判断

 

 

 

[此贴子已经被作者于2016-8-29 11:11:52编辑过]

金字塔—专业程序化交易量化投资平台

客户服务部

----------------------------------------------------------- 欢迎您参加我公司的技术培训，具体培训需求请发邮件到service@weistock.com

您的宝贵建议或者投诉，请发往邮箱:weiwei@weistock.com
 回到顶部
帅哥哟，离线，有人找我吗？
苦麻菜真好吃
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | 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

这样写对吗？
 回到顶部
帅哥哟，离线，有人找我吗？
苦麻菜真好吃
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | 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,那么继续持仓
 回到顶部
帅哥哟，离线，有人找我吗？
jinzhe
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：罗宾汉 帖子：46311 积分：50819 威望：0 精华：2 注册：2011/3/23 8:50:25 		  发帖心情 Post By：2016/8/29 14:10:16    Post IP：180.169.30.6[只看该作者]

if YLPC and  tbuyholdingex('',pz1,0)>0  and tsellholdingex('','pz2',0)>0THEN 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)>0THEN 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

金字塔—专业程序化交易量化投资平台

客户服务部

----------------------------------------------------------- 欢迎您参加我公司的技术培训，具体培训需求请发邮件到service@weistock.com

您的宝贵建议或者投诉，请发往邮箱:weiwei@weistock.com
 回到顶部
帅哥哟，离线，有人找我吗？
苦麻菜真好吃
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | 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
 回到顶部
帅哥哟，离线，有人找我吗？
jinzhe
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：罗宾汉 帖子：46311 积分：50819 威望：0 精华：2 注册：2011/3/23 8:50:25 		  发帖心情 Post By：2016/8/29 14:59:06    Post IP：180.169.30.6[只看该作者]

浮动盈亏要用上面的帐号函数


金字塔—专业程序化交易量化投资平台

客户服务部

----------------------------------------------------------- 欢迎您参加我公司的技术培训，具体培训需求请发邮件到service@weistock.com

您的宝贵建议或者投诉，请发往邮箱:weiwei@weistock.com
 回到顶部
帅哥哟，离线，有人找我吗？
苦麻菜真好吃
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | 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
 回到顶部
帅哥哟，离线，有人找我吗？
jinzhe
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：罗宾汉 帖子：46311 积分：50819 威望：0 精华：2 注册：2011/3/23 8:50:25 		  发帖心情 Post By：2016/8/30 9:46:39    Post IP：116.226.232.248[只看该作者]

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
 
把每段第一行多的单引号删除了

金字塔—专业程序化交易量化投资平台

客户服务部

----------------------------------------------------------- 欢迎您参加我公司的技术培训，具体培训需求请发邮件到service@weistock.com

您的宝贵建议或者投诉，请发往邮箱:weiwei@weistock.com
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版    Powered By weistock 2012
页面执行时间 00.04297 秒, 6 次数据查询