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


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

   

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


  共有5733人关注过本帖平板打印复制链接

主题:全局变量无法更新

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


加好友 发短信
等级:黑侠 帖子:647 积分:35 威望:0 精华:0 注册:2013/3/5 13:14:23
  发帖心情 Post By:2014/3/27 11:22:40    Post IP:125.89.26.121[只看该作者]

开平仓代码如下:

//对全局变量重置和保存
if barpos>extgbdata('barp') then 
begin
    extgbdataset('num',0) ; //记录当根K线的交易次数
      extgbdataset('lossnum',0) ; //记录亏损次数,在新一根K线开始时,初始化为0
       extgbdataset('barp',barpos) ; //控制新的一根K线重新计算  
end



//全局变量累加:

if Tholding<0 and  平空条件  then  //平空
begin
   Tsellshort(1,0,mkt), ALLOWREPEAT ;
          extgbdataset('num',extgbdata('num')+1) ;//平仓一次算一次交易
          if C>Tenterprice then extgbdataset('lossnum',extgbdata('lossnum')+1) ; // 平仓时判断,是否亏损,并记录亏损次数
end
if THOLDING=0 and 开多条件   then  //开多
TBUY(1, 1,mkt), ALLOWREPEAT ;


if Tholding>0 and  平多条件  then  //平多
begin
    Tsell(1,0,mkt), ALLOWREPEAT  ;
           extgbdataset('num',extgbdata('num')+1) ;//平仓一次算一次交易
         if C<Tenterprice then extgbdataset('lossnum',extgbdata('lossnum')+1) ; // 平仓时判断,是否亏损,并记录亏损次数
end
f THOLDING=0 and 开空条件   then  //开空
 Tbuyshort(1, 1,mkt), ALLOWREPEAT ;

//输出
Tbarp: barpos, linethick0 ;
Tnum: extgbdata('num'), linethick0 ;
Tlossnum: extgbdata('lossnum'), linethick0 ;

 回到顶部
总数 41 1 2 3 4 5 下一页