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.

derek2209

EasyLanguage Convolution Indicator by John F. Ehlers

Recommended Posts

Hi Traderslaboratory

 

In John F Ehlers Book " Cycle-Analytics-for-Traders "

The EasyLanguage code to compute the Convolution indicator is given in

Code Listing 13-1.

EasyLanguage Code to Compute and Display Convolution

 

/////////////////////////////////////////////////////////////////////////////

the line in the book and below is incomplete

i.e.

<<< If Filt[intPortion(.5*N)] < Filt Convolution[N] = (1 + (ExpValue Blank >>>

 

To get Indicator to run inserted the line below

 

<<< If (IntPortion(.5*N))>Filt then Convolution[N]=(1+ExpValue(N)); >>>

Could someone please correct this effort

///////////////////////////////////////////////////////////////////////////

 

See attached pdf " Ehlers Convolution Indicator" for the original code

 

Thank you in advance

Derek

 

The EasyLanguage code to compute the Convolution 
indicator is given in Code Listing 13-1. 
Code Listing 13-1.
EasyLanguage
Code to Compute
and Display
Convolution
{ Convolution Indicator 
(c) 2013 John F. Ehlers 

} 
Inputs: 
ShortestPeriod(40), 
LongestPeriod(80); 
Vars: 
alpha1(0), 
HP(0), 
a1(0), 
b1(0), 
c1(0), 
c2(0), 
c3(0), 
Filt(0), 
N(0), 
II(0), 
X(0), 
Y(0), 
Sx(0), 
Sy(0), 
Sxx(0), 
Syy(0), 
Sxy(0), 
Color1(0), 
Color2(0), 
Color3(0); 
Arrays: 

Corr[48](0), 
Slope[48](0), 
Convolution[48](0); 
//HighPass filter cyclic component 
alpha1 = (Cosine(1.414*360 / Longe 
HP = (1 - alpha1 / 2)* 
(1 - alpha1 / 2)* 
(Close - 2*Close[1] + Close[2]) + 
(1 - alpha1)*HP[1] - (1 - alpha1)* 
(1 - alpha1)*HP[2]; 
//Smooth with a Super Smoother Fil 
a1 = expvalue(-1.414*3.14159 / Sho
b1 = 2*a1*Cosine(1.414*180 / Short
c2 = b1;
c3 = -a1*a1;
c1 = 1 - c2 - c3;
Filt = c1*
(HP + HP[1]) / 2 + c2*Filt[1] + c3

For N = 1 to 48 Begin 
Sx = 0; 
Sy = 0; 
Sxx = 0; 
Syy = 0; 
Sxy = 0; 
For II = 1 to N Begin
X = Filt[iI - 1];
Y = Filt[N - II];
Sx = Sx + X;
Sy = Sy + Y;
Sxx = Sxx + X*X;
Sxy = Sxy + X*Y;
Syy = Syy + Y*Y; 
End; 
If (N*Sxx - Sx*Sx)*
(N*Syy - Sy*Sy) > 0 Then Corr[N] =
(N*Syy - Sy*Sy)); 
Slope[N] = 1; 

{//////////////////////////////////////////////////////////////////////////////////////////

In John  F Ehlers Book  " Cycle-Analytics-for-Traders"
The EasyLanguage code to compute the Convolution indicator is given in Code Listing 13-1.

the line in the book and below is incomplete
i.e.
<<<  If Filt[intPortion(.5*N)] < Filt Convolution[N] = (1 + (ExpValue  >>>

To get Indicator to run   substitued the line below

<<<  If (IntPortion(.5*N))>Filt then Convolution[N]=(1+ExpValue(N));  >>>
Could someone please correct this effort

/////////////////////////////////////////////////////////////////////////////////////////////}


If (IntPortion(.5*N))>Filt then Convolution[N]=(1+ExpValue(N));
End;
//Plot as a Heatmap
For N = 3 to 48 Begin 
If Slope[N] > 0 Then Begin

Color1 = 255*Convolution[N];
Color2 = 0; 
End; 
If Slope[N] < 0 Then Begin
Color1 = 0;
Color2 = 255*Convolution[N]; 
End; 
Color3 = 0; 
If N = 2 Then Plot2[4]
(2, “S2”, RGB(Color1, Color2, Colo 
If N = 3 Then Plot3[4]
(3, “S3”, RGB(Color1, Color2, Colo 
If N = 4 Then Plot4[4]
(4, “S4”, RGB(Color1, Color2, Colo 
If N = 5 Then Plot5[4]
(5, “S5”, RGB(Color1, Color2, Colo 
If N = 6 Then Plot6[4]
(6, “S6”, RGB(Color1, Color2, Colo 
If N = 7 Then Plot7[4]
(7, “S7”, RGB(Color1, Color2, Colo 
If N = 8 Then Plot8[4]
(8, “S8”, RGB(Color1, Color2, Colo 
If N = 9 Then Plot9[4]
(9, “S9”, RGB(Color1, Color2, Colo 
If N = 10 Then Plot10[4]
(10, “S10”, RGB(Color1, Color2, Co 
If N = 11 Then Plot11[4]
(11, “S11”, RGB(Color1, Color2, Co 
If N = 12 Then Plot12[4]

(12, “S12”, RGB(Color1, Color2, Co 
If N = 13 Then Plot13[4] 
(13, “S13”, RGB(Color1, Color2, Co 
If N = 14 Then Plot14[4] 
(14, “S14”, RGB(Color1, Color2, Co 
If N = 15 Then Plot15[4] 
(15, “S15”, RGB(Color1, Color2, Co 
If N = 16 Then Plot16[4] 
(16, “S16”, RGB(Color1, Color2, Co 
If N = 17 Then Plot17[4] 
(17, “S17”, RGB(Color1, Color2, Co 
If N = 18 Then Plot18[4] 
(18, “S18”, RGB(Color1, Color2, Co 
If N = 19 Then Plot19[4] 
(19, “S19”, RGB(Color1, Color2, Co 
If N = 20 Then Plot20[4] 
(20, “S20”, RGB(Color1, Color2, Co 
If N = 21 Then Plot21[4] 
(21, “S21”, RGB(Color1, Color2, Co 
If N = 22 Then Plot22[4] 
(22, “S22”, RGB(Color1, Color2, Co 
If N = 23 Then Plot23[4] 
(23, “S23”, RGB(Color1, Color2, Co 
If N = 24 Then Plot24[4] 
(24, “S24”, RGB(Color1, Color2, Co 
If N = 25 Then Plot25[4] 
(25, “S25”, RGB(Color1, Color2, Co 
If N = 26 Then Plot26[4] 
(26, “S26”, RGB(Color1, Color2, Co 

If N = 27 Then Plot27[4] 
(27, “S27”, RGB(Color1, Color2, Co 
If N = 28 Then Plot28[4] 
(28, “S28”, RGB(Color1, Color2, Co 
If N = 29 Then Plot29[4] 
(29, “S29”, RGB(Color1, Color2, Co 
If N = 30 Then Plot30[4] 
(30, “S30”, RGB(Color1, Color2, Co 
If N = 31 Then Plot31[4] 
(31, “S31”, RGB(Color1, Color2, Co 
If N = 32 Then Plot32[4] 
(32, “S32”, RGB(Color1, Color2, Co 
If N = 33 Then Plot33[4] 
(33, “S33”, RGB(Color1, Color2, Co 
If N = 34 Then Plot34[4] 
(34, “S34”, RGB(Color1, Color2, Co 
If N = 35 Then Plot35[4] 
(35, “S35”, RGB(Color1, Color2, Co 
If N = 36 Then Plot36[4] 
(36, “S36”, RGB(Color1, Color2, Co 
If N = 37 Then Plot37[4] 
(37, “S37”, RGB(Color1, Color2, Co 
If N = 38 Then Plot38[4] 
(38, “S38”, RGB(Color1, Color2, Co 
If N = 39 Then Plot39[4] 
(39, “S39”, RGB(Color1, Color2, Co 
If N = 40 Then Plot40[4] 
(40, “S40”, RGB(Color1, Color2, Co 
If N = 41 Then Plot41[4] 

(4 , “S4 ”, RGB(Color1, Color2, Co 
If N = 42 Then Plot42[4] 
(4 , “S4 ”, RGB(Color1, Color2, Co 
If N = 43 Then Plot43[4] 
(4 , “S4 ”, RGB(Color1, Color2, Co 
If N = 44 Then Plot44[4] 
( 4, “S 4”, RGB(Color1, Color2, Co 
If N = 45 Then Plot45[4] 
(4 , “S4 ”, RGB(Color1, Color2, Co 
If N = 46 Then Plot46[4] 
(4 , “S4 ”, RGB(Color1, Color2, Co 
If N = 47 Then Plot47[4] 
(4 , “S4 ”, RGB(Color1, Color2, Co 
If N = 48 Then Plot48[4] 
(4 , “S4 ”, RGB(Color1, Color2, Co 
End; 

Ehlers Convolution.pdf

Edited by derek2209

Share this post


Link to post
Share on other sites

Derek,

 

I think you may have to buy the book. The PDF you posted is cropped on the right after ~30 chars so who knows what else may be missing...

 

What happens when you run your

"If (IntPortion(.5*N))>Filt then Convolution[N]=(1+ExpValue(N));"

version?

'Filt' is a function call. You'd have to have the code for that to get this working...

 

Have you found complete .pla code for this? Your missing code and the Filt function might be an easy translation

 

Here is a contact who may be able to get you all the original code... He no longer uses TS so emphasis on may be

John Ehlers code links

 

hth

 

zdo

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

    • Reply to this topic... Skim these - if you can https://www.oftwominds.com/blogmay20/globalization-dead5-20.html https://www.oftwominds.com/blogmay20/cycles5-20.html https://www.oftwominds.com/blogmay20/opt-out5-20.html https://www.oftwominds.com/blogmay20/tinas-orgy5-20.html https://www.oftwominds.com/blogmay20/stocks-fragility5-20.html and if you’re still strong and not  burnt out https://www.oftwominds.com/blogmay20/demand5-20.html https://www.oftwominds.com/blogmay20/social-media-plantation5-20.html
    • Open a new NinjaTrader Brokerage account by June 30th and SAVE on a Lifetime license with a discounted price of only $999! Along with access to the most powerful version of NinjaTrader, you will save even more with deep discount commissions at $.09 per Micro futures contract & only $50 margins. Your Lifetime license includes ALL of NinjaTrader’s premium features: Award-winning order entry including Chart Trader & OCO orders Order Flow + tool set featuring the Volume Profile Indicator – NinjaTrader’s most powerful indicator to date ATM Strategies, advanced Alerting system, auto-close positions for additional risk management & more PLUS all future NinjaTrader platform enhancements are included at no additional charge – for life! Simply fund your new account with the minimum of $400 by June 30th to lock in your savings. Questions? Contact us at 312.262.1289 or brokeragesales@ninjatrader.com. Platform License Discount Requirements: Account must be opened & funded in June 2020 with $400 minimum Discount is applicable to software purchase only 2nd accounts for current NinjaTrader Brokerage account owners are not eligible for platform discounts Futures and Forex trading contains substantial risk and is not for every investor. An investor could potentially lose all or more than the initial investment. Risk capital is money that can be lost without jeopardizing ones financial security or life style. Only risk capital should be used for trading and only those with sufficient risk capital should consider trading. Past performance is not necessarily indicative of future results. View Full Risk Disclosure.
    • Date : 01st June 2020. Events to Look Out for This Week.Geopolitics are back in the picture giving the markets pause and adding another layer of uncertainty to a shaky global outlook. However other than US-China tension, next week the global data dockets are heavy and results are likely to underscore the cratering in global economies this quarter. The calendar includes the US Jobs Report and Monetary policy meeting from RBA, BOC and ECB.Monday – 01 June 2020 Caixin Manufacturing PMI (CNY, GMT 01:45) – The Caixin manufacturing PMI is expected to slightly improve to 49.6 from 49.4 in May. ISM Manufacturing PMI (USD, GMT 14:00) – The ISM index is expected to slip to 40.0 in May from 41.5 in April, compared to a recession-low of 34.5 in December of 2008. Tuesday – 02 June 2020   Interest Rate Decision & Statement (RBA, GMT 04:30) – The RBA meet and are unlikely to move rates below historic lows at 0.25%, as RBA Gov. Lowe is his recent statement repeated that negative interest rates extraordinarily unlikely. RBA will maintain its expansionary monetary policies until progress is made towards full employment and we are confident on inflation . Wednesday – 03 June 2020   Gross Domestic Product (AUD, GMT 01:30) – GDP is the economy’s most important figure. Q1’s GDP is expected to slow down at 0.3% q/q and 1.9% y/y. Unemployment data (EUR, GMT 07:55-09:00) – The German unemployment rate in May is expected to have increased to 6.2% from 5.8%, while unemployment change is expected to have declined to 194K from April’s 373K. Meanwhile, Eurozone’s April unemployment rate should rise to 7.7% from 7.4% last month. ADP Employment Change (USD, GMT 12:15) – Lasts month, ADP report revealed a -20,236k April drop that undershot the -19,520k private payroll decline by -716k. For May a -9,000k drop is seen, since nearly all measures of activity rose in May from a trough. ISM Non-Manufacturing PMI (USD, GMT 14:00) – The ISM-NMI index is expected to rise to 46.0 from 41.8 in April. Most producer sentiment reports should show May rebounds after huge April declines due to mandatory closures, on top of the demand hit initially associated with the pandemic, and the oil price plunge with the OPEC price war, as re-openings are underway in most states. The April drop in the ISM survey was much smaller than the declines seen in other measures, however, and this is why we expect a further drop in May for that measure. Interest Rate Decision and Monetary Policy Statement (CAD, GMT 14:00) – On April 15, the Bank held rates steady at 0.25%, matching widespread expectations. In the next policy statement, the BoC is expected to leave rates unchanged, the Bank of Canada Governor Poloz said is his last interview that negative rates are needed only in extreme conditions. Thursday – 04 June 2020   Interest Rate Decision, Monetary Policy Statement and Press Conference (EUR, GMT 11:45 & 12:30) – Given that Lagarde buried any hope of a “mild” recession, the stage seems set for an extension of the PEPP program in size and duration at next week’s council meeting with an end date next year giving the economy more time to recover and EU aid programs to come into effect. Given that the ECB is no longer putting much hope in a quick recovery it is already clear that with the current time frame until the end of December that would risk a sharp widening of spreads in the second half of the year, when there is also the risk of a second wave of Covid-19 infections. Jobless Claims (USD, GMT 12:30)– US initial jobless claims contracted last week by -323k to 2,123k in the week ended May 23 after tumbling -241k to 2,446k previously. Claims have been declining since surging to 6,867k in the March 27 week. Friday – 05 June 2020   Event of the Week – Non-Farm Payrolls (USD, GMT 12:30) – A -2,200k May nonfarm payroll drop is anticipated, following a -20,527 April collapse, and a -701k drop in March. The jobless rate should rise to 17.5% from 14.7% from April, versus 4.4% in March. Nearly all measures of activity rose in May from a trough just after the April BLS survey week, but the initial and continuing claims data suggest a weaker labor market in mid-May than mid-April. Average hourly earnings are assumed to fall -1.0% with a partial unwind of the April distortion from layoffs being concentrated in low-wage categories. This would translate to a drop in the y/y gain to 6.6% from 7.9%. Labour Market Data (CAD, GMT 12:30) – Canada employment plunged -1993.8k in April, nearly doubling the -1010.7k tumble in March to leave a massive and rapid reversal in the labour market as firms cut jobs as most of the economy ceased to function amid the stay at home orders the began around the middle of March. For May employment should revealed a 4,000k drop in jobs, doubling again last months number. B]Always trade with strict risk management. Your capital is the single most important aspect of your trading business.[/B]Please note that times displayed based on local time zone and are from time of writing this report.Click HERE to access the full HotForex Economic calendar.Want to learn to trade and analyse the markets? Join our webinars and get analysis and trading ideas combined with better understanding on how markets work. Click HERE to register for FREE!Click HERE to READ more Market news. Andria Pichidi Market Analyst HotForex Disclaimer: This material is provided as a general marketing communication for information purposes only and does not constitute an independent investment research. Nothing in this communication contains, or should be considered as containing, an investment advice or an investment recommendation or a solicitation for the purpose of buying or selling of any financial instrument. All information provided is gathered from reputable sources and any information containing an indication of past performance is not a guarantee or reliable indicator of future performance. Users acknowledge that any investment in FX and CFDs products is characterized by a certain degree of uncertainty and that any investment of this nature involves a high level of risk for which the users are solely responsible and liable. We assume no liability for any loss arising from any investment made based on the information provided in this communication. This communication must not be reproduced or further distributed without our prior written permission.
    • Moar questions how many corps in the SP500, NQ100, etc indexes are "rolling in revenue"?  ie they have more revenue than they did 6 months ago ??  thx.  just askin'       Weekend reading https://consentfactory.org/2020/05/20/brave-new-normal-part-2/   https://www.oftwominds.com/blogmay20/demand5-20.html
    • When you learn all fundamentals about trading, then you can move towards successful trading, but still unsure about profit.
×
×
  • Create New...

Important Information

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