以文本方式查看主题 - 金字塔客服中心 - 专业程序化交易软件提供商 (http://weistock.com/bbs/index.asp) -- 公式模型编写问题提交 (http://weistock.com/bbs/list.asp?boardid=4) ---- 请老师帮助把序列模式下可显示的循环语句改成逐K模式 (http://weistock.com/bbs/dispbbs.asp?boardid=4&id=70399) |
-- 作者:自渔自乐 -- 发布时间:2014/9/24 23:01:58 -- 请老师帮助把序列模式下可显示的循环语句改成逐K模式 input:n(30,2,300),n1(90,2,300); fh:=forcast(h,n); fl:=forcast(l,n); kh:=slope(h,n); kl:=slope(l,n); th:=0; tl:=0; for i=0 to n-1 do begin th:=th+abs(ref(h,i)-(fh-kh*i)); tl:=tl+abs(ref(l,i)-(fl-kl*i)); end; stdph:=th/n; stdpl:=tl/n; up:fh+2*stdph+kh,shift1,colorff9900,linedot; dn:fl-2*stdpl+kl,shift1,colorff9900,linedot; mid:0.5*(up+dn),shift1,,colorff9900,linethick1; fh1:=forcast(h,n1); fl1:=forcast(l,n1); kh1:=slope(h,n1); kl1:=slope(l,n1); th1:=0; tl1:=0; for i=0 to n1-1 do begin th1:=th1+abs(ref(h,i)-(fh1-kh1*i)); tl1:=tl1+abs(ref(l,i)-(fl1-kl1*i)); end; stdph1:=th1/n1; stdpl1:=tl1/n1; up1:fh1+2*stdph1+kh1,shift1,coloryellow,linedot; dn1:fl1-2*stdpl1+kl1,shift1,coloryellow,linedot; mid1:0.5*(up1+dn1),shift1,,coloryellow; weight:if(stktype=0 or v=0,(h+l+c)/3,0.01*amount/v),circledot,colorffffff; tdx:ma(c,2),shift1,linethick2,colormagenta;
|
-- 作者:jinzhe -- 发布时间:2014/9/25 8:50:10 -- 这种有ref的带不进逐k的 |
-- 作者:wplovelm -- 发布时间:2014/9/25 9:37:43 -- 最简单的方法是:这个指标仍然是序列的,你可以在逐k里面调用它,就可以了 |
-- 作者:自渔自乐 -- 发布时间:2014/9/25 11:57:14 -- 谢谢你! |