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


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件公式模型编写问题提交 → 全局变量无法取得正确值

   

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


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

主题:全局变量无法取得正确值

帅哥,在线噢!
lcgs005
  21楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:黑侠 帖子:649 积分:1359 威望:0 精华:0 注册:2009/10/24 1:57:01
  发帖心情 Post By:2013/8/23 10:31:24    Post IP:119.86.189.136[只看该作者]

WARNING_DISABLE:4;
DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26);
DEA:=EMA(DIFF,9);
MACD:=2*(DIFF-DEA);
mszt:=macd>=ref(macd,1);
dezt:=diff>=dea;
jc:=cross(diff,dea);
sc:=cross(dea,diff);

//多周期的开多与止损
if tbuyholdingex('','',1)=0  and jc  and islastbar then BEGIN
tbuy(1,1,mkt);
extgbdataset('dcw',1); 
end
//平空与止损-若本级别仓位未被其它周期平掉则本周期仓位由本级别止损
if  tbuyholdingex('','',1)>0 and extgbdata('dcw')=1 and  dezt=0   and islastbar then begin
tsell(1,0,mkt);
extgbdataset('dcw',0); 
end
//开空部份
if  tsellholdingex('','',1)=0  and sc  and islastbar then begin
tbuyshort(1,1,mkt);
extgbdataset('kcw',-1); 
end
//平空与止损
if  tsellholdingex('','',1)>0 and extgbdata('kcw')=-1  and dezt  and islastbar  then BEGIN
tsellshort(1,0,mkt);
extgbdataset('kcw',0); 
end

//本级别仓位无论手动自动平仓后均将本级别全局变量置为0
if tbuyholdingex('','',1)=0 then extgbdataset('dcw1',0); 
if tsellholdingex('','',1)=0 then extgbdataset('kcw1',0); 


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


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

我已经将问题排除到最小范围了。。。删掉最后那一段我已经是可以在本地进行赋值了,所以如果不介意,可以自己验证一下



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

客户服务部

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

您的宝贵建议或者投诉,请发往邮箱:weiwei@weistock.com

 回到顶部
帅哥,在线噢!
lcgs005
  23楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:黑侠 帖子:649 积分:1359 威望:0 精华:0 注册:2009/10/24 1:57:01
  发帖心情 Post By:2013/8/23 10:42:58    Post IP:119.86.189.136[只看该作者]

删除最后一段是可以赋值的,但平仓后,全局变量的值并不置为0,这样无法实现原有的功能

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


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

本地测试后的平仓结果是可以啊,说了你要把持仓条件判断写进IF里面不要写外面啊,
[此贴子已经被作者于2013/8/23 10:48:10编辑过]


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

客户服务部

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

您的宝贵建议或者投诉,请发往邮箱:weiwei@weistock.com

 回到顶部
帅哥,在线噢!
lcgs005
  25楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:黑侠 帖子:649 积分:1359 威望:0 精华:0 注册:2009/10/24 1:57:01
  发帖心情 Post By:2013/8/23 11:29:56    Post IP:119.86.189.136[只看该作者]

这段已经是写进去的了,运行时,全局变量值始终为0
WARNING_DISABLE:4;
DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26);
DEA:=EMA(DIFF,9);
MACD:=2*(DIFF-DEA);
mszt:=macd>=ref(macd,1);
dezt:=diff>=dea;
jc:=cross(diff,dea);
sc:=cross(dea,diff);

//多周期的开多与止损
if tbuyholdingex('','',1)=0  and jc  and islastbar then BEGIN
tbuy(1,1,mkt);
extgbdataset('dcw',1); 
end
//平空与止损-若本级别仓位未被其它周期平掉则本周期仓位由本级别止损
if  tbuyholdingex('','',1)>0 and extgbdata('dcw')=1 and  dezt=0   and islastbar then begin
tsell(1,0,mkt);
extgbdataset('dcw',0); 
end
//开空部份
if  tsellholdingex('','',1)=0  and sc  and islastbar then begin
tbuyshort(1,1,mkt);
extgbdataset('kcw',-1); 
end
//平空与止损
if  tsellholdingex('','',1)>0 and extgbdata('kcw')=-1  and dezt  and islastbar  then BEGIN
tsellshort(1,0,mkt);
extgbdataset('kcw',0); 
end

//本级别仓位无论手动自动平仓后均将本级别全局变量置为0
if tbuyholdingex('','',1)=0 then extgbdataset('dcw',0); 
if tsellholdingex('','',1)=0 then extgbdataset('kcw',0); 

 回到顶部
帅哥,在线噢!
lcgs005
  26楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:黑侠 帖子:649 积分:1359 威望:0 精华:0 注册:2009/10/24 1:57:01
  发帖心情 Post By:2013/8/23 12:20:16    Post IP:119.86.189.136[只看该作者]

想实现的功能是这样,不用金叉死叉,用其它任何条件都可以:
1-开多仓后,置全局变量dcw为1
2-开空仓后,置全局变量kcw为-1
3-如果没有仓位,将两个全局变量全部置为0
4-dcw与kcw的值要能在另一个策略里被调用,

 回到顶部
总数 26 上一页 1 2 3