Jump to content

Welcome to the new Traders Laboratory! Please bear with us as we finish the migration over the next few days. If you find any issues, want to leave feedback, get in touch with us, or offer suggestions please post to the Support forum here.

  • Welcome Guests

    Welcome. You are currently viewing the forum as a guest which does not give you access to all the great features at Traders Laboratory such as interacting with members, access to all forums, downloading attachments, and eligibility to win free giveaways. Registration is fast, simple and absolutely free. Create a FREE Traders Laboratory account here.

aaa

MACD Divergence TrendLine

Recommended Posts

// Author: aaa

// from: MARKPLEX Code Divergence

// http://markplex.com/tutorial4.php

// version: 1.0

// Date: 20100501

// added:

// divergence on top +

// Line.Color.Top + Line.Color.Bot + Line.Size + Plot.MACD in inputs

[/url]

 

attachment.php?attachmentid=20838&stc=1&d=1272711737

 

PS : Stochastic Divergence TrendLine here

 

http://www.traderslaboratory.com/forums/f46/stochastic-divergence-trendline-7244.html

Snap1.jpg.53e5f34bc7ec8364bf117cbba667c19f.jpg

MACD DIVERGENCE TRENDLINE.ELD

MACD Divergence TrendLines.pla

MACD Divergence TrendLine.txt

Share this post


Link to post
Share on other sites

TL_NEW

This reserved word adds the specified text string to a price chart

Text_New

This reserved word adds the specified text string to a price chart

 

I'm wondering if it's possible 2 draw divergences lines to an indicator ?

Share this post


Link to post
Share on other sites
TL_NEW

This reserved word adds the specified text string to a price chart

Text_New

This reserved word adds the specified text string to a price chart

 

I'm wondering if it's possible 2 draw divergences lines to an indicator ?

 

 

do you mean trendline ?

 

TL_NEW

This reserved word adds the specified text string to a price chart

Share this post


Link to post
Share on other sites
....

I'm wondering if it's possible 2 draw divergences lines to an indicator ?

 

sure, why not?

 

just duplicate everything...

make sure you name the variables with -1 and -2 suffix.

Share this post


Link to post
Share on other sites

Hi TAMS

 

Always here 2 help absent-minded

 

Oups... I've forgot 2 attach my work in my last post...

 

do you mean trendline ?

 

Yes and I've tried also Text_New

 

make sure you name the variables with -1 and -2 suffix.

 

I've done it but w/o succes

 

I was wondering if it's allowed by EL 2 change iPrice by the iValue of an indicator ?

 

This reserved word adds a trendline with the specified starting and ending points to a price chart. It returns a numeric expression corresponding to the ID number of the trendline added to the chart.

 

Value1 = TL_New(iBarDate, iBarTime, iPrice, eBarDate, eBarTime, ePrice)

 

If U have Xtra time, Would U mind 2 have a look on my attachement ?

 

regards

 

aaa

MACD Divergence TrendLines Indicator.txt

Share this post


Link to post
Share on other sites
only plot trendlines directly on the MACD indicator

 

LOL... you knew I was going to ask you to make a drawing... but...

 

 

to draw in subchart, you need TL_NEW_SELF.

 

this is a MultiCharts exclusive keyword.

 

 

in this case, you do not need to duplicate the variables and calculations...

Share this post


Link to post
Share on other sites

So it's not possible in Easy Language but possible in Power Language

 

it's amazing that U know 110% of Power Language.

 

TAMS, U know what ?

 

U ARE THE BEST !!!

 

TL_New_self

Displays a trendline, with the specified starting and ending points, on the SubChart containing the study; returns a trendline-specific ID number, required to modify the trendline.

Usage

TL_New_self (sDate, sTime, sPriceValue, eDate, eTime, ePriceValue)

Edited by aaa

Share this post


Link to post
Share on other sites

Is it possible to apply the same principle of divergence to a StochRSI indicator (divergence drawn on both the price and the indicator)?

 

I tried playing with it on my end but getting a ton of errors. I'm not sure if the errors are due to the 2 lines in the stochrsi versus the single line in the MACD. Below is the code that i'm using for the stochrsi:

 

input:

 

RSILength(9),

StochLength(18),

KLength(6),

DLength(3),

oversold(20),

overbought(80),

overscolor(white),

overbcolor(white);

 

Vars:

DToscK(0),

DToscD(0);

 

value1 = FastKCustomEasy(RSI(C, RSILength),StochLength);

DToscK = average(value1,KLength);

DToscD = average(DToscK,DLength);

 

plot1(DToscK,"%K" );

plot2(DToscD,"%D" );

plot3( overbought, "OverBot" ) ;

plot4( oversold, "OverSld" ) ;

 

