{<成交密集区>} hs:=VOL/CAPITAL*100,linethick0; XX1:=HHV(hs,SYSPARAM(3)-SYSPARAM(2)+1); XX2:=LLV(hs,SYSPARAM(3)-SYSPARAM(2)+1); G1:=XX1[SYSPARAM(3)]; G2:=XX2[SYSPARAM(3)]; hsl:=(12*(hs-G2)/(G1-G2)+2);
n:=SUMBARS(v,capital),linethick0; 换手周期:n,linethick0; hh:=hhv(h,n),linethick0; ll:=llv(l,n),linethick0; kk:=(hh-ll)/10; v1:=IF(CAPITAL>0,N,100); cc:=c; vv:=v; for i=datacount-V1[datacount] to datacount do begin dd:=0; for k=1 to 10 do begin tm:=0; for j=i-n[i]+1 to i do begin if cc[j]<ll[i]+kk[i]*k and cc[j]>ll[i]+kk[i]*(k-1) then tm:=tm+vv[j]; end; if tm>dd then begin dd:=tm; jj:=ll[i]+kk[i]*(k-1); jj1:=ll[i]+kk[i]*k; end; end; jg[i]:=jj; jg1[i]:=jj1; end; 成交最大区间价上限:MAX(jg,JG1),linethick0; 成交最大区间价下限:MIN(jg1,JG),linethick0; DRAWICON(CROSS(C,成交最大区间价上限),L,8); FILLRGN(C,jg1,jg),colorgray; 成交最大区间量:dd,linethick0;{点击看本软件截图:58股票 公式网 http://www. 58gu. com 整理} |