1、新建一个可以移位的指标
{移位引用}
INPUT:移(0,0,40);
开:=O; 高:=H,LINETHICK0;; 低:=L; 收:=C,LINETHICK0;
IF 移>0 THEN BEGIN //
FOR I=PP1 TO PP do BEGIN
开[I-移]:=开[I]; 高[I-移]:=高[I]; 低[I-移]:=低[I]; 收[I-移]:=收[I];
END;
2.再建一个指标,引用上面的指标:
引:"移位引用.高(1)";
理论应该是引用向前移移位的k线数据,但实际结果不是
1、新建一个可以移位的指标
{移位引用}
INPUT:移(0,0,40);
开:=O; 高:=H,LINETHICK0;; 低:=L; 收:=C,LINETHICK0;
A2:=(高-低)*0.38;
IF 移>0 THEN BEGIN //
FOR I=PP1 TO PP do BEGIN
开[I-移]:=开[I]; 高[I-移]:=高[I]; 低[I-移]:=低[I]; 收[I-移]:=收[I];
END;
开[PP]:=收[PP-移];
IF 低[PP]+A2[PP]>=收[PP] THEN 高[PP]:=收[PP];
IF 高[PP]-A2[PP]<=收[PP] THEN 低[PP]:=收[PP];
END;
2.再建一个指标,引用上面的指标:
引:"移位引用.高(1)";
理论应该是引用”k线向前移1位“后,已适当修改的数据,但实际结果不是
把公式重新贴一下,帖成树形的,你这样拥挤在一起看不懂
移动 直接REFX REF不就好了 怎么搞的这么复杂
我贴图是树形的 发表后就是这样一行的了
我编辑多次都是这样 没办法
我帮你贴下,刚好我也在写移位。
{移位引用}
INPUT:移(0,0,40);
开:=O;
高:=H,LINETHICK0;
低:=L;
收:=C,LINETHICK0;
A2:=(高-低)*0.38;
IF 移>0 THEN BEGIN // FOR I=PP1 TO PP do BEGIN
开[I-移]:=开[I];
高[I-移]:=高[I];
低[I-移]:=低[I];
收[I-移]:=收[I];
END; 开
[PP]:=收[PP-移];
IF 低[PP]+A2[PP]>=收[PP] THEN 高[PP]:=收[PP];
IF 高[PP]-A2[PP]<=收[PP] THEN 低[PP]:=收[PP];
END;
[此贴子已经被作者于2013-2-7 9:34:38编辑过]