condition1 = value1 crosses over oversold ;

if condition1 then

Alert( "Indicator exiting oversold zone" )

else

begin

condition1 = value1 crosses under overbought ;

if condition1 then

Alert( "Indicator exiting overbought zone" ) ;

end;

Edited by lonew0lf

Share this post


Link to post
Share on other sites
Is it possible to apply the same principle of divergence to a StochRSI indicator (divergence drawn on both the price and the indicator)?

 

I tried playing with it on my end but getting a ton of errors. I'm not sure if the errors are due to the 2 lines in the stochrsi versus the single line in the MACD. Below is the code that i'm using for the stochrsi:

 

...end;

 

mmm... let me check my crystal ball for your error messages....

Share this post


Link to post
Share on other sites

Man you work fast. Here's what I threw together:

 

//----------------------------------------------------

inputs:

//----------------------------------------------------

 

RSILength(9),

StochLength(18),

KLength(6),

DLength(3),

LeftStrength(3),

RightStrength(3),

Line.Color.Top(magenta),

Line.Color.Bot(magenta),

Line.Size(2),

Plot.stochrsi(1);

 

//----------------------------------------------------

variables:

//----------------------------------------------------

 

DToscK(0),

DToscD(0),

 

var0(0),

var1(0),

var2(0),

oPivotPrice1(0),

oPivotBar1(0),

oPivotPrice2(0),

oPivotBar2(0),

oPivotPrice11(0),

oPivotBar11(0),

oPivotPrice12(0),

oPivotBar12(0);

 

value1 = FastKCustomEasy(RSI(C, RSILength),StochLength);

DToscK = average(value1,KLength);

DToscD = average(DToscK,DLength);

 

var0 = StochRSI( Close, RSILength, StochLength, KLength, DLength );

 

Condition1 = Pivot( var0, RSILength, LeftStrength, RightStrength, 1, -1, oPivotPrice1, oPivotBar1 ) <> -1

AND ( oPivotBar1 - RightStrength ) = 0 ;

 

Condition11 = Pivot( var0, RSILength, LeftStrength, RightStrength, 1, 1, oPivotPrice11, oPivotBar11 ) <> -1

AND ( oPivotBar11 - RightStrength ) = 0 ;

 

Condition2 = Pivot( var0, RSILength, LeftStrength, RightStrength, 2, -1, oPivotPrice2, oPivotBar2 ) <> -1;

 

Condition12 = Pivot( var0, RSILength, LeftStrength, RightStrength, 2, 1, oPivotPrice12, oPivotBar12 ) <> -1;

 

If

Condition1 and Condition2 // added condition2 = referecne future data

AND L[oPivotBar2] >= L[oPivotBar1]

AND var0[oPivotBar2] < var0[oPivotBar1] then

Begin

Value2 = TL_New(D[oPivotBar2], T[oPivotBar2], L[oPivotBar2], D[oPivotBar1], T[oPivotBar1], L[oPivotBar1]);

TL_SetColor( Value2, Line.Color.Bot );

TL_SetSize( Value2, Line.Size );

End;

 

If

Condition11 and Condition12 // added condition12 referecne future data

AND H[oPivotBar12] <= H[oPivotBar11]

AND var0[oPivotBar12] > var0[oPivotBar11] then

Begin

Value12 = TL_New(D[oPivotBar12], T[oPivotBar12], H[oPivotBar12], D[oPivotBar11], T[oPivotBar11], H[oPivotBar11]);

TL_SetColor( Value12, Line.Color.Top );

TL_SetSize( Value12, Line.Size );

End;

 

if Plot.stochrsi <> 0 then

begin

Plot1( var0 );

end;

Edited by lonew0lf

Share this post


Link to post
Share on other sites

tagged code should look like this:

 

//----------------------------------------------------
inputs:
//----------------------------------------------------

RSILength(9),
StochLength(18),
KLength(6),
DLength(3),
LeftStrength(3),
RightStrength(3),
Line.Color.Top(magenta),
Line.Color.Bot(magenta),
Line.Size(2), 
Plot.stochrsi(1);

 

 

just highlight the code (ie select the text),

then press the # key on the top of the message window.

Share this post


Link to post
Share on other sites
Is it possible to apply the same principle of divergence to a StochRSI indicator (divergence drawn on both the price and the indicator)?

 

Hello

I will have a look this WE

rgds

aa

Share this post


Link to post
Share on other sites

*************************

 

If someone else is interested with others indicators divergence trendline like

 

RSI

Mom

CCI

etc...

 

I could post one each WE

 

If U have a preferred one, please post it here

 

It should B fun 2 mix them on a chart ?!

 

************************************

Edited by aaa

Share this post


Link to post
Share on other sites

