主题：如何引用周期，不产生未来，求编写代码

要求：1编写15分钟引用60分钟周期 2 编写60分钟的ma5 ma10 20 40均线 最好参考以下方法，要求写出完整代码，多谢 鉴于许多人需要夸周期引用数据，尤其是小周期引用大周期的数据或者指标者居多，而通常情况下，这种小引大的方式容易出现未来数据，从而影响计算结果和条件判断，因此，我给出下面算法，大家可以验证一下，是否可以解决未来数据问题。 //利用下面算法可以解决在1分钟周期下引用5分钟MA均线产生未来数据的问题 //下面例子以在1分钟周期下引用5分钟周期下的MA5均线为例作为讲解,大家可以学习方法然后扩展到任意周期任意指标; { 算法的原理是：利用MA均线的算法可知，将前4根5分钟K线的收盘价相加，然后再加上当前1分钟的收盘价， 取得这5根K线收盘价总和之后，除以5,即是当根1分钟K线收盘那一时间点所对应的5分钟K线下的MA5均线。 这个算法解决了下面具体问题，通常情况下，例如13.53分这根K线，在1分钟周期下引用5分钟周期数据时，引用的其实是引用的13.55分 这个时间点的5分钟数据，这种情况下将出现未来数据，系统把54分和55分这两分钟的数据也归到均线中去。 所以利用下面的算法将不再产生未来数据。 } //取上4个五分钟整点K线的和，也就是求前4根5分钟K线收盘价的和; M5:=IF(MOD(MINUTE,5)=0,CLOSE,0); SUMMIN5MA4:=REF(SUM(M5,20),MOD(MINUTE,5)); //把四个5分钟K线的收盘价和当前1分钟的收盘价相加，再除以5，也就得出了此刻所对应的5分钟下的MA5了; //这里分两种情况，一种是对于5分钟整点位置的均线也就是相当于直接调用5分钟下的MA5；另一种是对于不 //能够被5整除的K线，我们应当按照把四个5分钟K线的收盘价和当前1分钟的收盘价相加再除以5的方法来计算; IF MOD(MINUTE,5)>0 THEN BEGIN MIN5MA5A:=(SUMMIN5MA4+CLOSE)/5; END; ELSE BEGIN MIN5MA5B:="MA.MA1#MIN5"; END; //JG就是我们所要求的无未来数据的5分钟下的MA5均价数值; JG:IF(MOD(MINUTE,5)=0,MIN5MA5B,MIN5MA5A); //我们来跨周期调用一下5分钟下的MA5均线看看是否相同;如果“MIN5MA5A”始终与“MIN5MA5对比”相等，则目的达到; MIN5MA5对比:"MA.MA1#MIN5";