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


金字塔客服中心 - 专业程序化交易软件提供商 → 金字塔软件 → 公式模型编写问题提交 → [求助]寻找区间

   

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

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

主题：[求助]寻找区间
美女呀，离线，留言给我吧！
catherine
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：10 积分：0 威望：0 精华：0 注册：2014/9/12 9:35:53 		[求助]寻找区间  发帖心情 Post By：2014/9/12 15:24:48    Post IP：218.19.190.49[显示全部帖子]

逐K模式（日线）  
从当前K线往前找，知道有一日收盘价为当前收盘价的Parameter倍为止，之间每天记录DX+，DX-
我的代码如下 跑不出结果 问题出在哪里

input: Parameter(1.5);
variable:flag=false, no=0, FilC[10000]=0, CloseArray[10000]=0, DXPlusArray[10000]=0, DXMinusArray[10000]=0;

no:=1;
while log(ref(c,no))<Parameter*log(c) do 
begin 
    CloseArray[no]:= ref(c,no);
  FilC[no]:=log(ref(c,no));
  if no=1 then 
  BEGIN
  DXPlusArray[no] := Max( log(c) - FilC[no], 0 );
  DXMinusArray[no] := Max(FilC[no] - log(c), 0 );
  end
  else BEGIN
  DXPlusArray[no] := Max( FilC[no-1] - FilC[no], 0 );
  DXMinusArray[no] := Max(FilC[no] - FilC[no-1], 0 );
  end;
  no:=no+1;
end;

CloseArray[no]:= ref(c,no);
FilC[no]:=log(ref(c,no));
DXPlusArray[no] := Max( log(c) - FilC[no], 0 );
DXMinusArray[no] := Max(FilC[no] - log(c), 0 );

if  (no>1) then
if (FilC[no-1]>=Parameter*log(c)) then 
flag:=true;
 回到顶部
美女呀，离线，留言给我吧！
catherine
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：10 积分：0 威望：0 精华：0 注册：2014/9/12 9:35:53 		回复：（jinzhe）你这样的思路在金字塔里面实现不了  发帖心情 Post By：2014/9/12 15:48:42    Post IP：218.19.190.49[显示全部帖子]

那应该换什么思路或者用什么方法能达到这个目的

 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版    Powered By weistock 2012
页面执行时间 01.67188 秒, 7 次数据查询