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;{股票公式www.88gs.com} 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; 参考:ma(c,2),shift1,linethick2,colormagenta;{点击看本软件截图: 58股票 公式网 http://www. 58gu. com 整理} |