#PROFIT_TEST  LONG 20000
#PROFIT_COMM  SCHWAB ROUNDLOTS 0 - TODAYS CLOSE
#PROFIT_OUTPUT  DETAIL
#OUTPUT_FILE  'RSIPT.LST'
#MAX_QUOTES  100
F1 : ARRAY;
PLOT BEGIN
F1 = RSI(14);
END; { of PLOT BEGIN}
C1 = F1[-1] < 30 AND F1 > 30;
C2 = F1[-1] > 70 AND F1 < 70;
BUY WHEN (C1);
SELL WHEN (C2);