投资者咨询:麻烦老师指标改编 (文华财经WH6赢顺V6.7)
来源:文华财经 日期:2018-6-7 14:24
代码如下,能否改编成文华能用的代码,谢谢。
INPUT:N(10,1,100);
fc:=c;
fo:=o;
cc:0*c,LINETHICK0;
oo:0*c,LINETHICK0;
t1:=0*c;
t2:=0*c;
for i=1 to datacount do begin
if i=1 and fc[i]>fo[i] then
cc[i]:=fc[i];
oo[i]:=fc[i];
if i=1 and fc[i]<fo[i] then
cc[i]:=fc[i];
oo[i]:=fc[i];
if i>1 then
cc[i]:=cc[i-1];
oo[i]:=oo[i-1];
if i>1 and fc[i]>cc[i]*(1+n/100) then begin
cc[i]:=cc[i-1]*(1+n/100);
oo[i]:=cc[i-1];
end;
if i>1 and fc[i]<oo[i]/(1+n/100) then begin
oo[i]:=oo[i-1]/(1+n/100);
cc[i]:=oo[i-1];
end;
if oo[i]=oo[i-1] then
t1[i]:=t1[i-1]+1;
if cc[i]=cc[i-1] then
t2[i]:=t2[i-1]+1;
end;
o1:=ref(oo,t1+1);
c1:=ref(cc,t2+1);
STICKLINE(c1=oo,cc,oo,3,1)COLORRED;
STICKLINE(o1=cc,cc,oo,3,1)COLORCYAN;
技术人员回复
日期:2018-6-7 14:50