论坛 › 模型编写 › renko 模型编写

final9 发表于 2016-3-1 15:52:45

renko 模型编写

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>fo then
    cc:=fc;
    oo:=fc;
  if i=1 and fc<fo then
    cc:=fc;
    oo:=fc;
  if i>1 then
    cc:=cc;
    oo:=oo;
  if i>1 and fc>cc*(1+n/100) then begin
    cc:=cc*(1+n/100);
    oo:=cc;
end;
  if i>1 and fc<oo/(1+n/100) then begin
    oo:=oo/(1+n/100);
    cc:=oo;
end;
  if oo=oo then
     t1:=t1+1;
  if cc=cc then
     t2:=t2+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;

飞狐的代码，能否用tb实现呢？

final9 发表于 2016-3-2 21:28:58

这个代码没人会编写吗？

查看完整版本: renko 模型编写