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


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件公式模型编写问题提交 → [求助]1分钟周期无引用编制5分钟K线

   

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


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

主题:[求助]1分钟周期无引用编制5分钟K线

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


加好友 发短信
等级:新手上路 帖子:46 积分:273 威望:0 精华:0 注册:2011/8/16 13:07:13
  发帖心情 Post By:2011/8/18 12:28:27    Post IP:111.85.139.160[只看该作者]

以下是引用王锋在2011-8-18 12:07:03的发言:

请用IE浏览器重新编辑你的公式

runmode:0;

nn:=barslast(date<>ref(date,1));

n:=mod(nn,5)+1;

o5:=if(n=1,open,ref(open,n-1));

h5:=hhv(h,n);

l5:=llv(l,n);

c5:=close;

ddd:=backset(islastbar,5);

if ddd=1 then begin

kre:STICKLINE( c>o,c ,o, 10,1 ,colorred);//空心实体

kre1:STICKLINE( c>o,h ,max(c,o), 0,1 ,colorred);//上引线

kre2:STICKLINE( c>o,min(c,o) ,l, 0,1 ,colorred);//下引线

kgree:STICKLINE( c<=o,c ,o, 10,1 ),colorgreen;//实心实体

kgree1:STICKLINE( c<=o,h ,max(c,o), 0,1 ,colorgreen);

kgree2:STICKLINE( c<=o,min(c,o) ,l, 0,1 ,colorgreen);

end

if ddd=0 and n=5 then begin

kred:STICKLINE( c5>o5,c5 ,o5, 8,0 ,COLORRED);//空心实体

kred1:STICKLINE( c5>o5,h5 ,max(c5,o5), 0,1 ,COLORRED);//上引线

kred2:STICKLINE( c5>o5,min(c5,o5) ,l5, 0,1 ,COLORRED);//下引线

kgreen:STICKLINE( c5<=o5,c5 ,o5, 8,0 ,COLORGREEN);//实心实体

kgreen1:STICKLINE( c5<=o5,h5 ,max(c5,o5), 0,1 ,COLORGREEN);

kgreen2:STICKLINE( c5<=o5,min(c5,o5) ,l5, 0,1 ,COLORGREEN);

end

[此贴子已经被作者于2011-8-18 12:30:22编辑过]

 回到顶部
总数 12 1 2 下一页