AAA - thanks for undertaking this endeavor. I've come to like the stochrsi as a good test against my signals. The ability to see divergence would be quite nice.

 

I'm running the MACD divergence on my charts right now and it looks good, hopefully the same will hold true for stochrsi.

Share this post


Link to post
Share on other sites

I'd be interested in the ability to add a moving average or linear moving average to define trend, and only show divergences in the direction of the trend.

 

Greatly cuts down on the signals... but increases the probability of continuation.

 

snowbird

Share this post


Link to post
Share on other sites

I was able to apply divergence to both the price and indicator. Thank you AAA for putting the original together. The below modification applies to the stochrsi:

 

// StochRSI Divergence TrendLine
// Author: MARKPLEX
// http://markplex.com/tutorial4.php
// version: 1.0

// Author: aaa
// version: 2.0
// Date: 20091129
// added: 
// divergence on top +
// Line.Color.Top + Line.Color.Bot + Line.Size + Plot.Sto in inputs

//----------------------------------------------------
inputs:
//----------------------------------------------------


RSILength(9),
StochLength(18),
KLength(6),
DLength(3),
OverSold(20),
OverBought(80),
Length(20),
LeftStrength(3),
RightStrength(3),
Line.Color.Top(red),
Line.Color.Bot(blue),
Line.Size(3),
Plot.stochrsi(1);

//---------------------------------------------------- 
variables:
//----------------------------------------------------

DToscK(0), 
DToscD(0),

oPivotPrice1(0),
oPivotBar1(0),
oPivotPrice2(0),
oPivotBar2(0),

oPivotPrice11(0),
oPivotBar11(0),
oPivotPrice12(0),
oPivotBar12(0);

value1 = FastKCustomEasy(RSI(C, RSILength),StochLength);
DToscK =  average(value1,KLength);
DToscD = average(DToscK,DLength);

Condition1 = Pivot( DToscK, Length, LeftStrength, RightStrength, 1, -1, oPivotPrice1, oPivotBar1 ) <> -1 
	AND ( oPivotBar1 - RightStrength ) = 0 ;

Condition11 = Pivot( DToscK, Length, LeftStrength, RightStrength, 1, 1, oPivotPrice11, oPivotBar11 ) <> -1 
	AND ( oPivotBar11 - RightStrength ) = 0 ;

Condition2 = Pivot( DToscK, Length, LeftStrength, RightStrength, 2, -1, oPivotPrice2, oPivotBar2 ) <> -1;

Condition12 = Pivot( DToscK, Length, LeftStrength, RightStrength, 2, 1, oPivotPrice12, oPivotBar12 ) <> -1;

If 
	Condition1 and Condition2 // added condition2 = referecne future data
	AND L[oPivotBar2] >= L[oPivotBar1] 
	AND DToscK[oPivotBar2] < DToscK[oPivotBar1] then 
Begin
	Value2 = TL_New(D[oPivotBar2], T[oPivotBar2], L[oPivotBar2], D[oPivotBar1], T[oPivotBar1], L[oPivotBar1]); 
	TL_SetColor( Value2, Line.Color.Bot );
	TL_SetSize(  Value2, Line.Size  );
End;

If 
	Condition11 and Condition12 // added condition12  referecne future data
	AND H[oPivotBar12] <= H[oPivotBar11] 
	AND DToscK[oPivotBar12] > DToscK[oPivotBar11] then 
Begin
	Value12 = TL_New(D[oPivotBar12], T[oPivotBar12], H[oPivotBar12], D[oPivotBar11], T[oPivotBar11], H[oPivotBar11]); 
	TL_SetColor( Value12, Line.Color.Top );
	TL_SetSize(  Value12, Line.Size  );
End;

if Plot.stochrsi <> 0 then	
Plot1( DToscK );


condition3 = Pivot( DToscK, Length, LeftStrength, RightStrength, 1, -1, oPivotPrice1, oPivotBar1 ) <> -1 
	AND ( oPivotBar1 - RightStrength ) = 0 ;

condition32 = Pivot( DToscK, Length, LeftStrength, RightStrength, 1, 1, oPivotPrice11, oPivotBar11 ) <> -1 
	AND ( oPivotBar11 - RightStrength ) = 0 ;

condition4 = Pivot( DToscK, Length, LeftStrength, RightStrength, 2, -1, oPivotPrice2, oPivotBar2 ) <> -1;

condition42 = Pivot( DToscK, Length, LeftStrength, RightStrength, 2, 1, oPivotPrice12, oPivotBar12 ) <> -1;

If 
	Condition3 and condition4 
	AND L[oPivotBar2] >= L[oPivotBar1] 
	AND DToscK[oPivotBar2] < DToscK[oPivotBar1] then 
