谁有sar的原始算法

现在很多软件sar都是这样写的

阳:IF(CLOSE>SAR(4,2,20),SAR(4,2,20),DRAWNULL),CIRCLEDOT,COLORMAGENTA;
阴:IF(CLOSE<SAR(4,2,20),SAR(4,2,20),DRAWNULL),CIRCLEDOT,COLORGREEN;

sar被搞成函数只能调三个参数
谁有sar完全开放的源代码？