Error

 Previous Topic Next Topic
 MS Support #1 Posted : Wednesday, June 15, 2022 5:09:43 PM(UTC) Rank: Advanced MemberGroups: Moderators, Registered, Registered Users, SubscribersJoined: 10/8/2010(UTC)Posts: 1,949Thanks: 89 timesWas thanked: 155 time(s) in 150 post(s) James Garofallou’s article “Tracking Relative Strength in Four Dimensions” introduces an expanded calculation of the standard Relative Strength Comparative indicator. The MetaStock version requires separating the formula into several helper indicators. The final calculation of RS4r and RS5 is the only formula intended to be plotted on a chart. Please note: You must make the helper indicators first.  If you change the names of the helper indicators, you must change the references to them in the RS4r formula. We recommend not changing the names unless you are familiar with the MetaStock formula language.Also note: You can change the funds used in the RS4r calculation by changing the ticker symbols used in the helper indicators.  Each one lists a single fund's symbol on the first line of the formula. - RS3 - FLCOX:Formula: Code:``````sec:= Security("ONLINE:FLCOX.O", C); rs:= C/sec; mafa:= Mov(rs, 10, E); mame:= Mov(mafa, 7, S); masl:= Mov(mafa, 15, S); mavs:= Mov(masl, 30, S); rsfa:= mafa > mame; rsme:= mame > masl; rssl:= masl > mavs; rsval:= If(rsfa AND rsme AND rssl, 10, 0) + If(rsfa AND rsme AND rssl=0, 9, 0) + If(rsfa=0 AND rsme AND rssl, 9, 0) + If(rsfa=0 AND rsme AND rssl=0, 5, 0);`````` - RS3 - FNCMX: Formula: Code:``````sec:= Security("ONLINE:FNCMX.O", C); rs:= C/sec; mafa:= Mov(rs, 10, E); mame:= Mov(mafa, 7, S); masl:= Mov(mafa, 15, S); mavs:= Mov(masl, 30, S); rsfa:= mafa > mame; rsme:= mame > masl; rssl:= masl > mavs; rsval:= If(rsfa AND rsme AND rssl, 10, 0) + If(rsfa AND rsme AND rssl=0, 9, 0) + If(rsfa=0 AND rsme AND rssl, 9, 0) + If(rsfa=0 AND rsme AND rssl=0, 5, 0);`````` - RS3 - FPADX: Formula: Code:``````sec:= Security("ONLINE:FPADX.O", C); rs:= C/sec; mafa:= Mov(rs, 10, E); mame:= Mov(mafa, 7, S); masl:= Mov(mafa, 15, S); mavs:= Mov(masl, 30, S); rsfa:= mafa > mame; rsme:= mame > masl; rssl:= masl > mavs; rsval:= If(rsfa AND rsme AND rssl, 10, 0) + If(rsfa AND rsme AND rssl=0, 9, 0) + If(rsfa=0 AND rsme AND rssl, 9, 0) + If(rsfa=0 AND rsme AND rssl=0, 5, 0);`````` - RS3 - FSAGX: Formula: Code:``````sec:= Security("ONLINE:FSAGX.O", C); rs:= C/sec; mafa:= Mov(rs, 10, E); mame:= Mov(mafa, 7, S); masl:= Mov(mafa, 15, S); mavs:= Mov(masl, 30, S); rsfa:= mafa > mame; rsme:= mame > masl; rssl:= masl > mavs; rsval:= If(rsfa AND rsme AND rssl, 10, 0) + If(rsfa AND rsme AND rssl=0, 9, 0) + If(rsfa=0 AND rsme AND rssl, 9, 0) + If(rsfa=0 AND rsme AND rssl=0, 5, 0);`````` - RS3 - FSMDX: Formula: Code:``````sec:= Security("ONLINE:FSMDX.O", C); rs:= C/sec; mafa:= Mov(rs, 10, E); mame:= Mov(mafa, 7, S); masl:= Mov(mafa, 15, S); mavs:= Mov(masl, 30, S); rsfa:= mafa > mame; rsme:= mame > masl; rssl:= masl > mavs; rsval:= If(rsfa AND rsme AND rssl, 10, 0) + If(rsfa AND rsme AND rssl=0, 9, 0) + If(rsfa=0 AND rsme AND rssl, 9, 0) + If(rsfa=0 AND rsme AND rssl=0, 5, 0);`````` - RS3 - FSPGX: Formula: Code:``````sec:= Security("ONLINE:FSPGX.O", C); rs:= C/sec; mafa:= Mov(rs, 10, E); mame:= Mov(mafa, 7, S); masl:= Mov(mafa, 15, S); mavs:= Mov(masl, 30, S); rsfa:= mafa > mame; rsme:= mame > masl; rssl:= masl > mavs; rsval:= If(rsfa AND rsme AND rssl, 10, 0) + If(rsfa AND rsme AND rssl=0, 9, 0) + If(rsfa=0 AND rsme AND rssl, 9, 0) + If(rsfa=0 AND rsme AND rssl=0, 5, 0);`````` - RS3 - FSRNX: Formula: Code:``````sec:= Security("ONLINE:FSRNX.O", C); rs:= C/sec; mafa:= Mov(rs, 10, E); mame:= Mov(mafa, 7, S); masl:= Mov(mafa, 15, S); mavs:= Mov(masl, 30, S); rsfa:= mafa > mame; rsme:= mame > masl; rssl:= masl > mavs; rsval:= If(rsfa AND rsme AND rssl, 10, 0) + If(rsfa AND rsme AND rssl=0, 9, 0) + If(rsfa=0 AND rsme AND rssl, 9, 0) + If(rsfa=0 AND rsme AND rssl=0, 5, 0);`````` - RS3 - FSSNX: Formula: Code:``````sec:= Security("ONLINE:FSSNX.O", C); rs:= C/sec; mafa:= Mov(rs, 10, E); mame:= Mov(mafa, 7, S); masl:= Mov(mafa, 15, S); mavs:= Mov(masl, 30, S); rsfa:= mafa > mame; rsme:= mame > masl; rssl:= masl > mavs; rsval:= If(rsfa AND rsme AND rssl, 10, 0) + If(rsfa AND rsme AND rssl=0, 9, 0) + If(rsfa=0 AND rsme AND rssl, 9, 0) + If(rsfa=0 AND rsme AND rssl=0, 5, 0);`````` - RS3 - FSUTX: Formula: Code:``````sec:= Security("ONLINE:FSUTX.O", C); rs:= C/sec; mafa:= Mov(rs, 10, E); mame:= Mov(mafa, 7, S); masl:= Mov(mafa, 15, S); mavs:= Mov(masl, 30, S); rsfa:= mafa > mame; rsme:= mame > masl; rssl:= masl > mavs; rsval:= If(rsfa AND rsme AND rssl, 10, 0) + If(rsfa AND rsme AND rssl=0, 9, 0) + If(rsfa=0 AND rsme AND rssl, 9, 0) + If(rsfa=0 AND rsme AND rssl=0, 5, 0);`````` - RS3 - FTBFX: Formula: Code:``````sec:= Security("ONLINE:FTBFX.O", C); rs:= C/sec; mafa:= Mov(rs, 10, E); mame:= Mov(mafa, 7, S); masl:= Mov(mafa, 15, S); mavs:= Mov(masl, 30, S); rsfa:= mafa > mame; rsme:= mame > masl; rssl:= masl > mavs; rsval:= If(rsfa AND rsme AND rssl, 10, 0) + If(rsfa AND rsme AND rssl=0, 9, 0) + If(rsfa=0 AND rsme AND rssl, 9, 0) + If(rsfa=0 AND rsme AND rssl=0, 5, 0);`````` - RS3 - FXAIX: Formula: Code:``````sec:= Security("ONLINE:FXAIX.O", C); rs:= C/sec; mafa:= Mov(rs, 10, E); mame:= Mov(mafa, 7, S); masl:= Mov(mafa, 15, S); mavs:= Mov(masl, 30, S); rsfa:= mafa > mame; rsme:= mame > masl; rssl:= masl > mavs; rsval:= If(rsfa AND rsme AND rssl, 10, 0) + If(rsfa AND rsme AND rssl=0, 9, 0) + If(rsfa=0 AND rsme AND rssl, 9, 0) + If(rsfa=0 AND rsme AND rssl=0, 5, 0);`````` RS4r: Formula: Code:``````rsFXAIX:= FmlVar("- RS3 - FXAIX","RSVAL"); rsFNCMX:= FmlVar("- RS3 - FNCMX","RSVAL"); rsFSMDX:= FmlVar("- RS3 - FSMDX","RSVAL"); rsFSSNX:= FmlVar("- RS3 - FSSNX","RSVAL"); rsFSPGX:= FmlVar("- RS3 - FSPGX","RSVAL"); rsFLCOX:= FmlVar("- RS3 - FLCOX","RSVAL"); rsFPADX:= FmlVar("- RS3 - FPADX","RSVAL"); rsFSAGX:= FmlVar("- RS3 - FSAGX","RSVAL"); rsFSUTX:= FmlVar("- RS3 - FSUTX","RSVAL"); rsFTBFX:= FmlVar("- RS3 - FTBFX","RSVAL"); rsFSRNX:= FmlVar("- RS3 - FSRNX","RSVAL"); RS4r:= ( (rsFXAIX + rsFNCMX + rsFSMDX + rsFSSNX + rsFSPGX + rsFLCOX + rsFPADX + rsFSAGX + rsFSUTX + rsFTBFX + rsFSRNX) / 11 ) * 10; RS5:= (Sum(RS4r, 15) / 15); RS4r; RS5``````
 Wanna join the discussion?! Login to your Discussions forum accountor Register a new forum account.
 Users browsing this topic
Forum Jump
You cannot post new topics in this forum.
You cannot reply to topics in this forum.
You cannot delete your posts in this forum.
You cannot edit your posts in this forum.
You cannot create polls in this forum.
You cannot vote in polls in this forum.