Begin
	Value2 = TL_New_SELF(D[oPivotBar2], T[oPivotBar2], DToscK[oPivotBar2], D[oPivotBar1], T[oPivotBar1], DToscK[oPivotBar1]); 
	TL_SetColor( Value2, Line.Color.Bot );
	TL_SetSize(  Value2, Line.Size  );
End;

If 
	Condition32 and Condition42
	AND H[oPivotBar12] <= H[oPivotBar11] 
	AND DToscK[oPivotBar12] > DToscK[oPivotBar11] then 
Begin
	Value12 = TL_New_SELF(D[oPivotBar12], T[oPivotBar12], DToscK[oPivotBar12], D[oPivotBar11], T[oPivotBar11], DToscK[oPivotBar11]); 
	TL_SetColor( Value12, Line.Color.Top );
	TL_SetSize(  Value12, Line.Size  );
End;

Plot1( DToscK, "stochrsi",      white );
plot2( 20,    "oversold", white);
plot3(80, "overbought", white);

StochRSI Divergence.pla

Share this post


Link to post
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.


  • Topics

  • Posts

    • AUDUSD Market Dragged Lower on Bears Dominance   AUDUSD Price Analysis – August 15 The bears were in full control moving the market lower in the prior session, although in the present session we see the pair found buyers around the level at 0.6748 for the 4th day in a row while the pairs bear dominance is evident falling to lowest close since the beginning of the year.   Key Levels Resistance Levels: 0.7297, 0.7207, 0.7085 Support Levels: 0.6748, 0.6676, 0.6620   AUDUSD long term Trend: Bearish In the bigger picture of the daily time frame, the decline from the level at 0.7207 (high) is seen as resuming the long term downtrend from 0.7297 (February high). Firm break of the level at 0.6876 (low) should confirm this bearish view.   On observation, further fall may be seen to the level at 0.6620 (low) next. On the upside, the break of the level at 0.7085 resistance is needed to be the first sign of medium-term bottoming. Otherwise, outlook will remain bearish even in case of a strong rebound.     AUDUSD short term Trend: Ranging On the flip side of the 4-hour chart, the AUDUSD is staying in consolidation from the level at 0.6676 and it’s intraday bias remains neutral first. On the upside, the break of the level at 0.6827 will extend the rebound.   But upside should be limited below the level at 0.6909 support turned resistance to bring fall resumption. On the downside, the break of the level at 0.6676 may target 100% projections from the level at 0.7085 to 0.6827 from 0.7085 at 0.6620 level reflecting on the daily chart.
    • EURJPY Approached Recent Swing Lows, Likely to Breach the Low of the Year on the Level at 117.50   EURJPY Price Analysis – August 16   The pair depreciated again in value against the Japanese Yen. The currency pair during the mid-week breached both the upper and lower horizontal lines on the moving average 5 and 13 while completing another lap on the low in today’s session towards the low level at 117.50.     Key Levels   Resistance Levels: 123.01, 121.40, 119.91   Support Levels: 117.50, 117.00, 114.84   EURJPY Long term Trend: Bearish The Daily time frame displays the EURJPY at the low, showing the pair is also testing a swing area on the level at the 117.50 to the level at 118.16 below the moving average 5 areas. The price attempted to dip below the area on August 12 to the low for the year on the level at 117.50, but could not keep the momentum going. The swing area was reestablished as support on August 13 and again today   However, buyers are trying to lean against the low level at 117.50, on the retest and hoping for a quick bounce. The trend is showing a bearish outlook in the medium and long term.   EURJPY Short term Trend: Ranging On its Intraday, the bias in EURJPY remains neutral for the moment. With the level of 119.91 minor resistance intact, further decline is in favor. Although a break of the level at 117.50 will resume a large downtrend to the level at 114.84 support next.   However, on the break of 119.91 resistance will indicate short term bottoming. A stronger rebound should be seen to the horizontal resistance line now at 121.40.
    • USDCHF Bounces Off Lower Prices On Correction.   USDCHF bounces off lower prices on correction the past week. This has opened the door for more gain in the new week. Resistance resides at the 0.9800 level. Above here, resistance lies at the 0.9850 level and then the 0.9900 level. Further out, resistance comes in at the 0.9950 level. On the downside, support is seen at the 0.9750 level with a turn below here opening the door for more decline towards the 0.9700 level. And then the 0.9650 level. Further down, support resides at the 0.9600 level. All in all, USDCHF remains biased to the upside on further corrective strength.    
    • Can I ask what broker are you using for trading oil?
    • Hey, I am new to this. Anyone use software like this?? Is it legit?? 
×
×
  • Create New...

Important Information

By using this site, you agree to our Terms of Use.