RE: Relative Price Strength Indicator

["Lance Fisher" <lance@xxxxxxxxxxxxxxx>]

Duke,

Thanks for your reply.

For me, this Market Analyzer discussion is revisiting an old headache.
Your post got me thinking down the right path though. I think I figured
this out.

Both our versions of the "RelStrength.IBD" indicator work. 

Here's the catch on how to get the File Append statement in this
indicator to create a .csv file. You have to set up the Workspace
Assistant correctly for this to work.

- "Scan all price data in" obviously must be set to the proper location
for the chart data.

- In the "Scan for" section, "study alerts" must be checked or the file
will not be created. "Drawing object alerts" and "Strategy positions and
orders" can EITHER be off or on.  

- "Print settings" must be set to "Print windows that trigger alerts" OR
"Print all windows being scanned". Unless you want 500 printouts, the
former makes more sense. Never mind that there are no "Alerts" in this
code, it works in this setting nonetheless. If it is set to "Do not
print windows", the file will not be created. Apparently if the WA is
looking for something to print, it allows it to "see" the File Append
statement.

- In the "Speed Settings" sections, "Do not show while running" can
EITHER be checked, or not, it doesn't matter. "Maximize calculation
speed" CANNOT be checked, however. If it is the file will not be
created.

Whew, thank God Omega made this simple, NOT. As my little sister would
say... "This is totally lame".

Cheers.

-Lance Fisher





-----Original Message-----
From: Duke Jones - Portfolio Manager
[mailto:Duke.Jones@xxxxxxxxxxxxxxxxxxxxxx] 
Sent: Monday, January 28, 2002 1:16 PM
To: Lance Fisher; omega-list@xxxxxxxxxx
Cc: 'Francesco Topino'
Subject: RE: Relative Price Strength Indicator

Lance, I think I am having problems getting replies through list. I
changed
your code as follows and ran it through a custom list of the S&P 500.
Ran
fine through WS. If this is not the desired result describe what output
is
required I will take another look.

Duke

Input: MakeFile (True), {Set to true to create .csv file}
	   File("C:\Desktop\RelStrength.CSV") ;

Vars:  ThreeMonth (00),
	   SixMonth   (00),
	   NineMonth  (00),
	   TwelveMonth(00),
       RS         (00) ;

ThreeMonth  = ((Close / Close[60] ) - 1) * 100 ; {Rate of Change%}
SixMonth    = ((Close / Close[120]) - 1) * 100 ; {Rate of Change%}
NineMonth   = ((Close / Close[180]) - 1) * 100 ; {Rate of Change%}
TwelveMonth = ((Close / Close[240]) - 1) * 100 ; {Rate of Change%}

{Assign weights to ROC look back periods}
RS = (ThreeMonth * .4) + (SixMonth * .2) + (NineMonth * .2) +
(TwelveMonth * .2) ;

Plot1(RS, "RS.ibd");

If LastBarOnChart and MakeFile then begin
  FileAppend(File, Text(GetSymbolName, ", ", NumToStr(RS, 2)) +
NewLine) ;
End;