Darvas Box Translation

• 01/19/2018 at 1:02 PM #59885
  odin

  Dear Friends of Prorealtime,

  if found a Darvas Box Code for Prorealtime and for Amibroker.

  I think the Amibroker Code is much more powerful.

  Please can you compare the Code and translate the Amibroker Darvas Box Code for ProRealtime.

  I wanna be glad if you can help me.

   

  This is the Powerful Amibroker Code:
  _SECTION_BEGIN(“Darvas Box”);

  Periods= Param(“Darvas Periods”,5,5,260);

  boxHigh = Ref(H,-3)>=Ref(HHV(H,Periods),-4) AND
  Ref(H,-3)>Ref(H,-2) AND Ref(H,-3)>Ref(H,-1) AND Ref(H,-3)>H;

  Topbox=ValueWhen(boxHigh, Ref(H,-3));
  Botbox=ValueWhen(boxHigh,LLV(L,4));

  /*=========================
  – Allow color change
  – Style change
  ==========================*/
  Plot(TopBox, “Top”, ParamColor(“Box Top Color”, colorRed), ParamStyle(“Box Top Style”));
  Plot(Botbox, “Bot”, ParamColor(“Box Bottom Color”,colorBlue), ParamStyle(“Box Bottom Style”));

  _SECTION_END();

   

  And this is the much longer Darvas PRT Code.

  k=50 once tth=undefined once ttl=undefined n=(k*2)-4 p=(n/2)-1 h1=dpo[n](high) moyh=high-h1 hi=(moyh-moyh[1]+(high[p])/n)*n hi=(round(hi*100))/100 l1=dpo[n](low) moyl=low-l1 lo=(moyl-moyl[1]+(low[p])/n)*n lo=(round(lo*100))/100 low1=(round(low*100))/100 high1=(round(high*100))/100 if barindex > 100 then if box=1 and (high1>tth or low1<ttl) then box=0 flag=0 endif if box=0 and flag=0 and low1<=lo[46] and low1<=lo[45] and low1<=lo[44] then th=low1 flag=1 endif if box=0 and flag=1 then for zz=0 to 44 if lo[47-zz-1]<th or lo[47-zz-2]<th or lo[47-zz-3]<th then flag=0 break endif if hi[47-zz]>hi[47-zz-1] and hi[47-zz]>hi[47-zz-2] and hi[47-zz]>hi[47-zz-3] then box=1 ttl=th tth=hi[47-zz] break endif next endif else tth=undefined ttl=undefined endif if box=1 then ba=ttl else ba=tth endif return ba coloured by box-1, tth coloured by box-1, ttl coloured by box-1

  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

  k=50 once tth=undefined once ttl=undefined n=(k*2)-4 p=(n/2)-1 h1=dpo[n](high) moyh=high-h1 hi=(moyh-moyh[1]+(high[p])/n)*n hi=(round(hi*100))/100 l1=dpo[n](low) moyl=low-l1 lo=(moyl-moyl[1]+(low[p])/n)*n lo=(round(lo*100))/100 low1=(round(low*100))/100 high1=(round(high*100))/100 if barindex > 100 then if box=1 and (high1>tth or low1<ttl) then box=0 flag=0 endif if box=0 and flag=0 and low1<=lo[46] and low1<=lo[45] and low1<=lo[44] then th=low1 flag=1 endif if box=0 and flag=1 then for zz=0 to 44 if lo[47-zz-1]<th or lo[47-zz-2]<th or lo[47-zz-3]<th then flag=0 break endif if hi[47-zz]>hi[47-zz-1] and hi[47-zz]>hi[47-zz-2] and hi[47-zz]>hi[47-zz-3] then box=1 ttl=th tth=hi[47-zz] break endif next endif else tth=undefined ttl=undefined endif if box=1 then ba=ttl else ba=tth endif   return ba coloured by box-1, tth coloured by box-1, ttl coloured by box-1

   

  So please, can you translate the Amibroker Code, to use is in PRT.

  See the tow Pictures of United Heath! The Amibroker Code is much more better for Stop Loss 🙂

  

  odin

  Participant

  Topics: 8

  Replies: 30

  Been thanked: 1 time
  01/19/2018 at 5:37 PM #59910
  Nicolas

  Here is the translated code for the Darvas Boxes, do you have the possibility to compare with the original code?

  Periods = 5 boxHigh = high[3]>=highest[Periods](high)[4] and high[3]>high[2] and high[3]>high[1] and high[3]>high if boxHigh then topbox = high[3] botbox = lowest[4](low) endif return topbox coloured(255,0,0) ,botbox coloured(0,0,255)

  1 2 3 4 5 6 7 8 9 10

  Periods = 5   boxHigh = high[3]>=highest[Periods](high)[4] and high[3]>high[2] and high[3]>high[1] and high[3]>high   if boxHigh then topbox = high[3] botbox = lowest[4](low) endif   return topbox coloured(255,0,0) ,botbox coloured(0,0,255)

   

   

  

  Nicolas

  Keymaster

  Topics: 81

  Replies: 20863

  Been thanked: 4773 times
  01/22/2018 at 1:00 PM #60158
  odin

  thank you nicolas for fast and great answer!

  the darvs boxes work gerat!

   

  thank you1

  

  odin

  Participant

  Topics: 8

  Replies: 30

  Been thanked: 1 time
  10/09/2018 at 5:49 PM #82385
  odin

  hi nicolas,

  what you think of this indicator? i think he works better?

   

  darvas box

  k=50 once tth=undefined once ttl=undefined n=(k*2)-4 p=(n/2)-1 h1=dpo[n](high) moyh=high-h1 hi=(moyh-moyh[1]+(high[p])/n)*n hi=(round(hi*100))/100 l1=dpo[n](low) moyl=low-l1 lo=(moyl-moyl[1]+(low[p])/n)*n lo=(round(lo*100))/100 low1=(round(low*100))/100 high1=(round(high*100))/100 if barindex > 100 then if box=1 and (high1>tth or low1<ttl) then box=0 flag=0 endif if box=0 and flag=0 and low1<=lo[46] and low1<=lo[45] and low1<=lo[44] then th=low1 flag=1 endif if box=0 and flag=1 then for zz=0 to 44 if lo[47-zz-1]<th or lo[47-zz-2]<th or lo[47-zz-3]<th then flag=0 break endif if hi[47-zz]>hi[47-zz-1] and hi[47-zz]>hi[47-zz-2] and hi[47-zz]>hi[47-zz-3] then box=1 ttl=th tth=hi[47-zz] break endif next endif else tth=undefined ttl=undefined endif if box=1 then ba=ttl else ba=tth endif return ba coloured by box-1, tth coloured by box-1, ttl coloured by box-1

  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

  k=50 once tth=undefined once ttl=undefined n=(k*2)-4 p=(n/2)-1 h1=dpo[n](high) moyh=high-h1 hi=(moyh-moyh[1]+(high[p])/n)*n hi=(round(hi*100))/100 l1=dpo[n](low) moyl=low-l1 lo=(moyl-moyl[1]+(low[p])/n)*n lo=(round(lo*100))/100 low1=(round(low*100))/100 high1=(round(high*100))/100 if barindex > 100 then if box=1 and (high1>tth or low1<ttl) then box=0 flag=0 endif if box=0 and flag=0 and low1<=lo[46] and low1<=lo[45] and low1<=lo[44] then th=low1 flag=1 endif if box=0 and flag=1 then for zz=0 to 44 if lo[47-zz-1]<th or lo[47-zz-2]<th or lo[47-zz-3]<th then flag=0 break endif if hi[47-zz]>hi[47-zz-1] and hi[47-zz]>hi[47-zz-2] and hi[47-zz]>hi[47-zz-3] then box=1 ttl=th tth=hi[47-zz] break endif next endif else tth=undefined ttl=undefined endif if box=1 then ba=ttl else ba=tth endif return ba coloured by box-1, tth coloured by box-1, ttl coloured by box-1

  can you code a proscreener which searches for a darvas box long breakout out of the top of the box?

  i tried it with that code but nothing happens 🙁

  thank you

  marcus

  

  odin

  Participant

  Topics: 8

  Replies: 30

  Been thanked: 1 time
  10/10/2018 at 8:53 AM #82427
  Nicolas

  This one uses DPO internal indicator which know the future of the price, so I don’t think it is better than the other one. This one is not reliable for live trading, in my opinion.

  

  Nicolas

  Keymaster

  Topics: 81

  Replies: 20863

  Been thanked: 4773 times
  10/10/2018 at 1:47 PM #82459
  odin

  okay, thank you nicolas for your eplination.

  can you code the darvas box breakout for your darvas box indicator.

  i need onldy the bullish breakout on the upside to screen.

  it would be be great. thank you marcus

  

  odin

  Participant

  Topics: 8

  Replies: 30

  Been thanked: 1 time
  10/10/2018 at 2:54 PM #82464
  Nicolas

  The last variable named “breakout” should return 1 when a breakout of the current top box occur:

  Periods = 5 boxHigh = high[3]>=highest[Periods](high)[4] and high[3]>high[2] and high[3]>high[1] and high[3]>high if boxHigh then topbox = high[3] botbox = lowest[4](low) endif breakout = close crosses over topbox return topbox coloured(255,0,0) ,botbox coloured(0,0,255), breakout

  1 2 3 4 5 6 7 8 9 10 11 12

  Periods = 5   boxHigh = high[3]>=highest[Periods](high)[4] and high[3]>high[2] and high[3]>high[1] and high[3]>high   if boxHigh then topbox = high[3] botbox = lowest[4](low) endif   breakout = close crosses over topbox   return topbox coloured(255,0,0) ,botbox coloured(0,0,255), breakout

   

  

  Nicolas

  Keymaster

  Topics: 81

  Replies: 20863

  Been thanked: 4773 times
  10/17/2018 at 12:43 PM #82962
  odin

  thank you. i wann test it today.

  thank you! 🙂

  

  odin

  Participant

  Topics: 8

  Replies: 30

  Been thanked: 1 time
  08/10/2022 at 5:43 PM #198903
  pablo26

  why this script dont go the the chart but to the down side of the chart?

  

  pablo26

  Participant

  Topics: 3

  Replies: 4

  Been thanked: 0 times
  08/10/2022 at 6:14 PM #198907
  PeterSt

  Rightclick on the chart and from there choose “Add Indicator”.

  

  PeterSt

  Participant

  Topics: 73

  Replies: 2506

  Been thanked: 808 times
• Author
  Posts