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


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件公式模型编写问题提交 → 后台交易策略

   

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


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

主题:后台交易策略

帅哥哟,离线,有人找我吗?
bob
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游民 帖子:111 积分:135 威望:0 精华:0 注册:2012/12/7 9:56:47
后台交易策略  发帖心情 Post By:2014/4/14 9:56:32    Post IP:183.27.57.126[显示全部帖子]

请教各位老师,下面这个后台策略我编写的有没有什么问题,帮忙检查一下?我主要是从其他策略里面调用持仓变化来进行交易,调用的策略是图表交易的,那么这个策略做为控制器能正常运作吗?
VARIABLE:ss=4,kg=0;
cc1:STKINDI('if00','bldy.cc',0,18,-1),NOAXIS;
cc2:STKINDI('if00','zddy.cc',0,2,-1),NOAXIS;
jhc1:STKINDI('if00','zddy.hc2',0,2,-1),NOAXIS;
ls:STKINDI('if00','zddy.ls',0,2,-1),NOAXIS;
input:x(9000,1000,10000,1000);
jhc:jhc1,NOAXIS;
//正常交易
if jhc=0 then BEGIN
if cc1=0 and cc2=0 then BEGIN
tsell(HOLDING>0,HOLDING, mkt);
tSELLSHORT(HOLDING<0,HOLDING,mkt);
end 

if (cc1=0 and cc2>0) or (cc1>0 and cc2=0) then BEGIN
tSELLSHORT(HOLDING<0,HOLDING,Mkt);
tbuy(HOLDING=0,ss,Mkt);
if HOLDING=8 then BEGIN
tsell(1,ss,Mkt);
end 
end 

if (cc1=0 and cc2<0) or (cc1<0 and cc2=0) then BEGIN
tsell(HOLDING>0,HOLDING,Mkt);
tBUYSHORT(HOLDING=0,ss,Mkt);
if HOLDING=-8 then BEGIN
tSELLSHORT(1,4,Mkt);
end 
end 

if (cc1>0 and cc2<0) or (cc1<0 and cc2>0) then BEGIN
tsell(HOLDING>0,HOLDING,Mkt);
tSELLSHORT(HOLDING<0,HOLDING,Mkt);
end 

if cc1>0 and cc2>0 then BEGIN
tSELLSHORT(HOLDING<0,HOLDING,mkt);
tbuy(HOLDING=0,ss*2,Mkt);
if HOLDING=4 then BEGIN
tbuy(1,ss,Mkt);
end
end 

if cc1<0 and cc2<0 then BEGIN
tsell(HOLDING>0,HOLDING,Mkt);
tBUYSHORT(HOLDING=0,ss*2,Mkt);
if HOLDING=-4 then BEGIN
tBUYSHORT(1,ss,Mkt);
end
end 
end 


 回到顶部
帅哥哟,离线,有人找我吗?
bob
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游民 帖子:111 积分:135 威望:0 精华:0 注册:2012/12/7 9:56:47
  发帖心情 Post By:2014/4/14 10:07:48    Post IP:183.27.57.126[显示全部帖子]

那应该用什么?tholding?

 回到顶部
帅哥哟,离线,有人找我吗?
bob
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游民 帖子:111 积分:135 威望:0 精华:0 注册:2012/12/7 9:56:47
  发帖心情 Post By:2014/4/14 10:11:24    Post IP:183.27.57.126[显示全部帖子]

VARIABLE:ss=4,kg=0;
cc1:STKINDI('if00','bldy.cc',0,18,-1),NOAXIS;
cc2:STKINDI('if00','zddy.cc',0,2,-1),NOAXIS;
jhc1:STKINDI('if00','zddy.hc2',0,2,-1),NOAXIS;
ls:STKINDI('if00','zddy.ls',0,2,-1),NOAXIS;
input:x(9000,1000,10000,1000);
jhc:jhc1,NOAXIS;
//正常交易
if jhc=0 then BEGIN
if cc1=0 and cc2=0 then BEGIN
tsell(tHOLDING>0,tHOLDING, mkt);
tSELLSHORT(tHOLDING<0,tHOLDING,mkt);
end 

if (cc1=0 and cc2>0) or (cc1>0 and cc2=0) then BEGIN
tSELLSHORT(tHOLDING<0,tHOLDING,Mkt);
tbuy(tHOLDING=0,ss,Mkt);
if tHOLDING=8 then BEGIN
tsell(1,ss,Mkt);
end 
end 

if (cc1=0 and cc2<0) or (cc1<0 and cc2=0) then BEGIN
tsell(tHOLDING>0,tHOLDING,Mkt);
tBUYSHORT(tHOLDING=0,ss,Mkt);
if tHOLDING=-8 then BEGIN
tSELLSHORT(1,4,Mkt);
end 
end 

if (cc1>0 and cc2<0) or (cc1<0 and cc2>0) then BEGIN
tsell(tHOLDING>0,tHOLDING,Mkt);
tSELLSHORT(tHOLDING<0,tHOLDING,Mkt);
end 

if cc1>0 and cc2>0 then BEGIN
tSELLSHORT(tHOLDING<0,tHOLDING,mkt);
tbuy(tHOLDING=0,ss*2,Mkt);
if tHOLDING=4 then BEGIN
tbuy(1,ss,Mkt);
end
end 

if cc1<0 and cc2<0 then BEGIN
tsell(tHOLDING>0,tHOLDING,Mkt);
tBUYSHORT(tHOLDING=0,ss*2,Mkt);
if tHOLDING=-4 then BEGIN
tBUYSHORT(1,ss,Mkt);
end
end 
end 

 回到顶部
帅哥哟,离线,有人找我吗?
bob
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游民 帖子:111 积分:135 威望:0 精华:0 注册:2012/12/7 9:56:47
  发帖心情 Post By:2014/4/14 10:11:56    Post IP:183.27.57.126[显示全部帖子]

都改成THOLDING  应该可以了吧?还有些什么问题?

 回到顶部