{
        RSIPT.TAS
                RSI PROFIT TEST SCRIPT EXAMPLE
                This script will signal a SELL when the
                RSI(14) crosses under 'rsi_upper' and a BUY when
                RSI(14) crosses above 'rsi_lower'.
}
#PROFIT_TEST LONG 1000          { long positions with $1000}
#MAX_QUOTES 300                 { only read in 300 quotes }
#OUTPUT_FILE 'RSIPT.LST'        { assign output listing to rsipt.lst}
RSI_VALUES : ARRAY;             { array containing plotted points }
RSI_UPPER := 75;                { Upper range of RSI - point to SELL
                                  Change this if
                                  you want to test different value}
RSI_LOWER := 50;                { Lower range of RSI - point to BUY
                                  Change this if
                                  you want to test different value}
PLOT BEGIN      { This begins the "plot" of the RSI }
        RSI_VALUES := RSI(14);  { COMPUTE THE RSI(14) PLOT }
END;
BUY WHEN RSI_VALUES[-1] < RSI_LOWER
AND RSI_VALUES > RSI_LOWER;
SELL WHEN RSI_VALUES[-1] > RSI_UPPER  AND RSI_VALUES < RSI_UPPER;