Error

 Previous Topic Next Topic
 Wanna join the discussion?! Login to your Discussions forum accountor Register a new forum account.
 wabbit #2 Posted : Sunday, December 2, 2012 1:28:42 AM(UTC) Rank: Advanced MemberGroups: Registered, Registered Users, Subscribers, Unverified UsersJoined: 10/28/2004(UTC)Posts: 3,111Location: Perth, Western AustraliaWas thanked: 16 time(s) in 16 post(s) You need to make a few changes to get the code to work and understand more about the self-referencing in MS...ALWAYS check for DBZ errors.Code:`````` ADXPr:=8; ADXType:=0; VarMAPr:=4; {Calculate Wilders Average Directional Index [ADX]} TH:=If(Ref(C,-1)>H,Ref(C,-1),H); TL:=If(Ref(C,-1)Ref(H,-1) AND L>=Ref(L,-1),H-Ref(H,-1),If(H>Ref(H,-1) AND LRef(L,-1)-L,H-Ref(H,-1),0)); PlusDI:=100*Wilders(PlusDM,ADXPr)/Wilders(Tr,ADXPr); MinusDM:=If(LRef(H,-1) AND L0,(2/(1+VarMAPr)),0.20); Diff:=HHV(myADX,ADXPr)-LLV(myADX,ADXPr); MyConst:=If(Diff>0,(myADX-LLV(myADX,ADXPr))/Max(Diff,Power(10,-8)),EmaIndex); MyConst:=If(MyConst>EmaIndex,EmaIndex,MyConst); VarMA:=Mov((1-MyConst)*PREV)+(MyConst*C),2,S); {PLOT} VarMA; Mov(VarMA, 5,E); Mov(VarMA,10,E); Mov(VarMA,15,E); Mov(VarMA,20,E); Mov(VarMA,25,E); Mov(VarMA,30,E); Mov(VarMA,35,E); Mov(VarMA,40,E); Mov(VarMA,45,E); Mov(VarMA,50,E); Mov(VarMA,55,E); Mov(VarMA,60,E); Mov(VarMA,65,E); Mov(VarMA,70,E); Mov(VarMA,75,E); Mov(VarMA,80,E); Mov(VarMA,85,E); Mov(VarMA,90,E); Mov(VarMA,95,E); Mov(VarMA,100,E); `````` which ends up with VarMA being a 2 period SMA of variable period EMA of CLOSE price, where the length of the EMA is driven by a scaled stochastic value of myADX... and I reckon there's quite a few better ways to achieve this result.wabbit [:D]
 anilcool #3 Posted : Sunday, December 2, 2012 2:02:03 AM(UTC) Rank: MemberGroups: Registered, Registered Users, SubscribersJoined: 7/16/2011(UTC)Posts: 12 Dear wabbit, Thanks a lot, really a prompt reply...and thanks for guidance... Will look into Metastock primer more thoroughly...
 wabbit #4 Posted : Sunday, December 2, 2012 2:06:26 AM(UTC) Rank: Advanced MemberGroups: Registered, Registered Users, Subscribers, Unverified UsersJoined: 10/28/2004(UTC)Posts: 3,111Location: Perth, Western AustraliaWas thanked: 16 time(s) in 16 post(s) There's lots in this code which makes no sense to me, so have a very close look at each line of code and try to understand what it is doing. I am not sure whether what the original author achieved was through intention, or they just didn't quite understand what they were doing, but ended up with something which looked pretty (and they could probably flog to the uneducated masses?)There's plenty of scope in there to "improve" the code, or at least, make it much more logical (and/or explainable)!wabbit [:D]
 anilcool #5 Posted : Sunday, December 2, 2012 2:22:05 AM(UTC) Rank: MemberGroups: Registered, Registered Users, SubscribersJoined: 7/16/2011(UTC)Posts: 12 Dear Wabbit, Yes, actually i am on testing phase, and looking into it. The original code proposed VT users, and his idea is, In VMA as proposed by tushar chande, it is using CMO, but here he try to induce ADX into it, so that trending/non trending phase can be taken into consideration. The idea has been explained here.. http://www.traderslabora...-forex-trend-trades.html
 wabbit #6 Posted : Sunday, December 2, 2012 7:34:42 PM(UTC) Rank: Advanced MemberGroups: Registered, Registered Users, Subscribers, Unverified UsersJoined: 10/28/2004(UTC)Posts: 3,111Location: Perth, Western AustraliaWas thanked: 16 time(s) in 16 post(s) I had a quick peruse of that thread on TL... could be useful for some people, lots of rubbish there too though.Anyway, I did a quick edit of the code commensurate with what I thought of the many discussions there and added something new, I came up with this :Code:`````` {ALL inputs must be >= 1.0} ADXPr:=8; VarMAPr:=4.0; Sensitivity:=2.5; data:=(H+L)/2; {error/bounds checks} ADXPr:=LastValue(Max(ADXPr,1)); VarMAPr:=Max(VarMAPr,1); Sensitivity:=Max(Sensitivity, 1); {Calculate Wilders Average Directional Index [ADX]} TR:=ATR(ADXPr); PlusDM:=If(H>Ref(H,-1) AND L>=Ref(L,-1),H-Ref(H,-1),If(H>Ref(H,-1) AND LRef(L,-1)-L,H-Ref(H,-1),0)); PlusDI:=Wilders(PlusDM,ADXPr)/TR; MinusDM:=If(LRef(H,-1) AND L
 anilcool #7 Posted : Tuesday, December 4, 2012 10:56:49 PM(UTC) Rank: MemberGroups: Registered, Registered Users, SubscribersJoined: 7/16/2011(UTC)Posts: 12 Dear Wabbit, Thanks for the updated code..will surely know of strategy buildup, if any here only... Thanks...
 Gun4hire #8 Posted : Sunday, February 17, 2013 2:48:09 PM(UTC) Rank: NewbieGroups: Registered, Registered Users, SubscribersJoined: 2/17/2013(UTC)Posts: 2 Hello Guys! Its a wonderful community ya'all have nurtured.I landed here while looking for Fantail VMA for Metastock.I have recently made the switch from Ninja, and i absolutely love Fantail VMA for trend identification.I picked the formula here ,so far so good, but when i added vertical shift, it doesnot work.I was wondering if anybody out here could help and resolve the issue.I would be grateful! Heres the code:{ALL inputs must be >= 1.0}ADXPr:=6;VarMAPr:=4.0;Sensitivity:=2.5;data:=(H+L)/2;{error/bounds checks}ADXPr:=LastValue(Max(ADXPr,1));VarMAPr:=Max(VarMAPr,1);Sensitivity:=Max(Sensitivity, 1);{Calculate Wilders Average Directional Index [ADX]}TR:=ATR(ADXPr);PlusDM:=If(H>Ref(H,-1) AND L>=Ref(L,-1),H-Ref(H,-1),If(H>Ref(H,-1) AND LRef(L,-1)-L,H-Ref(H,-1),0));PlusDI:=Wilders(PlusDM,ADXPr)/TR;MinusDM:=If(LRef(H,-1) AND L
 wabbit #9 Posted : Sunday, February 17, 2013 4:58:10 PM(UTC) Rank: Advanced MemberGroups: Registered, Registered Users, Subscribers, Unverified UsersJoined: 10/28/2004(UTC)Posts: 3,111Location: Perth, Western AustraliaWas thanked: 16 time(s) in 16 post(s) Gun4hire wrote:when i added vertical shift, it doesnot work.I was wondering if anybody out here could help and resolve the issue.You added the line of code to get the vertical shift value, but you didn't do anything with that value.Change the last line in your code to read:Code:`````` {plot} VarMA*shift; `````` wabbit [:D]
 Gun4hire #10 Posted : Monday, February 18, 2013 12:18:28 AM(UTC) Rank: NewbieGroups: Registered, Registered Users, SubscribersJoined: 2/17/2013(UTC)Posts: 2 Woh Wabbit! I am elated.I couldn't sort it out ,i'm a noob at programming.Thanks a ton !RegardsSidhu
 Users browsing this topic
Forum Jump
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.