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.

olobay

Members
  • Content Count

    6
  • Joined

  • Last visited

Everything posted by olobay

  1. Can anybody with EasyLanguage skills program the following code to be always in the market? So when long and the system gets a sell signal, it exits the long position and adds a short position? {Renko-Adaptive signal (based on ATR) Written by konkop 07.03.2002. ********************* Attention: set MaxBarsBack (f.e. =30) in this study according with MaxBarsBack value in the Renko_Adaptive indicator for correct step-by-step calculations of the buy/sell levels *********************} Inputs: K(1), Smooth(10), ShortTrades(false); vars: Brick(0) ,DN(0), UP(0), BricksUp(0), BricksDn(0); Value1 = AvgTrueRange(Smooth); If BarNumber = 1 Then Begin Up = H; Dn = L; Brick = K*(H-L); End; If BarNumber > 1 then begin If C > UP + Brick Then begin BricksUp = IFF(Brick = 0, 0, Floor((C - Up)/Brick)*Brick); UP = Up + BricksUp; Brick = K*Value1; DN = Up - Brick; BricksDn = 0; End; If C < Dn - Brick Then begin BricksDn = IFF(Brick = 0, 0, Floor((Dn - C)/Brick)*Brick); Dn = Dn - BricksDn; Brick = K*Value1; Up = Dn + Brick; BricksUp = 0; End; {Trade Rules with or without short trades} If ShortTrades = false then begin If Up > Up[1] then buy this bar at C; If Dn < Dn[1] then sell this bar at C; End; If ShortTrades = true then begin If Up > Up[1] then buy this bar at C; If Dn < Dn[1] then sell this bar at C; {If C < Dn[1] then exitlong; If C > Up[1] then exitshort;} End; End;Like The Following 3 Users Say Thank You to sevensa For This Useful Post: HBBHVN (12-04-2008), lordbinder (08-26-2008) sevensa View Public Profile Send a private message to sevensa Find all posts by sevensa Add sevensa to Your Contacts View sevensa's Videos 08-26-2008, 08:18 PM - Add Post To Favorites #4 lordbinder Join Date: Jul 2008 Location: Argentina Posts: 50 Ignore this user Thanks: 6 Thanked 9 Times in 5 Posts Re: Renko Charting on MC or TS -------------------------------------------------------------------------------- thx I knew the problem was the use of the short but dint know how to solve it. I know its just a signal and an indicator but it was all i could find, there is renko for metatrader esignal and amibroker but couldnt fund any for easylanguage Like lordbinder View Public Profile Send a private message to lordbinder Find all posts by lordbinder Add lordbinder to Your Contacts View lordbinder's Videos 08-27-2008, 10:10 PM - Add Post To Favorites #5 thrunner Join Date: Feb 2007 Location: US Posts: 314 Ignore this user Thanks: 86 Thanked 206 Times in 89 Posts Re: Renko Charting on MC or TS -------------------------------------------------------------------------------- Quote: Originally Posted by lordbinder » anyone know of a renko charts script for multicharts or tradestation? Progster & Swisstrader have Renko indicator and strategy for TS. Suri Duddella has them as well, however they all charge a few hundred for them. Unfortunately TS and MC do not support Renko natively. One alternative that is 'free' (advertisement supported) and supports Renko natively is Quotetracker. Like thrunner View Public Profile Send a private message to thrunner Find all posts by thrunner Add thrunner to Your Contacts View thrunner's Videos 08-27-2008, 11:00 PM - Add Post To Favorites #6 lordbinder Join Date: Jul 2008 Location: Argentina Posts: 50 Ignore this user Thanks: 6 Thanked 9 Times in 5 Posts Re: Renko Charting on MC or TS -------------------------------------------------------------------------------- Ill check them, I actually am a client of QT, but I hade a minor delay lately, support solved it a couple of days ago, but the quest for a renko chart on multicharts remains Like lordbinder View Public Profile Send a private message to lordbinder Find all posts by lordbinder Add lordbinder to Your Contacts View lordbinder's Videos 03-31-2009, 11:51 PM - Add Post To Favorites #7 ryounkin Join Date: Nov 2006 Location: Seattle Posts: 25 Ignore this user Thanks: 0 Thanked 2 Times in 2 Posts Re: Renko Charting on MC or TS -------------------------------------------------------------------------------- The latest version of TS (8.5) has Renko charting. Like ryounkin View Public Profile Send a private message to ryounkin Find all posts by ryounkin Add ryounkin to Your Contacts View ryounkin's Videos
  2. I know this is an old thread and I searched TradersLab but I could not find it so I am asking here. Does anybody have the Slingshot Indicator coded in EasyLanguage? If so, can somebody post it? Thanks.
  3. Hi, I am trying to convert the included Floor Trader Pivots in MultiCharts to Suri Duddella's Fibonacci Zone Pivotshttp://www.surinotes.com/index.cfm?CSEL=6002&THISPROD=FP but I don't think they are plotting correctly. Maybe somebody with more EasyLanguage experience can help me out. I will inlcude both codes. Thanks. MultiCharts Floor Trader Pivots: inputs: Plot_5or7( 5 ) ; variables: var0( 0 ), var1( 0 ), var2( 0 ), var3( 0 ), var4( 0 ), var5( 0 ), var6( 0 ), var7( 0 ), var8( 0 ), var9( 0 ), var10( 0 ), var11( 0 ), var12( 0 ), var13( 0 ) ; if Date <> Date[1] then begin var13 = var13 + 1 ; var8 = var7 ; var10 = var9 ; var12 = Close[1] ; var7 = High ; var9 = Low ; var6 = ( var8 + var10 + var12 ) / 3 ; var3 = var6 * 2 - var10 ; var4 = var6 + var8 - var10 ; var5 = var4 + var8 - var10 ; var0 = var6 * 2 - var8 ; var1 = var6 - var8 + var10 ; var2 = var1 - var8 + var10 ; end else begin if High > var7 then var7 = High ; if Low < var9 then var9 = Low ; end ; condition1 = var13 >= 2 and BarType < 3 ; if condition1 then begin if Plot_5or7 = 7 then Plot1( var5, "R3" ) ; Plot2( var4, "R2" ) ; Plot3( var3, "R1" ) ; Plot4( var6, "PP" ) ; Plot5( var0, "S1" ) ; Plot6( var1, "S2" ) ; if Plot_5or7 = 7 then Plot7( var2, "S3" ) ; end ; My attempt at Fibonacci Zone Pivots: inputs: Plot_5or7( 5 ) ; variables: var0( 0 ), var1( 0 ), var2( 0 ), var3( 0 ), var4( 0 ), var5( 0 ), var6( 0 ), var7( 0 ), var8( 0 ), var9( 0 ), var10( 0 ), var11( 0 ), var12( 0 ), var13( 0 ), var14( 0 ), var15( 0 ) ; if Date <> Date[1] then begin var13 = var13 + 1 ; var8 = var7 ; var10 = var9 ; var12 = Close[1] ; var7 = High ; var9 = Low ; var6 = ( var8 + var10 + var12 ) / 3 ; //Pivot Point var3 = var6 + (.5 * var14) ; //R1 var4 = var6 + var14 ; //R2 var0 = var6 - (.5 * var14) ; //S1 var1 = var6 - var14 ; //S2 var14 = var7 - var9; //Daily Range var2 = var6 + (.618 * var14) ; //Resistance Band 1 var5 = var6 - (.618 * var14) ; //Support Band 1 var11 = var6 + (1.382 * var14) ; //Resistance Band 2 var15 = var6 - (1.382 * var14) ; //Support Band 2 end else begin if High > var7 then var7 = High ; if Low < var9 then var9 = Low ; end ; condition1 = var13 >= 2 and BarType < 3 ; if condition1 then begin if Plot_5or7 = 7 then Plot2( var4, "R2" ) ; Plot3( var3, "R1" ) ; Plot4( var6, "PP" ) ; Plot5( var0, "S1" ) ; Plot6( var1, "S2" ) ; if Plot_5or7 = 7 then Plot7( var2, "RB1" ) ; Plot8( var5, "SB1" ) ; Plot9( var11, "RB2" ) ; Plot10( var15, "SB2" ) ; end ; The formula from Suri's book: FibZone Pivots Pivot Point (PP) = (H+L+C)/3 Daily Range (DR) = (H-L) First Resistance (Rl) = PP + 0.5*DR Second Resistance (R2) = PP + DR First Support (Sl) = PP - 0.5*DR Second Resistance (S2) = PP - DR Resistance Band (RB 1) = PP + 0.61 8*DR Support Band (SB 1) = PP - 0.6 18*DR Resistance Band (RB2) = PP + 1.382*DR Support Band (SB2) = PP - 1.382*DR
  4. Hi, I am trying to convert the default Floor Trader Pivots included in MultiCharts to Suri Duddella's Fibonacci Zone Pivots but I don't think they are not plotting correctly. I will include both codes and maybe somebody with more EasyLanguage experience can help me out. Thanks. MultiCharts Floor Pivots: inputs: Plot_5or7( 5 ) ; variables: var0( 0 ), var1( 0 ), var2( 0 ), var3( 0 ), var4( 0 ), var5( 0 ), var6( 0 ), var7( 0 ), var8( 0 ), var9( 0 ), var10( 0 ), var11( 0 ), var12( 0 ), var13( 0 ) ; if Date <> Date[1] then begin var13 = var13 + 1 ; var8 = var7 ; var10 = var9 ; var12 = Close[1] ; var7 = High ; var9 = Low ; var6 = ( var8 + var10 + var12 ) / 3 ; var3 = var6 * 2 - var10 ; var4 = var6 + var8 - var10 ; var5 = var4 + var8 - var10 ; var0 = var6 * 2 - var8 ; var1 = var6 - var8 + var10 ; var2 = var1 - var8 + var10 ; end else begin if High > var7 then var7 = High ; if Low < var9 then var9 = Low ; end ; condition1 = var13 >= 2 and BarType < 3 ; if condition1 then begin if Plot_5or7 = 7 then Plot1( var5, "R3" ) ; Plot2( var4, "R2" ) ; Plot3( var3, "R1" ) ; Plot4( var6, "PP" ) ; Plot5( var0, "S1" ) ; Plot6( var1, "S2" ) ; if Plot_5or7 = 7 then Plot7( var2, "S3" ) ; end ; My attempt at Fibonacci Zone Pivots: inputs: Plot_5or7( 5 ) ; variables: var0( 0 ), var1( 0 ), var2( 0 ), var3( 0 ), var4( 0 ), var5( 0 ), var6( 0 ), var7( 0 ), var8( 0 ), var9( 0 ), var10( 0 ), var11( 0 ), var12( 0 ), var13( 0 ), var14( 0 ), var15( 0 ) ; if Date <> Date[1] then begin var13 = var13 + 1 ; var8 = var7 ; var10 = var9 ; var12 = Close[1] ; var7 = High ; var9 = Low ; var6 = ( var8 + var10 + var12 ) / 3 ; //Pivot Point var3 = var6 + (.5 * var14) ; //R1 var4 = var6 + var14 ; //R2 var0 = var6 - (.5 * var14) ; //S1 var1 = var6 - var14 ; //S2 var14 = var7 - var9; //Daily Range var2 = var6 + (.618 * var14) ; //Resistance Band 1 var5 = var6 - (.618 * var14) ; //Support Band 1 var11 = var6 + (1.382 * var14) ; //Resistance Band 2 var15 = var6 - (1.382 * var14) ; //Support Band 2 end else begin if High > var7 then var7 = High ; if Low < var9 then var9 = Low ; end ; condition1 = var13 >= 2 and BarType < 3 ; if condition1 then begin if Plot_5or7 = 7 then Plot2( var4, "R2" ) ; Plot3( var3, "R1" ) ; Plot4( var6, "PP" ) ; Plot5( var0, "S1" ) ; Plot6( var1, "S2" ) ; if Plot_5or7 = 7 then Plot7( var2, "RB1" ) ; Plot8( var5, "SB1" ) ; Plot9( var11, "RB2" ) ; Plot10( var15, "SB2" ) ; end ; This is the formula from Suri's book: FibZone Pivots Pivot Point (PP) = (H+L+C)/3 Daily Range (DR) = (H-L) First Resistance (Rl) = PP + 0.5*DR Second Resistance (R2) = PP + DR First Support (Sl) = PP - 0.5*DR Second Resistance (S2) = PP - DR Resistance Band (RB 1) = PP + 0.61 8*DR Support Band (SB 1) = PP - 0.6 18*DR Resistance Band (RB2) = PP + 1.382*DR Support Band (SB2) = PP - 1.382*DR
  5. Thanks Tams. The following code is what I have and it compiles error free. However, I am not getting the multiple colours in OEC Trader, only one constant colour. Is the code correct for Paint Bars? // BR Paint Bars Inputs: price(Close), length(13), upColour(Blue), downColour(Red); var: intrabarpersist v1(0); v1 = jtHMA(price, length); plotpb(high,low, "jtHMA"); { Color criteria } if (v1 > v1[1]) then setplotcolor(1, upColour) else {if (Value1 < Value1[1]) then } SetPlotColor(1, downColour); #function jtHMA Inputs: price(NumericSeries), length(NumericSimple); Vars: halvedLength(0), sqrRootLength(0); { Original equation is: --------------------- waverage(2*waverage(close,period/2)-waverage(close,period), SquareRoot(Period) Implementation below is more efficient with lengthy Weighted Moving Averages. In addition, the length needs to be converted to an integer value after it is halved and its square root is obtained in order for this to work with Weighted Moving Averaging } if ((ceiling(length / 2) - (length / 2)) <= 0.5) then halvedLength = ceiling(length / 2) else halvedLength = floor(length / 2); if ((ceiling(SquareRoot(length)) - SquareRoot(length)) <= 0.5) then sqrRootLength = ceiling(SquareRoot(length)) else sqrRootLength = floor(SquareRoot(length)); Value1 = 2 * WAverage(price, halvedLength); Value2 = WAverage(price, length); Value3 = WAverage((Value1 - Value2), sqrRootLength); jtHMA = Value3;
  6. Hi, In post #47 on page 5, Blu-Ray attached a doc file but when I try to save target as, all I get is a gif file. And when I try to click on it, a new blank webpage opens. Can anyone please post the code for the BR_Paint Bars because I am using OEC and I can't open the eld file? Thanks.
×
×
  • Create New...

Important Information

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