[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [Metastockusers] John Clayburg Dual Indicators



PureBytes Links

Trading Reference Links

Hello Henry,

I can't believe it! I have been reading the Clayburg book this morning (as 
per JO's recommendation) and had begun to sketch out a bit of Metastock code.

Very Tales Of The Unexpected ;-).

Regards,
Kevin

P.S. I have seen quite a bit of your work on various sites. I think that 
your coding is very classy. Thanks for everything.


At 15:08 23/11/2003 +0000, you wrote:
>
>Here are the Dual indicators that are in his book 4 steps to trading
>success
>
>Dual RSI
>
>Per1:=Input("Fast",2,50,5);
>Per2:=Input("Slow",10,100,14);
>A1:=RSI(Per1);
>A2:=RSI(Per2);
>70;30;A1;A2;
>
>Dual RSI Binary Signal
>
>Per1:=Input("Fast",2,50,5);
>Per2:=Input("Slow",10,100,14);
>A1:=RSI(Per1);
>A2:=RSI(Per2);
>D:=If(A1<30 AND A2<30 AND Cross(A1,Ref(A1,-1)),-1,If(A1>70 AND A2>70
>AND Cross(Ref(A1,-1),A1),1,0));
>D;
>
>Dual Stoch Fast
>
>Per1:=Input("length of Fast stoch",1,100,7);
>Per2:=Input("length of Slow stoch",1,100,45);
>Per3:=Input("length of 1st ma",1,100,3);
>Per4:=Input("length of 2nd ma",1,100,3);
>S1:=Mov(Mov((((CLOSE-LLV(L,Per1))/(HHV(H,Per1)-LLV(L,Per1)))
>*100),Per3,S),Per4,S);
>S2:=Mov(Mov((((CLOSE-LLV(L,Per2))/(HHV(H,Per2)-LLV(L,Per2)))
>*100),Per3,S),Per4,S);
>90;70;30;10;S1;S2;
>
>Dual Stoch Fast Binary Signal
>
>Per1:=Input("length of Fast stoch",1,100,7);
>Per2:=Input("length of Slow stoch",1,100,45);
>Per3:=Input("length of 1st ma",1,100,3);
>Per4:=Input("length of 2nd ma",1,100,3);
>S1:=Mov(Mov((((CLOSE-LLV(L,Per1))/(HHV(H,Per1)-LLV(L,Per1)))
>*100),Per3,S),Per4,S);
>S2:=Mov(Mov((((CLOSE-LLV(L,Per2))/(HHV(H,Per2)-LLV(L,Per2)))
>*100),Per3,S),Per4,S);
>D:=If(S1<10 AND Cross(S1,Ref(S1,-1)) AND S2<30,-1,If(S1>90 AND Cross
>(Ref(S1,-1),S1) AND S2>70,1,0));
>D;
>
>Dual Will%R
>
>Per1:=Input("Fast",2,100,50);
>Per2:=Input("Slow",5,200,75);
>A1:=WillR(Per1);
>A2:=WillR(Per2);
>-88;-70;-30;-12;A1;A2;
>
>Dual Will%R Binary Signal
>
>Per1:=Input("Fast",2,100,50);
>Per2:=Input("Slow",5,200,75);
>A1:=WillR(Per1);
>A2:=WillR(Per2);
>D:=If(A1<-88 AND A2<-70 AND Cross(A1,Ref(A1,-1)),-1,If(A1>-12 AND
>A2>-30 AND Cross(Ref(A1,-1),A1),1,0));
>D;
>
>
>
>Henry
>
>
>
>To unsubscribe from this group, send an email to:
>Metastockusers-unsubscribe@xxxxxxxxxxx
>
>
>
>Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/



------------------------ Yahoo! Groups Sponsor ---------------------~-->
Buy Ink Cartridges or Refill Kits for your HP, Epson, Canon or Lexmark
Printer at MyInks.com. Free s/h on orders $50 or more to the US & Canada.
http://www.c1tracking.com/l.asp?cid=5511
http://us.click.yahoo.com/mOAaAA/3exGAA/qnsNAA/zMEolB/TM
---------------------------------------------------------------------~->

To unsubscribe from this group, send an email to:
Metastockusers-unsubscribe@xxxxxxxxxxx

 

Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/