|
input:n(5,2,1000),m(10,1,15); pn:=mod(barpos-1,n); fo:=ref(open,pn); fh:=refx(hhv(high,n),n-pn-1); fl:=refx(llv(low,n),n-pn-1); fc:=refx(close,n-pn-1); tj:=fc>fo or fc=fo and fc>ref(fc,n+1); stickline(tj,fc,fo,m,0),colorred; stickline(tj and pn=intpart(n/2),fh,fl,2,0),colorred; stickline(not(tj),fc,fo,m,0),colorblue; stickline(not(tj) and pn=intpart(n/2),fh,fl,2,0),colorblue; zma5:ma(fc,5); zma10:ma(fc,10); zma20:ma(fc,20); zma30:ma(fc,30); zma60:ma(fc,60); |
|
|
