highprice:=hhv(high,ENTERBARS+3);//多仓sar初始值可以自定义
lowPrice:=llv(low,ENTERBARS+3);//空仓sar初始值可以自定义
多以来最高:=if(holding>0 and enterbars>0,ref(hhv(h,enterbars+1),1),null);
空以来最低:=if(holding<0 and enterbars>0,ref(llv(l,enterbars+1),1),null);
kc:=ENTERBARS,LINETHICK0;
//c2:holding,NOAXIS;
//看跌KK AND HOLDING=0
if cross(0,holding) then begin
sarx:=highprice;
af:=0;
end
//看涨
if cross(holding,0) then begin
sarx:=lowPrice;
af:=0;
end
//判断出这些日子数据的上涨，或者下跌
if HOLDING =1 and ENTERBARS>0 then begin
//如果今日最高价大于前N的最高价，加速因子需要增加
If h>多以来最高 then BEGIN
af:=af+0.01;//加速因子的累加值与最大值可以自己定义。
if af>=0.1 then BEGIN
af:=0.1;
end
end
fsar := sarx + af * (多以来最高 - sarx);
sarx:=fsar;
end
//看跌 www.gspt.com
if holding=-1 and ENTERBARS>0 then begin
if low < 空以来最低 then begin
af := af + 0.01;
if af >= 0.1 then
af := 0.1;
end
fsar := sarx + af * (空以来最低-sarx);
sarx := fSar;
end
//显示变量
ENDANDSHOW@; //此为语句标号，GOGO语句可以用这个标号直接跳转到这里
ShowSar:sarx,CIRCLEDOT,colorred;
