Zero Lag Trend Signals Indicator by AlgoAlpha

• 11/13/2024 at 3:58 PM #240318
  adeelq79

  Hi all,

  Is it possible to code the following indicator “Zero Lag Trend Signals Indicator by AlgoAlpha” to work on ProRealCode – found here:(175) This Zero-Lag BUY SELL Indicator Makes All The Others OBSOLTE – YouTube

   

  Thanks

   

   

  

  adeelq79

  Participant

  Topics: 7

  Replies: 12

  Been thanked: 1 time
  11/15/2024 at 10:45 AM #240396
  Iván

  Done:

  Zero Lag Trend Signals

  //-------------------------------------// //PRC_Zero Lag Trend Signals //version = 0 //15.11.24 //Iván González @ www.prorealcode.com //Sharing ProRealTime knowledge //-------------------------------------// //---Inputs //-------------------------------------// length=70 mult=1.2 src=close //-------------------------------------// // Zlema calculation //-------------------------------------// lag=floor((length-1)/2) myzlema=average[length,1](src+(src-src[lag])) //-------------------------------------// // Volatility calculation //-------------------------------------// atr=averagetruerange[length](close) volatil=highest[length*3](atr)*mult //-------------------------------------// // Trend condition //-------------------------------------// once trend=0 if close crosses over myzlema+volatil then trend=1 r=0 g=255 elsif close crosses under myzlema-volatil then trend=-1 r=255 g=0 endif //-------------------------------------// // Signals and colors //-------------------------------------// if trend=-1 then upper=myzlema+volatil alpha1=90 lower=myzlema alpha2=0 if trend<>trend[1] then drawarrowdown(barindex,upper+0.25*atr)coloured(r,g,0,175) endif else upper=myzlema alpha1=0 lower=myzlema-volatil alpha2=90 if trend<>trend[1] then drawarrowup(barindex,lower-0.25*atr)coloured(r,g,0,175) endif endif if close crosses over myzlema and trend=1 and trend[1]=1 then drawtext("▲",barindex,myzlema-volatil*1.5)coloured("green") elsif close crosses under myzlema and trend=-1 and trend[1]=-1 then drawtext("▼",barindex,myzlema+volatil*1.5)coloured("red") endif if barindex > 4*length then colorbetween(myzlema,upper,r,g,0,alpha1) colorbetween(myzlema,lower,r,g,0,alpha2) endif //-------------------------------------// return myzlema as "Zero Lag Basis"style(line,2)coloured(r,g,0)

  1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68

  //-------------------------------------// //PRC_Zero Lag Trend Signals //version = 0 //15.11.24 //Iván González @ www.prorealcode.com //Sharing ProRealTime knowledge //-------------------------------------// //---Inputs //-------------------------------------// length=70 mult=1.2 src=close //-------------------------------------// // Zlema calculation //-------------------------------------// lag=floor((length-1)/2)   myzlema=average[length,1](src+(src-src[lag])) //-------------------------------------// // Volatility calculation //-------------------------------------// atr=averagetruerange[length](close) volatil=highest[length*3](atr)*mult //-------------------------------------// // Trend condition //-------------------------------------// once trend=0 if close crosses over myzlema+volatil then trend=1 r=0 g=255 elsif close crosses under myzlema-volatil then trend=-1 r=255 g=0 endif //-------------------------------------// // Signals and colors //-------------------------------------// if trend=-1 then upper=myzlema+volatil alpha1=90 lower=myzlema alpha2=0 if trend<>trend[1] then drawarrowdown(barindex,upper+0.25*atr)coloured(r,g,0,175) endif else upper=myzlema alpha1=0 lower=myzlema-volatil alpha2=90 if trend<>trend[1] then drawarrowup(barindex,lower-0.25*atr)coloured(r,g,0,175) endif endif   if close crosses over myzlema and trend=1 and trend[1]=1 then drawtext("▲",barindex,myzlema-volatil*1.5)coloured("green") elsif close crosses under myzlema and trend=-1 and trend[1]=-1 then drawtext("▼",barindex,myzlema+volatil*1.5)coloured("red") endif if barindex > 4*length then colorbetween(myzlema,upper,r,g,0,alpha1) colorbetween(myzlema,lower,r,g,0,alpha2) endif //-------------------------------------// return myzlema as "Zero Lag Basis"style(line,2)coloured(r,g,0)

  

  Iván

  Moderator

  Topics: 0

  Replies: 961

  Been thanked: 331 times
• Author
  Posts