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


金字塔客服中心 - 专业程序化交易软件提供商 → 金字塔软件 → 公式模型编写问题提交 → 老师帮我检查一下，后台程式全局变量这种写法是否有问题

   

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

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

主题：老师帮我检查一下，后台程式全局变量这种写法是否有问题
帅哥哟，离线，有人找我吗？
IF左边
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：蜘蛛侠 帖子：1167 积分：0 威望：0 精华：0 注册：2014/12/30 15:21:12 		老师帮我检查一下，后台程式全局变量这种写法是否有问题  发帖心情 Post By：2016/12/16 15:43:08    Post IP：113.220.86.71[显示全部帖子]

if duo and extgbdata(stklabel+'bn1')=0  then begin
   tbuy(1,手数,mkt);
   extgbdataset(stklabel+'bn1',1);
   extgbdataset(stklabel+'bn15',手数);
   extgbdataset(stklabel+'bdcs',0);
   end

if l<=tENTERPRICE-z*s  and tENTERBARS>0 and extgbdata(stklabel+'bn1')=1 and extgbdata(stklabel+'bdcs')=0 and extgbdata(stklabel+'bn15')<>0 then begin
 tsell(1,extgbdata(stklabel+'bn15'),mkt);
 extgbdataset(stklabel+'bn1',0);
  extgbdataset(stklabel+'bn15',0);
  extgbdataset(stklabel+'bdcs',1);

 end其中 extgbdataset(stklabel+'bdcs',0)这种写法和后面的extgbdata(stklabel+'bdcs')=0是否重复没有意义。是否应该这样写：

if duo and extgbdata(stklabel+'bn1')=0  then begin
   tbuy(1,手数,mkt);
   extgbdataset(stklabel+'bn1',1);
   extgbdataset(stklabel+'bn15',手数);
   extgbdataset(stklabel+'bdcs',1);
   end

if l<=tENTERPRICE-z*s  and tENTERBARS>0 and extgbdata(stklabel+'bn1')=1 and extgbdata(stklabel+'bdcs')=1 and extgbdata(stklabel+'bn15')<>0 then begin
 tsell(1,extgbdata(stklabel+'bn15'),mkt);
 extgbdataset(stklabel+'bn1',0);
  extgbdataset(stklabel+'bn15',0);
  extgbdataset(stklabel+'bdcs',0);
 回到顶部
帅哥哟，离线，有人找我吗？
IF左边
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：蜘蛛侠 帖子：1167 积分：0 威望：0 精华：0 注册：2014/12/30 15:21:12 		  发帖心情 Post By：2016/12/16 15:52:13    Post IP：113.220.86.71[显示全部帖子]

不需要定义extgbdataset(stklabel+'bdcs',0)的情况下，extgbdata(stklabel+'bdcs')=0也是成立的，所以是否是多此一举了

 回到顶部
帅哥哟，离线，有人找我吗？
IF左边
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：蜘蛛侠 帖子：1167 积分：0 威望：0 精华：0 注册：2014/12/30 15:21:12 		  发帖心情 Post By：2016/12/16 16:06:35    Post IP：113.220.86.71[显示全部帖子]

有其他赋值，按后面这种写法才是对的吧
if duo and extgbdata(stklabel+'bn1')=0  then begin
   tbuy(1,手数,mkt);
   extgbdataset(stklabel+'bn1',1);
   extgbdataset(stklabel+'bn15',手数);
   extgbdataset(stklabel+'bdcs',1);
   end

if l<=tENTERPRICE-z*s  and tENTERBARS>0 and extgbdata(stklabel+'bn1')=1 and extgbdata(stklabel+'bdcs')=1 and extgbdata(stklabel+'bn15')<>0 then begin
 tsell(1,extgbdata(stklabel+'bn15'),mkt);
 extgbdataset(stklabel+'bn1',0);
  extgbdataset(stklabel+'bn15',0);
  extgbdataset(stklabel+'bdcs',0);
开仓后赋值(stklabel+'bdcs')=1，extgbdata(stklabel+'bdcs')=1的情况下才允许有平仓动作。
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版    Powered By weistock 2012
页面执行时间 00.10547 秒, 7 次数据查询