home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The World of Computer Software
/
World_Of_Computer_Software-02-385-Vol-1of3.iso
/
t
/
tas412.zip
/
RSI.PTS
< prev
next >
Wrap
Text File
|
1991-07-04
|
283b
|
13 lines
#PROFIT_TEST BOTH 20000
#OUTPUT_FILE 'RSIPT.LST'
#PROFIT_COMM SCHWAB ROUNDLOTS 0 - TODAYS CLOSE
#PROFIT_OUTPUT DETAIL
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);