![]() |
Supertrend |
Post Reply ![]() |
Author | ||
SayaPolo ![]() Newbie ![]() Joined: 19 Nov 2018 Location: Sydney Posts: 10 |
![]() ![]() ![]() ![]() Posted: 08 Jul 2019 at 12:54pm |
|
|
||
![]() |
||
davidr ![]() Newbie ![]() Joined: 19 Oct 2004 Location: Australia Posts: 13 |
![]() ![]() ![]() ![]() |
|
Hi SayaPolo,
There is a discussion of the supertrend indicator in a J B Volatility profit taker thread from sometime back, which can be found here: http://www.bullcharts.com.au/forum/forum_posts.asp?TID=433&PN=4&title=j-b-volatility-profit-taker and Maximo coded it up as an indicator for bullcharts like this: >G'day Jeremy, >I've updated the code, more accurate and simplified, no repaint. [Description="SuperTrend - Max"] [target=price] Mult:=Input("ATR Multiplier",3,1); Nb:=Input("Nb Periods",8,1); method:=inputma("Method",Wilders); price:=Input("1=Median, 2=Close",1,1); TruRan:=ma(ATR(1),Nb,method)*Mult; HiLimit:=if(price=1,(H+L)/2-TruRan,C-TruRan); LoLimit:=if(price=1,(H+L)/2+TruRan,C+TruRan); LB:=If(HiLimit>=PREV and HiLimit<C,HiLimit,If(C<PREV,HiLimit-0.1,PREV)); UB:=If(LoLimit<PREV and LoLimit>C,LoLimit,If(C>PREV,LoLimit+0.1,PREV)); Trend:=if(UB>ref(UB,-1),1,if(LB<ref(LB,-1),-1,prev)); [drawundefined=gap] [Color=lime green] if(Trend=1 and hist(Trend,1)=-1,LB,if(Trend=-1,UB,undefined)); [Color=red] if(Trend=-1 ,UB,if(hist(Trend,1)=1 ,LB,undefined)); [Color=lime green] if(Trend=1 or Trend=0,LB,undefined); { Paint bars} Flag:=input("PaintBars On=1, Off=0",0,0,1); [linestyle=pricecolor; color=rgb(98,217,98)] If(Trend=1 and Flag=1,1,if(Flag=0 and C>O,1,undefined)); [color=rgb(226,118,118)] {red} If(Trend=-1 and Flag=1,1,if(Flag=0 and C<=O,1,undefined)); >Edited by maximo - 09 Feb 2011 at 2:04am Regards davidr |
||
davidr
|
||
![]() |
||
maximo ![]() BullCharts Guru ![]() ![]() Joined: 02 Sep 2006 Location: Australia Posts: 232 |
![]() ![]() ![]() ![]() |
|
This is a simplified version that may work better. { Stop Trail ATR } [Target=price] atrper :=Input("ATR period: ",14); atrfact:=Input("ATR multiplier: ",2); loss:=atrfact*ATR(atrper); trail:= If(C>PREV and Ref(C,-1)>PREV, Max(PREV,C-loss), If(C<PREV and Ref(C,-1)<PREV, Min(PREV,C+loss), If(C>PREV, C-loss, C+loss))); Trail; [linestyle=pricecolor] [color=rgb(0,174,0)] if(C>=Trail,1,0); [color=rgb(255,85,85)] if(C<Trail,1,0); ---------------------------------------------------------------- Also Wilder had a volatility stop which includes highs and lows. { Wilder Volatility Stop Trail }
[Target=price] Mult:=Input("ATR Multiplier",2.2,1); Nb:=if(Mult<3,7,Int(Mult*2+1)); Long :=Ref(HHV(C,Nb),-1) - (Ref(ATR(Nb),-1)*Mult); Short:=Ref(LLV(C,Nb),-1) + (Ref(ATR(Nb),-1)*Mult); trail:= If(C>PREV and Ref(C,-1)>PREV, Max(PREV,Long), If(C<PREV and Ref(C,-1)<PREV, Min(PREV,Short), If(C>PREV, Long, Short))); Trail; [linestyle=pricecolor] [color=rgb(0,174,0)] if(C>=Trail,1,0); [color=rgb(255,85,85)] if(C<Trail,1,0); |
||
![]() |
||
SayaPolo ![]() Newbie ![]() Joined: 19 Nov 2018 Location: Sydney Posts: 10 |
![]() ![]() ![]() ![]() |
|
Hi Davidr and Maximo,
Thank you both so much for your replies. Maximo, Thanks again for your coding. You are a true Guru and really appreciate your time and effort in assisting the community of traders. Cheers, SayaPolo
|
||
![]() |
Post Reply ![]() |
Forum Jump | Forum Permissions ![]() You cannot post new topics in this forum You cannot reply to topics in this forum You cannot delete your posts in this forum You cannot edit your posts in this forum You cannot create polls in this forum You cannot vote in polls in this forum |