#max_quotes 400
#output_file 'sar.lst'
sar_a : array;
sar_a = sar(.02,.20);
if first_ticker then
    writeln('TICKER       SAR    CLOSE    C-SAR    ACTION');
if over(sar_a,c) = 0
    writeln(ticker,sar_a,' ',c,' ',c-sar_a,' ',' SAR SHORT/SELL');
if over(c,sar_a) = 0
    writeln(ticker,sar_a,' ',c,' ',c-sar_a,' ',' SAR LONG/BUY');