请老师将SAR转为TBQ

Params Numeric Length1(4); Numeric Step(2); Numeric MValue(2); Vars NumericSeries Step1; NumericSeries MValue1; NumericSeries SARLine; Numeric AA; Numeric BB; NumericSeries SAR红; NumericSeries SAR绿; Begin Step1 = Step / 100; MValue1 = MValue / 10; SARLine = Sar(Length1,Step1,MValue1);//,Circledot;//Length个周期的抛物转向，步长为Step1，极限值为MValue1. //PlotLine("SARLine",SARLine,Red,Circledot); //PlotLine("SARLine",-SARLine,Cyan,Circledot); AA=IIF(SARLine<0,ABS(SARLine),InvalidNumeric);//青点 BB=IIF(SARLine>0,SARLine,InvalidNumeric);//红点 PlotLine("SARLine",BB,Red,Circledot,1); PlotLine("SARLine",AA,Cyan,Circledot,1); SAR红=CROSSUP(SARLINE,0)||SARLINE>0;//SAR上穿||SAR>0 SAR绿=CROSSDOWN(SARLINE,0)||SARLINE<0;//SAR下穿||SAR<0 End