Repulse from Eric Lefort

Studies that have been contributed to the community by other users. If you’ve got something useful to share, that’s great!
Laurent
Posts: 159
Joined: 20 Nov 2010
Location: France
Has thanked: 76 times
Been thanked: 34 times

Repulse from Eric Lefort

Postby Laurent » 11 Feb 2011

Its description in french on his blog:
http://anaphrais.tradersblog.eu/repulse/

This indicator can be found on the ProRealtime platform.

Code: Select all

// RP - Repulse by Eric Lefort - Function

Inputs:
Series1 ( NumericSeries ), // Open
Series2 ( NumericSeries ), // High
Series3 ( NumericSeries ), // Low
Series4 ( NumericSeries ), // Close
Len ( NumericSimple );

Variables:
BullishForce ( 0 ),
BearishForce ( 0 );

if (Series4 > 0) then
begin
BullishForce = XAverage(((3 * Series4) - (2 * lowest(Series3, Len)) - Series1[Len]) / Series4 * 100, 5 * Len);
BearishForce = XAverage((Series1[Len] + (2 * highest(Series2, Len)) - (3 * Series4)) / Series4 * 100, 5 * Len);
RP = BullishForce - BearishForce;
end;

Code: Select all

// RP - Repulse by Eric Lefort - Indicator

Inputs:
OpenPrice ( Open ),
HighPrice ( High ),
LowPrice ( Low ),
ClosePrice ( Close ),
Length ( 5 ),
Displace ( 0 );

Variables:
MyRP ( 0 );

MyRP = RP(OpenPrice, HighPrice, LowPrice, ClosePrice, Length);

Plot1[Displace](MyRP, "RP");

Return to “User Contributed Studies and Indicator Library”