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


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件策略编写求助区 → 请教一下

   

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


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

主题:请教一下

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


加好友 发短信
等级:金字塔养老院 帖子:1323 积分:6764 威望:0 精华:0 注册:2011/6/14 17:27:11
  发帖心情 Post By:2012/5/11 14:01:10 [显示全部帖子]

variable:a1=0,a2=0;

if bb and a1=0 then begin

    tsellshort(1,1,lmt,远期卖一+3,0,'802089','zjif09'),orderqueue;
    tsell(1,1,lmt,近期买一-3,0,'802089','zjif05'),orderqueue;
    tbuy(1,1,lmt,远期卖一+3,0,'802089','zjif09'),orderqueue;
    tbuyshort(1,1,lmt,近期买一-3,0,'802089','zjif05'),orderqueue;
   a1:=1;
  end

if ss and a2=0 then begin

    tsell(1,1,lmt,远期买一-3,0,'802089','zjif09'),orderqueue;
   
    tsellshort(1,1,lmt,近期卖一+3,0,'802089','zjif05'),orderqueue;
   
    tbuyshort(1,1,lmt,远期买一-3,0,'802089','zjif09'),orderqueue;
   
    tbuy(1,1,lmt,近期卖一+3,0,'802089','zjif05'),orderqueue;
    
a2:=1;
  end

 



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

客户服务部

-----------------------------------------------------------

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

您的宝贵建议或者投诉,请发往邮箱:weiwei@weistock.com
 回到顶部
帅哥哟,离线,有人找我吗?
just
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:金字塔养老院 帖子:1323 积分:6764 威望:0 精华:0 注册:2011/6/14 17:27:11
VBA编程中,引用指标数据,当行情界面改变时,引用的数据不变。  发帖心情 Post By:2012/5/11 14:25:30 [显示全部帖子]

你把你的条件代码贴出来 我帮你看看。


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

客户服务部

-----------------------------------------------------------

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

您的宝贵建议或者投诉,请发往邮箱:weiwei@weistock.com
 回到顶部
帅哥哟,离线,有人找我吗?
just
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:金字塔养老院 帖子:1323 积分:6764 威望:0 精华:0 注册:2011/6/14 17:27:11
  发帖心情 Post By:2012/5/11 15:03:27 [显示全部帖子]


bb:=count(c>o,2)=2;
ss:=count(c<o,2)=2;

if bb  then begin

    tsellshort(tholding>0,1,lmt,c,0,'800309','zjif09'),orderqueue;
    tsell(tholding>0,1,lmt,c,0,'800309','zjif05'),orderqueue;
    tbuy(tholding=0,1,lmt,c,0,'800309','zjif09'),orderqueue;
    tbuyshort(tholding=0,1,lmt,c,0,'800309','zjif05'),orderqueue;

  end

if ss  then begin

    tsell(tholding>0,1,lmt,c,0,'800309','zjif09'),orderqueue;
   
    tsellshort(tholding>0,1,lmt,c,0,'800309','zjif05'),orderqueue;
   
    tbuyshort(tholding=0,1,lmt,c,0,'800309','zjif09'),orderqueue;
   
    tbuy(tholding=0,1,lmt,c,0,'800309','zjif05'),orderqueue;

  end

 



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

客户服务部

-----------------------------------------------------------

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

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