淘来的sar的pyton源码，请问如何在金字塔内使用

fyfy

def parabolic_sar(high, low, acceleration=0.02, max_acceleration=0.2):
    """
    计算抛物转向SAR指标
    :param high: 最高价序列
    :param low: 最低价序列
    :param acceleration: 加速因子，默认为0.02
    :param max_acceleration: 最大加速因子，默认为0.2
    :return: 抛物转向SAR指标序列
    """
    sar = [low[0]]
    af = acceleration
    ep = high[0]
    trend = 1  # 1表示上涨趋势，-1表示下跌趋势
    for i in range(1, len(high)):
        if trend == 1:
            if high[i] > ep:
                ep = high[i]
                af = min(af + acceleration, max_acceleration)
            sar.append(sar[-1] + af * (ep - sar[-1]))
            if sar[-1] > low[i]:
                sar[-1] = ep
                trend = -1
                ep = low[i]
                af = acceleration
        else:
            if low[i] < ep:
                ep = low[i]
                af = min(af + acceleration, max_acceleration)
            sar.append(sar[-1] + af * (ep - sar[-1]))
            if sar[-1] < high[i]:
                sar[-1] = ep
                trend = 1
                ep = high[i]
                af = acceleration
    return sar

技术009

将High 和low 使用 history_bars  函数进行替换处理即可。函数说明参考：

https://www.weistock.com/docs/Py ... 2%E6%95%B0%E6%8D%AE

fyfy

搞不定，能否给改写一下，最好用PEL语言改写，谢谢！

技术009

[PEL] 复制代码

?

001 002 003 004 005 006 007 008 009 010 011 012 013 014 015 016 017 018 019 020 021 022 023 024 025 026 027 028 029 030 031 032 033 034 035 036 037 038 039 040 041 042 043 044 045 046 047 048 049 050 051 052 053 054 055 056 057 058 059 060 061 062 063 064 065 066 067 068 069 070 071 072 073 074 075 076 077 078 079 080 081 082 083 084 085 086 087 088 089 090 091 092 093 094 095 096 097 098 099 100 101 102 103 104 105 106

input:cyc(10,1,100,2); runmode:0; //使用逐周期运行模式     //保证variable声明的变量都尽量在公式的最前面，防止带有if语句的分支执行影响变量的初始化 variable:step = 2 / 100; //步长 variable:fmax = 20 / 100; //最大值     variable:sarx=0; variable:trendx=0; variable:ep=0; variable:af=0;     //计算高点低点的值放到if前面，防止前面语句直接退出导致最前cyc个周期的数据无法统计到 highprice:=ref(hhv(c,cyc),1); lowprice:=ref(llv(c,cyc),1);     原始sar:sar(10,2,20);     if barpos <= cyc then exit;//不到cyc的统计周期，直接退出等待下个周期再做判断   if barpos = cyc+1 then begin af:=step; ep:=-1; if (high[barpos]-high[barpos-1])+(low[barpos]-low[barpos-1]) > 0 then begin   //看跌   trendx:= -1;   sarx:=highprice; end else begin   //看涨   trendx:= 1;   sarx:=lowprice; end goto endandshow;//跳转到末尾直接显示 end   //判断出这些日子数据的上涨，或者下跌 if trendx > 0 then begin //是否为跳转标志 if ep > 0 then begin   sarx:=lowprice;   ep:=-1;   goto endandshow;//跳转到末尾直接显示 end   //如果今日最高价大于前n的最高价，加速因子需要增加 if high > highprice then begin   af := af+step;   if af > fmax then     af := fmax; end   fsar := sarx + af * (highprice - sarx); //是否跳转 if fsar > low then begin   trendx:=-1;   ep:=1;   af:=step; end sarx:=fsar; end else begin if ep > 0 then begin   sarx:=highprice;   ep:=-1;   goto endandshow; //跳转到末尾直接显示 end   //看跌 if low < lowprice then begin   af := af + step;   if af > fmax then     af := fmax; end   fsar := sarx + af * (lowprice-sarx);   //是否跳转 if fsar < high then begin   trendx := 1;   ep := 1;   af := step; end sarx := fsar; end   //显示变量 endandshow@; //此为语句标号，gogo语句可以用这个标号直接跳转到这里 showsar:sarx;

fyfy

谢谢